Come utilizzare trova e sostituisci in vba (con esempi)

È possibile utilizzare i seguenti metodi per trovare e sostituire stringhe specifiche in un intervallo utilizzando VBA:

Metodo 1: trova e sostituisci stringhe (senza distinzione tra maiuscole e minuscole)

 Sub FindReplace()
Range(" A1:B10 ").Replace What:=" Mavs ", Replacement:=" Mavericks "
End Sub

Questa particolare macro sostituirà ogni occorrenza di “Mavs” con “Mavericks” nell’intervallo A1:B10 .

Metodo 2: Trova e sostituisci stringhe (con distinzione tra maiuscole e minuscole)

 Sub FindReplace()
Range(" A1:B10 ").Replace What:=" Mavs ", Replacement:=" Mavericks ", MatchCase:= True
End Sub

Questa particolare macro sostituirà ogni occorrenza di “Mavs” con “Mavericks” nell’intervallo A1:B10 solo se il caso corrisponde a .

Ad esempio, la stringa “mavs” non verrebbe sostituita perché non corrisponde esattamente al caso di “Mavs”.

I seguenti esempi mostrano come utilizzare questo metodo nella pratica con il seguente set di dati in Excel:

Esempio 1: trovare e sostituire stringhe utilizzando VBA (senza distinzione tra maiuscole e minuscole)

Diciamo che vogliamo sostituire ogni occorrenza di “Mavs” con “Mavericks” nell’intervallo A1:B10 .

Per fare ciò possiamo creare la seguente macro:

 Sub FindReplace()
Range(" A1:B10 ").Replace What:=" Mavs ", Replacement:=" Mavericks "
End Sub

Quando eseguiamo questa macro, riceviamo i seguenti risultati:

Da notare che ogni occorrenza di “Mavs” è stata sostituita con la stringa “Mavericks” nella colonna della squadra.

Esempio 2: trovare e sostituire stringhe utilizzando VBA (con distinzione tra maiuscole e minuscole)

Supponiamo di voler sostituire ogni occorrenza di “Mavs” con “Mavericks” nell’intervallo A1:B10 solo se il caso corrisponde a .

Per fare ciò possiamo creare la seguente macro:

 Sub FindReplace()
Range(" A1:B10 ").Replace What:=" Mavs ", Replacement:=" Mavericks ", MatchCase:= True
End Sub

Quando eseguiamo questa macro, riceviamo il seguente output:

Tieni presente che questa sostituzione fa distinzione tra maiuscole e minuscole .

Ciò significa che ogni occorrenza di “Mavs” viene sostituita ma ogni occorrenza di “mavs” viene lasciata intatta.

Risorse addizionali

I seguenti tutorial spiegano come eseguire altre attività comuni utilizzando VBA:

VBA: come contare le occorrenze di caratteri in una stringa
VBA: come verificare se una stringa contiene un’altra stringa
VBA: come contare le celle con testo specifico