title image


Smiley Textboxinhalt in Tabelle übertragen
Hallo Manfred,so komisch es auch klingen mag,aber multipliziere den Wert während des Übertragesin die Tabelle mal mit 1 :-)Private Sub UserForm_Activate()   TextBox1.Text = Sheets("Tabelle1").[A1]End SubPrivate Sub CommandButton1_Click()   Sheets("Tabelle1").[A1] = TextBox1.Text * 1End Sub 

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: