Vba: come rimuovere gli spazi da una stringa

È possibile utilizzare la seguente sintassi di base per rimuovere spazi da una stringa utilizzando VBA:

 SubRemoveSpaces ()

    Dim i As Integer

    For i = 2 To 8
    Range(" B " & i) = Replace(Range(" A " & i), " ", "")
    Next i
    
End Sub

Questo particolare esempio rimuove gli spazi da ogni stringa nell’intervallo A2:A8 e visualizza i risultati nell’intervallo B2:B8 .

L’esempio seguente mostra come utilizzare questa sintassi nella pratica.

Esempio: utilizzo di VBA per rimuovere gli spazi dalle stringhe

Supponiamo di avere il seguente elenco di stringhe in Excel:

Supponiamo di voler rimuovere gli spazi da ogni stringa.

Per fare ciò possiamo creare la seguente macro:

 SubRemoveSpaces ()

    Dim i As Integer

    For i = 2 To 8
    Range(" B " & i) = Replace(Range(" A " & i), " ", "")
    Next i
    
End Sub

Quando eseguiamo questa macro, riceviamo il seguente output:

La colonna B visualizza ciascuna delle stringhe nella colonna A con gli spazi rimossi.

Nota : qui è possibile trovare la documentazione completa per il metodo VBA Sostituisci .

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