2010-06-25 3 views
1

donc si j'ai un jeu d'enregistrements DAO retenant des valeurs, et j'utilise Format $, est-il possible de définir la propriété de police de ce qui est seulement contenu dans Format $ portion?

Par exemple, j'ai ceci:

"MetriC#43 = " & Format$(rs!Metric43, "Yes/No") 

donc c'est en fait pour l'automatisation ppt, pas une forme d'accès. Je veux que la première chaîne soit unbold, et que la valeur retournée soit en gras. J'ai donc un modèle ppt que j'utilise pour accomplir cela, qui contient une zone de texte je me réfère à. la zone de texte est définie par défaut sur Non-Bold, et je me demandais si je pouvais définir une propriété de police dans la partie Format $ pour obtenir où je veux aller avec ça?

peut être totalement hors, mais me demandais

grâce Justin

+0

Ce n'est pas par un effort d'imagination une question d'Access. –

+0

oh ... est le format $ function une partie de SQL ?? je ne le savais pas. Je suppose que je viens d'intituler la question une question d'accès parce que j'utilise un formulaire d'accès pour déclencher l'événement, une instruction SQL pour créer le jeu d'enregistrements qui déplace les données vers ppt, et la métrique rs! 43 en faisait partie ... bien que je ne me rendais pas compte que le format $ faisait partie de SQL – Justin

+0

Format() ne fait pas partie de SQL, mais si vous l'utilisez dans une instruction SQL exécutée dans Access, le service d'expression Access s'occupe de son utilisation. Vous avez dit que vous l'utilisiez dans un jeu d'enregistrements, donc c'est un contexte SQL. Je ne suis pas sûr si SQL exécuté à partir de PowerPoint utilisera le service d'expression Access/Jet/ACE ou non. Si vous avez utilisé ODBC, je suis sûr que non, mais avec un jeu d'enregistrements DAO, c'est un autre type de poisson. –

Répondre

1

Vous ne pouvez pas utiliser la commande de format, mais vous pouvez utiliser l'objet zone de texte au point d'alimentation et définir la police et le texte et boîte.

Ce code est à l'intérieur du PP, mais simplement la modifier pour l'automatisation:

Dim strT  As String 
Dim sp  As Shape 

strT = "Yes/No" 

Set sp = Application.ActivePresentation.Slides(1).Shapes(2) 

sp.TextFrame.TextRange = strT 
sp.TextFrame.TextRange.Characters(1, 3).Font.Bold = True 
sp.TextFrame.TextRange.Characters(1, 3).Font.Name = "Arial" 
sp.TextFrame.TextRange.Characters(1, 3).Font.Size = 18 

Ainsi, le réglage de la police, nom de la police, et la taille est possbile. SQL n'a aucun attribut de police, c'est donc un problème de couche de présentation.

+0

ouais ça marche très bien! Merci beaucoup! Je suis déjà en train de faire les références juste comme vous avez fait ci-dessus pour passer les données, juste besoin d'ajouter .cahracter, etc! Je vous en suis reconnaissant! – Justin