Vba: come rimuovere l'ultimo carattere da una stringa

È possibile utilizzare la seguente sintassi di base per rimuovere l’ultimo carattere da una stringa utilizzando VBA:

 Sub RemoveLastChar()

    Dim i As Integer
    Dim myString As String

    For i = 2 To 11
    myString = Range(" A " & i)
    Range(" B " & i) = Left(myString, Len(myString) - 1)
    Next i
    
End Sub

Questo esempio particolare rimuove l’ultimo carattere da ogni stringa nell’intervallo A2:A11 e visualizza i risultati nell’intervallo B2:B11 .

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

Esempio: utilizzo di VBA per rimuovere l’ultimo carattere dalle stringhe

Supponiamo di avere il seguente elenco di nomi di squadre di basket in Excel:

Diciamo che vogliamo rimuovere l’ultimo carattere dal nome di ogni squadra.

Per fare ciò possiamo creare la seguente macro:

 Sub RemoveLastChar()

    Dim i As Integer
    Dim myString As String

    For i = 2 To 11
    myString = Range(" A " & i)
    Range(" B " & i) = Left(myString, Len(myString) - 1)
    Next i
    
End Sub

Quando eseguiamo questa macro, riceviamo il seguente output:

La colonna B visualizza ciascuna delle stringhe nella colonna A con l’ultimo carattere rimosso.

Se invece vuoi rimuovere gli ultimi n caratteri da una stringa, sostituisci semplicemente l’ 1 nel metodo Left con un numero diverso.

Ad esempio, possiamo creare la seguente macro per rimuovere gli ultimi 2 caratteri da una stringa:

 Sub RemoveLastTwoChar()

    Dim i As Integer
    Dim myString As String

    For i = 2 To 11
    myString = Range(" A " & i)
    Range(" B " & i) = Left(myString, Len(myString) - 2)
    Next i
    
End Sub

Quando eseguiamo questa macro, riceviamo il seguente output:

La colonna B visualizza ciascuna delle stringhe nella colonna A con gli ultimi due caratteri rimossi.

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

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