title image


Smiley Re: Textbox-Eintrag
Hallo Paul,nun wäre es gut, zu wissen, welches Makro Du verwendest.Hier ist ein Beispiel, wie Du das Problem lösen könntest:Private Sub TextBox1_Change()Dim i%, Z!, ESpalte%'Zeile, in die eingetragen werden sollZ = 1'Spalte, in die das erste Zeichen der Textbox eingetragen werden sollESpalte = 1'Buchstaben übernehmenRange(Cells(Z, ESpalte), Cells(Z, ESpalte + 35)) = ""For i = 1 To Len(TextBox1.Text)    Cells(Z, ESpalte + i) = Mid(TextBox1.Text, i, 1)Next'Leerstellen setzenFor i = 1 To 35    If Cells(Z, i + ESpalte) = "" Or Cells(Z, i + ESpalte) = " " Then _        Cells(Z, i + ESpalte) = " "NextEnd SubViele GrüßeJörg


geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: