Zikica ha un documento contenente alcune selezioni di testo formattate in rosso. Vorrebbe un modo per selezionare tutte le istanze del testo rosso e copiare quel testo in un nuovo documento. Si chiede se è meglio farlo con una macro o se c’è qualche altro modo per eseguire l’operazione.

Prima di iniziare a utilizzare una macro per eseguire l’operazione, diamo un’occhiata ad alcuni modi in cui puoi farlo senza utilizzare una macro. Il primo è utilizzare le funzionalità Trova e sostituisci di Word seguendo questi passaggi:

  1. Apri un nuovo documento. (Questo è il documento in cui copierai il tuo testo in rosso.)

  2. Torna al documento originale.

  3. Premi CTRL + H. Word visualizza la scheda Sostituisci della finestra di dialogo Trova e sostituisci.

  4. Fare clic sulla scheda Trova.

  5. Fare clic sul pulsante Altro, se disponibile. La finestra di dialogo si espande.

(Vedi figura 1.)

  1. Se è disponibile il pulsante Nessuna formattazione, fare clic su di esso. Questo elimina qualsiasi formattazione che potresti aver cercato in precedenza.

  2. Assicurati che la casella Trova sia vuota.

  3. Fare clic sul pulsante Formato e quindi su Carattere. Word visualizza la finestra di dialogo Trova carattere. (Vedi figura 2.)

  4. Fare clic sull’elenco a discesa Colore carattere e scegliere la tonalità di rosso utilizzata nel documento.

  5. Fare clic su OK per chiudere la finestra di dialogo Trova carattere. Word visualizza le informazioni sul colore proprio sotto la casella Trova.

  6. Fare clic sull’elenco a discesa Trova in e selezionare Documento principale. Word seleziona tutte le istanze del testo rosso all’interno del documento e mostra nella finestra di dialogo quante istanze ha trovato.

  7. Fare clic su Chiudi per chiudere la finestra di dialogo Trova e sostituisci. Tutte le istanze di testo rosso dovrebbero essere ancora selezionate.

  8. Premi Ctrl + C. Questo copia tutto il testo negli Appunti.

  9. Passa al nuovo documento.

  10. Premi Ctrl + V. Word incolla tutto il testo rosso nel nuovo documento.

Puoi anche usare Trova e sostituisci in un modo diverso per arrivare a una soluzione simile. In questo approccio, inizi facendo una copia del documento e poi fai il tuo lavoro con quella copia:

  1. Premi CTRL + H. Word visualizza la scheda Sostituisci della finestra di dialogo Trova e sostituisci.

  2. Fare clic sul pulsante Altro, se disponibile. La finestra di dialogo si espande.

(Vedi figura 3.)

  1. Assicurati che la casella Trova sia vuota e che il punto di inserimento sia in quella casella.

  2. Fare clic sul pulsante Formato e quindi su Carattere. Word visualizza la finestra di dialogo Trova carattere.

  3. Fare clic sull’elenco a discesa Colore carattere e selezionare Automatico.

  4. Fare clic su OK per chiudere la finestra di dialogo Trova carattere. Word visualizza le informazioni sul colore proprio sotto la casella Trova.

  5. Assicurati che la casella Sostituisci con sia vuota.

  6. Fare clic su Sostituisci tutto. Word visualizza una finestra di dialogo che informa sul numero di sostituzioni effettuate.

  7. Fare clic su OK per chiudere la finestra di dialogo delle informazioni.

  8. Fare clic su Chiudi per chiudere la finestra di dialogo Trova e sostituisci.

Questo approccio rimuove tutto il testo non rosso nel documento, lasciando solo il rosso. (Questo presume che tu abbia solo testo normale e testo rosso nel documento. Se hai altri colori che vuoi sparire, dovrai ripetere i passaggi e specificare un colore diverso da rimuovere nel passaggio 5.) L’unico svantaggio di questo L’approccio è che TUTTO il testo non rosso viene rimosso, che può anche includere marcatori di fine paragrafo, quindi il testo rosso può apparire tutto eseguito insieme in un singolo paragrafo.

Un altro modo per copiare il testo rosso in un documento diverso è ignorare Trova e sostituisci e utilizzare uno strumento diverso. Segui questi passaggi:

  1. Apri un nuovo documento. (Questo è il documento in cui copierai il tuo testo in rosso.)

  2. Torna al documento originale.

  3. Posiziona il punto di inserimento da qualche parte all’interno del testo rosso.

  4. Visualizza la scheda Home della barra multifunzione.

  5. Nel gruppo Modifica, fare clic sullo strumento Seleziona e quindi scegliere Seleziona tutto il testo con formattazione simile. Word seleziona tutto il testo rosso formattato in modo simile nel documento.

  6. Premi Ctrl + C. Questo copia tutto il testo negli Appunti.

  7. Passa al nuovo documento.

  8. Premi Ctrl + V. Word incolla tutto il testo rosso nel nuovo documento.

Se devi eseguire questo tipo di modifica abbastanza spesso, potresti voler creare una macro che svolga l’attività per te. Ci sono diversi modi in cui questo potrebbe essere fatto, ma quanto segue sarà sufficiente per mostrare il concetto. Crea una matrice di variabili per tutto il testo rosso nel documento, crea un nuovo documento e quindi inserisce il testo della matrice di variabili nel nuovo documento.

Sub CopyRedTextToNewDoc()

Dim i As Integer     Dim a() As Variant     Dim sFound As String

Selection.Find.ClearFormatting     Selection.Find.Font.Color = wdColorRed     With Selection.Find         .Text = ""

.Replacement.Text = ""

.Forward = True         .Wrap = wdFindContinue         .Format = True         .MatchCase = False         .MatchWholeWord = False         .MatchWildcards = False         .MatchSoundsLike = False         .MatchAllWordForms = False     End With     Selection.Find.Execute

Do While Selection.Find.Found         ReDim Preserve a(i)

sFound = Selection

If Asc(Right(sFound, 1)) <> 13 Then             sFound = sFound & vbCrLf         End If

a(i) = sFound         i = i + 1         Selection.Find.Execute    Loop

Application.Documents.Add     For i = LBound(a) To UBound(a)

ActiveDocument.Range.InsertAfter a(i)

Next

' If you don't want the text in the new document to be red,     ' remove the following three lines or comment them out     Selection.WholeStory     Selection.Font.Color = wdColorRed     Selection.Collapse End Sub

_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.

Fare clic qui per aprire quella pagina speciale in una nuova scheda del browser.

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

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