Microsoft Word dispose d'un puissant langage de script appelé Visual Basic , que vous pouvez utiliser pour automatiser n'importe quelle tâche dans Word. Vous pouvez créer des scripts Visual Basic , appelés macros, en les enregistrant ou en les saisissant manuellement dans le Visual Basic IDE ( environnement de développement intégré ) de Word.One des tâches les plus courantes que les utilisateurs de Word devez faire est de trouver et remplacer du texte . Alors que la fonctionnalité existante de Word pour rechercher et remplacer est facile à utiliser , Visual Basic peut le rendre encore plus facile. Entrez et exécutez la macro suivante pour apprendre à trouver et remplacer par Visual Basic. Création du programme
Vous allez créer un programme court en entrant directement dans l'IDE Visual Basic. Mais vous devez d'abord un document d'exemple pour tester le programme avec . Inside Word, ouvrez un nouveau document et enregistrez-le sous le nom " vbReplace.doc . " Copier beaucoup de texte à partir d' un autre document et le coller dans vbReplace.doc .
Appuyez sur Alt + F11 pour entrer dans l'IDE de Visual Basic et de développer le projet vbReplace arborescence dans le volet projet . Développez le dossier Objets Microsoft Word et double- cliquez sur l'icône ThisDocument . Places Visual Basic le curseur dans la fenêtre de saisie du code . Entrez le code suivant dans la fenêtre.
Public Sub mac () myRange As Range
«do it en courant paragraphSet myRange = Selection.Paragraphs (1). Range
< p > Avec myRange.FindClearFormatting.Font.Bold = False.Format = True.Replacement.ClearFormatting.Replacement.Font.Bold = True.Execute Forward : = True , remplacer: = wdReplaceAll , _FindText : = "le", ReplaceWith : = " l' " , MatchWholeWord : = TrueEnd WithEnd Sous
exécuter le programme
maintenant que le programme est terminé, il est temps de le tester. Retour au document Word en appuyant sur Alt -F11 et placez le curseur dans un paragraphe typique , en particulier celui qui a beaucoup d' occurrences du mot « le ». Exécutez votre macro en appuyant sur Alt + F8 pour accéder à la liste des macros , en sélectionnant "mac " de la liste et en appuyant sur Exécuter. S'il y avait des cas non gras de La dans le paragraphe où vous avez placé le curseur , ils sont maintenant tous en gras.
Modifier le programme
Avoir une macro pour faire un seul type de recherche et de remplacement a une certaine utilité, mais être capable de s'adapter facilement la macro pour couvrir les différents types d'opérations de replace est un véritable booster la productivité. Ressaisissez le Visual Basic IDE ( alt- F11) et naviguez vers le code entré , en utilisant le volet du projet tel que décrit précédemment .
Changer le Mac sous pour qu'elle devienne une partie des mots " Les" vous gras en italique s "la". Cette fois, vous allez restreindre l'opération de remplacement de travailler seulement sur une seule phrase. Voici les seules lignes que vous avez besoin de changer : . . .
Set myrange = Selection.Paragraphs ( 1) devient Range Set myRange = Selection.Sentences (1) Font.Bold = False devient Font.Bold = true . Replacement.Font.Bold = True devient Replacement.Font.italic = True.ReplaceWith : . = " le " devient ReplaceWith : = "la"
exécuter le programme révisé
maintenant, vous allez tester le programme de la même façon que vous avez testé la version originale. Retour au document Word et placer le curseur à l'intérieur d'une phrase avec certains cas audacieux de " La ". Exécutez votre macro révisée en suivant les étapes que vous avez utilisé pour exécuter la version originale. Regardez le gras », le« s se transformer en s "la". Notez également que la peine actuelle a été touchée plutôt que l'ensemble du paragraphe .
