title image


Smiley EINE Lösung:
Sub MitBlanksFuellen() Dim Hintengefuellt As String Dim Vornegefuellt As String Dim Zeichenfolge As String Zeichenfolge = "kdhglkdrrg" Vornegefuellt = Zeichenfolge Hintengefuellt = Zeichenfolge Do While Len(Vornegefuellt) Vornegefuellt = " " & Vornegefuellt Loop Do While Len(Hintengefuellt) Hintengefuellt = Hintengefuellt & " " Loop Debug.Print Vornegefuellt Debug.Print Hintengefuellt End SubGrußHelmut

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: