Sam ha un documento che contiene alcune tabelle in cui vuole eliminare alcune righe. Le righe contengono testo specifico, che può certamente eliminare utilizzando Trova e sostituisci, ma desidera eliminare le intere righe che contengono quel testo.

Non è possibile eseguire questa operazione (eliminare righe) utilizzando le normali funzionalità Trova e sostituisci di Word. Invece, è necessario utilizzare una macro che troverà il testo e quindi eliminerà l’intera riga. Ecco una macro relativamente semplice che farà il lavoro:

Sub DeleteRowWithSpecifiedText()

Dim sText As String

sText = InputBox("Enter text for Row to be deleted")

Selection.Find.ClearFormatting     With Selection.Find         .Text = sText         .Wrap = wdFindContinue     End With     Do While Selection.Find.Execute         If Selection.Information(wdWithInTable) Then             Selection.Rows.Delete         End If     Loop End Sub

Questa macro visualizza prima una casella di input che chiede all’utente di specificare il testo da cercare. Quindi inizia a cercare tutte le istanze di quel testo. Se viene trovata un’istanza, la selezione viene controllata per assicurarsi che sia all’interno di una tabella. Se lo è, l’intera riga viene eliminata e la macro passa all’occorrenza successiva.

_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 (3838) si applica a Microsoft Word 97, 2000, 2002 e 2003. È possibile trovare una versione di questo suggerimento per l’interfaccia a barra multifunzione di Word (Word 2007 e più tardi) qui:

Trovare ed eliminare righe.