Fonction Right

Renvoie les "n" caractères le plus à droite d'une expression au format chaîne de caractères.

Voir aussi : Fonction Left.

Syntaxe :


Right (string As String, length As Long)

Valeur de retour :

Chaîne de caractères

Paramètres :

string: Any string expression that you want to return the rightmost characters of.

length: Numeric expression that defines the number of characters that you want to return. If length = 0, a zero-length string is returned. The maximum allowed value is 2,147,483,648.

L'exemple suivant convertit une date au format AAAA-MM-JJ en une date au format américain (MM/JJ/AAAA).

Codes d'erreur :

5 appel de procédure incorrect

Exemple :


Sub ExampleUSDate
Dim sInput As String
Dim sUS_date As String
    sInput = InputBox("Insérez une date au format international 'AAAA-MM-JJ'")
    sUS_date = Mid(sInput, 6, 2)
    sUS_date = sUS_date & "/"
    sUS_date = sUS_date & Right(sInput, 2)
    sUS_date = sUS_date & "/"
    sUS_date = sUS_date & Left(sInput, 4)
    MsgBox sUS_date
End Sub