Cindy ha chiesto se esiste un modo per “digitare sopra” parole con un carattere diverso. In particolare, ha voluto “x” fuori alcuni personaggi. Non vuole fare il barrato, ma in realtà usa il carattere “x” per digitare sopra i caratteri già nel documento.

Il modo migliore per farlo in Word è utilizzare il campo EQ con l’opzione \ o (sovrascrittura). Segui questi passaggi:

  1. Posiziona il puntatore di inserimento dove desideri che appaia il testo x-ed out.

  2. Premi Ctrl + F9. Word inserisce una serie di parentesi graffe di campo, con il punto di inserimento al centro di esse.

  3. Digita quanto segue tra le parentesi graffe del campo:

eq \o(my text,xxxxxxx)
  1. Sostituisci “il mio testo” con il testo che vuoi x-ed e assicurati che ci siano abbastanza x caratteri per coprire quel testo.

  2. Premi Maiusc + F9 per comprimere il campo e visualizzare il risultato.

Questo approccio al campo funziona alla grande per selezioni di testo brevi e puoi sempre convertirlo in una macro se hai molto testo che desideri modificare in questo modo. La seguente macro porta questo concetto anche oltre: mostra i caratteri x in sovrascrittura in rosso e non sovrascrive gli spazi:

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 aggiunge un singolo campo per ogni carattere sovrascritto ed è quindi appropriata per testo di qualsiasi lunghezza.

C’è anche un approccio completamente diverso che potresti provare, questa volta usando le caselle di testo. Crea una casella di testo e al suo interno digita tutti i caratteri x desiderati nel carattere e nella dimensione desiderati. Assicurati che la casella di testo sia formattata in modo che non abbia riempimento (il che la rende trasparente), non abbia bordi e fluttui sul testo senza ritorno a capo. Trascina la casella di testo sul testo da modificare e ridimensionare se necessario.

_Nota: _

Se desideri sapere come utilizzare le macro descritte in questa pagina (o in qualsiasi altra pagina dei siti WordTips), ho preparato una pagina speciale che include informazioni utili.

WordTips è la tua fonte di formazione economica su Microsoft Word.

(Microsoft Word è il software di elaborazione testi più popolare al mondo.) Questo suggerimento (2532) si applica a Microsoft Word 2007, 2010 e 2013.

Puoi trovare una versione di questo suggerimento per la vecchia interfaccia del menu di Word qui: X-ing Out Text.