Fonction Left

Renvoie le nombre spécifié de caractères se situant le plus à gauche dans une expression au format chaîne de caractères.

Syntaxe :


Left (string As String, length As Long) As String

Valeur de retour :

Chaîne de caractères

Paramètres :

string : toute expression de chaîne dont les caractères les plus à gauche sont à renvoyer.

length : expression numérique qui spécifie le nombre de caractères à renvoyer. Si length = 0, une chaîne de longueur nulle est renvoyée. La valeur maximale autorisée est de 2 147 483 648.

L'exemple suivant convertit une date au format AAAA.MM.JJ en une date au format 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

Aidez-nous !