Il faut déterminer le mot (ex. : "toto") puis utiliser la propriété UCase :
Mot = "toto"
var = UCase(Left(Mot, 1)) & Right(Mot, Len(Mot) - 1)
Il faut déterminer le mot (ex. : "toto") puis utiliser la propriété UCase :
Mot = "toto"
var = UCase(Left(Mot, 1)) & Right(Mot, Len(Mot) - 1)