Savoir comment supprimer le texte barré avec VBA vous permet d'effacer rapidement ce contenu potentiellement distrayant de votre document. Depuis VBA ne nécessite aucune intervention de l'utilisateur pour effectuer cette tâche , il peut le faire sans erreur humaine. La fonction VBA au cœur de ce projet est la "Police" propriété de la classe «Range» , dont tous les mots dans vos documents sont membres . La propriété "Police" a plusieurs propriétés des composants qui stockent tout forme que vous appliquez à un mot , comme l' effet barré . Instructions
1

Appuyez sur " Control" et " N " pour créer un nouveau document Word, puis tapez quelques mots dedans. Double-cliquez sur un des mots pour le sélectionner, puis appuyez sur "Control" et "D " en même temps pour afficher la boîte de dialogue "Police" . Cochez la case «barré » pour placer cet effet sur ​​le mot , puis cliquez sur "OK" pour fermer la boîte de dialogue.
2

Cliquez sur "Options " de l'onglet "Fichier" , puis cliquez sur " personnaliser " le commandement du« ruban volet Catégories " . Ces actions vous prennent à l'option permettant l'affichage de l'onglet « Développeur » , qui détient bouton pour travailler avec VBA.
3

Cliquez sur la case " développeur" pour faire afficher le mot " Developer " onglet , puis cliquez sur " OK " pour fermer la " Options " boîte de dialogue .
4

Cliquez sur le bouton" Visual Basic " onglet" de "Developer pour ouvrir l'environnement de développement Visual Basic , qui vous permet pour écrire, éditer et déboguer des programmes .
5

Cliquez sur la commande "Module" du menu "Insertion " pour créer une nouvelle fenêtre pour les programmes entrant , puis collez le programme suivant dans la nouvelle fenêtre. Ce programme lit le " barré " propriété de chaque mot dans le document en cours , et supprime le mot si la valeur de cette propriété est «vrai». Le programme utilise "Delete" la fonction de la parole, qui programmeurs VBA appellent une «méthode» pour effectuer la suppression .

DelStrikeThrough Public Sub ()

Dim w

ActiveDocument

For Each w In. mots

Si w.Font.StrikeThrough = True Then

w.Delete

End If
< p > Suivant

End With End Sub

6

Cliquez sur l'un des énoncés du programme, puis cliquez sur " Step dans " le menu "Debug" de commande, ce qui permet d'exécuter un programme d'une déclaration à la fois. Exécution d'un programme de cette façon vous aide à comprendre l'effet de chaque déclaration.
7

presse "F8" à plusieurs reprises pour faire avancer le point culminant de la déclaration suivante du programme . Notez que le programme ne s'exécute que la déclaration "Supprimer" une seule fois - . Pour le seul mot avec le barrés vous avez appliqué à la première étape
8

Continuez à appuyer sur "F8" jusqu'à ce que le point culminant disparaît , ce qui indique l' exécution du programme terminée .
9

Cliquez sur l'icône «Word» sur la barre des tâches Windows pour revenir à Word. Notez que le mot avec la police barré a été supprimé.