WorksheetFunction.Dbcs (Excel)
Konvertiert Zeichen mit halber Breite (Einzelbytezeichen) in einer Zeichenfolge in Zeichen mit normaler Breite (Doppelbytezeichen).
Dbcs (Arg1)
Arg1: Der Text oder ein Bezug auf eine Zelle mit dem zu ändernden Text.
Dim strArg1 As String: strArg1 =
Dim strDbcs As String
strDbcs = WorksheetFunction.Dbcs(Arg1:=strArg1)