WorksheetFunction.Dbcs (Excel)

Cette méthode convertit les caractères à demi-chasse (un seul octet) en une chaîne de caractères à pleine chasse (sur deux octets). Le nom de la fonction (et les caractères qu'elle convertit) dépend des paramètres de langue. String en lecture/écriture.

Dbcs (Arg1)

Arg1: Texte ou référence à une cellule contenant le texte à modifier.

Dim strArg1 As String: strArg1 = 
Dim strDbcs As String
strDbcs = WorksheetFunction.Dbcs(Arg1:=strArg1)