Cindy a demandé s’il y avait un moyen de «taper sur» des mots avec un caractère différent. En particulier, elle voulait « x » sortir certains personnages. Elle ne veut pas faire de barré, mais utilise en fait le caractère «x» pour taper sur les caractères déjà dans le document.

La meilleure façon de procéder dans Word consiste à utiliser le champ EQ avec le commutateur \ o (refrappe). Suivez ces étapes:

  1. Placez le pointeur d’insertion à l’endroit où vous souhaitez que le texte de sortie X-ed apparaisse.

  2. Appuyez sur Ctrl + F9. Word insère un ensemble d’accolades de champ, avec le point d’insertion au milieu.

  3. Tapez ce qui suit dans le champ accolades:

eq \o(my text,xxxxxxx)

  1. Remplacez « mon texte » par le texte que vous souhaitez supprimer et assurez-vous qu’il y a suffisamment de x caractères pour couvrir ce texte.

  2. Appuyez sur Maj + F9 pour réduire le champ et afficher le résultat.

Cette approche de champ fonctionne très bien pour les sélections de texte courtes, et vous pouvez toujours la convertir en macro si vous souhaitez affecter beaucoup de texte de cette manière. La macro suivante va encore plus loin dans ce concept – elle affiche les caractères de surtype x en rouge, et elle ne recouvre pas les espaces:

Sub OverstrikeWithX2()

Dim i As Integer     MyString = Selection.Text

' Insertion point only/single character/multiple character range handler     If Selection.Characters.Count = 1 Then         Selection.MoveRight Unit:=wdCharacter, Count:=1, Extend:=wdExtend         If Selection.Characters.Count = 2 Then             Selection.MoveLeft Unit:=wdCharacter, Count:=2, Extend:=wdExtend         Else             Selection.MoveLeft Unit:=wdCharacter, Count:=1         End If     Else         Selection.MoveLeft Unit:=wdCharacter, Count:=1     End If     ' end range handler

For i = 1 To Len(MyString)

Selection.MoveRight Unit:=wdCharacter, Count:=1, Extend:=wdExtend         ' paragraph marker and space handler         If Selection.Text = Chr(13) Or Selection.Text = " " Then             While Selection.Text = Chr(13) Or Selection.Text = " "

If i = Len(MyString) Then                     Selection.MoveRight Unit:=wdCharacter, Count:=1                     Exit Sub                 Else                     i = i + 1                     Selection.MoveRight Unit:=wdCharacter, Count:=1                     Selection.MoveRight Unit:=wdCharacter, Count:=1, _                       Extend:=wdExtend                 End If             Wend         End If         ' end paragraph marker & space handler

With Selection             .Fields.Add Range:=Selection.Range, Type:=wdFieldEmpty, _               PreserveFormatting:=False             .TypeText Text:="eq \o("

.MoveRight Unit:=wdCharacter, Count:=1             .TypeText Text:=",x)"

.Delete Unit:=wdCharacter, Count:=1

' The next three lines turns the overstike "x" red             .MoveLeft Unit:=wdCharacter, Count:=1             .MoveLeft Unit:=wdCharacter, Count:=1, Extend:=wdExtend             .Font.Color = wdColorRed             .Fields.ToggleShowCodes             .MoveRight Unit:=wdCharacter, Count:=1         End With     Next i End Sub

La macro ajoute un champ unique pour chaque caractère surchargé et convient donc pour du texte de presque n’importe quelle longueur.

Il existe également une approche totalement différente que vous voudrez peut-être essayer, cette fois en utilisant des zones de texte. Créez une zone de texte et à l’intérieur, tapez autant de caractères x que vous le souhaitez dans la police et la taille souhaitées. Assurez-vous que la zone de texte est formatée de manière à ne pas avoir de remplissage (ce qui la rend transparente), sans bordure et flotte sur le texte sans habillage de texte. Faites glisser la zone de texte sur le texte à supprimer et redimensionnez si nécessaire.

_Note: _

Si vous souhaitez savoir comment utiliser les macros décrites sur cette page (ou sur toute autre page des sites WordTips), j’ai préparé une page spéciale qui comprend des informations utiles.

lien: / wordribbon-WordTipsMacros [Cliquez ici pour ouvrir cette page spéciale dans un nouvel onglet de navigateur].

WordTips est votre source pour une formation Microsoft Word rentable.

(Microsoft Word est le logiciel de traitement de texte le plus populaire au monde.) Cette astuce (2532) s’applique à Microsoft Word 2007, 2010 et 2013.

Vous pouvez trouver une version de cette astuce pour l’ancienne interface de menu de Word ici: link: / word-X-ing_Out_Text [X-ing Out Text].