VBA???
25.04.2005 15:56:31
Bigi
dank PeterS funktioniert unten genannter Code einwandfrei
doch eines habe ich noch vergessen.
wenn unten genannter Code ausgeführt wird sollte automatisch der Inhalt
aus Tabelle "Rechnung" Zelle F14 (=HEUTE()) als Wert nicht als Formel
an die unten genannten Zellen angehängt werden also in Spalte E in Tabelle
"RNFr1".
also z.B.
A B E
Huber 89784 21.02.2005
Conrad 89785 23.02.2005
Schiller 89786 25.02.2005
würdet ihr mir bitte helfen?
Gruss
Bigi
Private Sub CommandButton1_Click()
Sheets("Rechnung").[E15] = TextBox1.Value
Sheets("Rechnung").[B11] = ComboBox1.Value
Sheets("Rechnung").Select
Dim z As Integer, myArr As Variant
Dim iCounter As Integer
Sheets("RNFr1").Activate
z = Range("A65536").End(xlUp).Row
Cells(z + 1, 1) = ComboBox1.Value
Cells(z + 1, 3) = TextBox1.Value
Unload UserForm6
End Sub