La funzione Right di VBA restituisce una sottostringa dalla fine di una stringa fornita.
Right( Str, Length )
Str | La stringa originale da cui estrarre una sottostringa | |
Length | La lunghezza della sottostringa |
Esempio 1
' Estrai una sottostringa di lunghezza 7 dalla fine
' della stringa "Papa Giovanni Paolo Secondo"
Dim res As String
res = Right( "Papa Giovanni Paolo Secondo", 7 )
'La variabile res ora è uguale alla stringa di testo "Secondo"
Nell’esempio precedente, la funzione VBA Right restituisce il risultato “Secondo”.
Esempio 2
' Estrai una sottostringa di lunghezza 13 dalla fine
' della stringa "Papa Giovanni Paolo Secondo"
Dim res As String
res = Right( "Papa Giovanni Paolo Secondo", 13 )
'La variabile res ora è uguale alla stringa di testo "Paolo Secondo"
Nell’esempio precedente, la funzione VBA Right restituisce il risultato “Paolo Secondo”.
Esempio 3
' Estrai l'ultima parte della stringa "Papa Giovanni Paolo Secondo"
' partendo dopo l'ultimo spazio
Dim pos As Integer
Dim strlen As Integer
Dim res As String
pos = InStrRev( "Papa Giovanni Paolo Secondo", " " )
strLen = Len( "Papa Giovanni Paolo Secondo" )
res = Right( "Papa Giovanni Paolo Secondo", strLen - pos )
'Ora, la variabile pos = 20, strLen = 27 e res = "Secondo"
Nell’esempio qua sopra:
- La funzione InStrRev di VBA viene utilizzata per trovare la posizione del primo spazio. Ciò restituisce il valore 20, che è memorizzato nella variabile pos.
- La funzione Len di VBA è usata per trovare la lunghezza della stringa “Papa Giovanni Paolo Secondo”. Essa restituisce un risultato di 27, che viene memorizzato nella variabile strLen
- La funzione Right di VBA utilizza il valore strLen – pos come argomento Length. Restituisce quindi tutti i caratteri dopo (ma escluso) l’ultimo spazio.. Quindi la funzione restituisce la sottostringa “Secondo”.