La funzione Mid di VBA restituisce una sottostringa dall’interno di una stringa fornita. L’utente specifica la posizione iniziale e la lunghezza della sottostringa.
Mid( Str, Start, [Length] )
Str | La stringa originale da cui estrarre una sottostringa | |
Start | La posizione di partenza della sottostringa | |
[Length] | Un argomento facoltativo che rappresenta la lunghezza della sottostringa. Se l'argomento [Lenght] viene omesso, la funzione Mid restituisce tutti i caratteri dalla posizione iniziale alla fine della stringa. |
Esempio 1
' Estrai una sottostringa dalla stringa "Papa Giovanni Paolo Secondo"
' a partire dalla posizione 6, con lunghezza 8
Dim res As String
res = Mid( "Papa Giovanni Paolo Secondo", 6, 8 )
'La variabile res ora è uguale alla stringa di testo "Giovanni"
Nell’esempio precedente, la funzione VBA Mid restituisce il risultato “Giovanni”.
Esempio 2
' Estrai l'ultima parte della stringa "Papa Giovanni Paolo Secondo"
' partendo dalla posizione 21
Dim res As String
res = Mid( "Papa Giovanni Paolo Secondo", 21 )
'Ora, la variabile res è uguale alla stringa "Secondo"
Nell’esempio precedente, l’argomento [Lenght] viene omesso e quindi la funzione Mid di VBA restituisce tutti i caratteri dalla posizione iniziale fornita alla fine della stringa. Pertanto, la funzione restituisce la sottostringa “Secondo”.