Bonjour à tous
Mara58, rien ne dit que la date du textbox doive être ensuite renvoyée dans une cellule, il se peut que le userform serve à rechercher des données, par exemple…
Donc pour répondre directement à la question de Tchango qui choisira ensuite ce qu'il trouvera adéquate pour son utilisation, on peut utiliser Mid pour trouver le nième caractère:
Mid(TextBox1,n,1)
Plus dans le détail, l'instruction Mid remplace un nombre indiqué de caractères dans une variable de type Variant (String) par des caractères extraits d'une autre chaîne.
Mid(stringvar, start[, length])
stringvar: nom de la variable chaîne à modifier.
start: donnée de type Variant (Long). Position du caractère dans l'argument stringvar où commence le remplacement de texte.
length: (Facultatif) Donnée de type Variant (Long). Nombre de caractères à remplacer. Si ce paramètre est omis, la totalité de l'argument string est utilisée.
Bonne journée.