Come invertire una stringa in vba (con esempio)

È possibile utilizzare la funzione StrReverse in VBA per invertire una stringa di testo.

Ecco un modo comune per utilizzare questa funzione nella pratica:

 SubReverseStrings ()
    
Dim i As Integer

For i = 2 To 11
    Range("B" & i) = StrReverse(Range("A" & i))
Next i

End Sub

Questo esempio particolare inverte 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: come invertire le stringhe utilizzando VBA

Supponiamo di avere la seguente colonna di nomi di squadre di basket in Excel:

Supponiamo di voler invertire il nome di ciascuna squadra e visualizzare i risultati nella cella corrispondente della colonna B.

Per fare ciò possiamo creare la seguente macro:

 SubReverseStrings ()
    
Dim i As Integer

For i = 2 To 11
    Range("B" & i) = StrReverse(Range("A" & i))
Next i

End Sub

Quando eseguiamo questa macro, riceviamo il seguente output:

La colonna B mostra il nome di ogni squadra nella colonna A all’indietro.

Per esempio:

• Mavs diventa svaM
• Gli Spurs diventano SrupS
• I razzi diventano stekcoR
• Kings diventa sgniK

E così via.

Tieni presente che la funzione StrReverse funziona anche con i numeri.

Ad esempio, applicando la funzione StrReverse al numero 1234 si restituirebbe 4321 .

Risorse addizionali

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

VBA: come verificare se una stringa contiene un’altra stringa
VBA: come contare il numero di righe nell’intervallo
VBA: come scrivere le funzioni COUNTIF e COUNTIFS