|
Visual Basic pour Applications ( VBA ) est un langage de programmation utilisé pour automatiser des tâches dans Microsoft Word. Avec Visual Basic, vous pouvez faire toute opération que vous pouvez faire dans Word sans Visual Basic, mais plus rapide . Cela est particulièrement vrai des opérations qui comprennent de nombreux sous-tâches , telles que la recherche d'un mot , suivi par le choix des mots , suivis par formatting.The exemple de code suivant montre comment vous pouvez commencer à utiliser VBA pour obtenir des solutions pratiques aux problèmes courants de traitement de texte . Entrez le code exemple dans l'IDE
Ouvrez MS Word et aller à la Visual Basic IDE (environnement de développement intégré ) en appuyant sur Alt- F11.
Dans la fenêtre code, tapez le code de programme suivant .
public Sub mac () de r As RangeDim w Comme RangeDim i Comme IntegerDim t As String
Options.DefaultHighlightColorIndex
Set r = Selection.Range Photos r.StartOf ( wdParagraph )
r.Expand = TrueWith r.Find.Text = "est" . Replacement.Text = "est" . Forward = True.Wrap = wdFindStop.Format = True.MatchCase = False.MatchWholeWord = True.MatchWildcards = False.MatchSoundsLike = False.MatchAllWordForms = FalseEnd Withr.Find.Execute Remplacer: = wdReplaceAll
End Sub
Vous pouvez avoir une idée de ce que ce programme fera en remarquant certains mots clés en son sein : le paragraphe , trouver et sélection , pour exemple . Le programme détecte et met en évidence toutes les occurrences d'un mot que vous spécifiez , dans le paragraphe actuel
avis ces deux lignes dans le code suivant: . . Text = "est" Replacement.Text = "est"
< . p> Ces lignes disent mot ce qu'il faut chercher. En lieu et place de ceux qui «est» s , entrez n'importe quel mot ou le texte que vous souhaitez rechercher et mettre en évidence .
Exécution du programme
Retourner au mot (alt -F11 ) et saisir quelques paragraphes d'une valeur de texte. Ces paragraphes doivent contenir au moins quelques occurrences du terme de recherche ci-dessus vous avez choisi .
Lorsque vous avez terminé la saisie du texte , placez le curseur à l'intérieur de l'un des paragraphes. Exécutez le programme : choisir Alt-F8 pour faire apparaître la fenêtre de macro -replay . Sélectionnez la macro "mac" , puis appuyez sur Run . Si Word trouve des occurrences du mot de recherche que vous avez spécifié dans le paragraphe contenant le curseur , il mettra en évidence le mot .
Comprenez l'adapter
Taper dans un seul script peut améliorer votre flux de travail un peu. Mais si vous comprenez comment le script fonctionne , vous commencez à améliorer votre flux de travail beaucoup, et sur une base permanente.
Retour à l'IDE Visual Basic et regardez le code de programme à l'intérieur de la fonction mac. Remarquez comment la fonction mac arrive à l'actuel paragraphe pour faire son opération de remplacement : il ressemble à l'objet Selection , qui représente le texte sélectionné ou le point d'insertion . Puis, en utilisant la représentation interne de Word du document , le script " surpasse " du point d'insertion au début du paragraphe qui contient le point d'insertion.
Ce genre de mouvement est rendu possible par un réseau de connexions à l'intérieur de VBA pour Word. La sélection en cours est relié au mot en cours, la phrase en cours et du paragraphe en cours. Plus précisément, les liens Mac ou Leapfrogs de la sélection courante au début du paragraphe courant (Set r = Selection.Range et r.StartOf ( wdParagraph ) ) . À ce moment , r est seulement un point d'insertion , mais nous voulons qu'il se référer à l'ensemble du paragraphe , si nous y ajoutons des r.Expand wdParagraph . Si vous souhaitez rechercher simplement la phrase en cours au lieu de l'actuel paragraphe , remplacer toutes les instances de wdParagraph dans le code du programme avec wdSentence .
|
