durch den unten stehenden Code möchte ich einen String solange auffüllen bis er 12-stellig ist.
Jedoch wird im letzten Schritt die Zelle nicht durch den neuen 12-stelligen String (überschriebene Variable) ersetzt.
Woran kann das Liegen?
Vielen Dank im Voraus!
Dim CO_Auftrag As String
CO_Auftrag = Range("E43").Value
While Len(CO_Auftrag) < 12
CO_Auftrag = "0" + CO_Auftrag
Wend
Range("E43").Value = CO_Auftrag