Office: (Office 2013) Daten aus Textfeld in Zelle (VBA)

Hey, ich habe eine Schaltfläche und möchte wenn ich Sie drücke, dass das aktuelle Datum in Zelle E2 geschrieben wird und der Text, der in TextBox1 steht in Zelle C2 geschrieben wird.

Das Datum funktioniert, der Eintrag aus der Textbox1 nicht.

Code:

Sub Schaltflaeche1()
ThisWorkbook.Sheets("Tabelle2").Range("C2").Value = TextBox1.Text
ThisWorkbook.Sheets("Tabelle2").Range("E2").Value = Date
End Sub

Hat jemand ne Idee was ich falsch mache?? Habe keine Ahnung von VBA und bastel mit Codeschnipsel aus dem Internet, die ich so gut wie möglich anpasse.

LG
Dicken

 

Ich hab es selber herausgefunden :)

Code:

Sub Schaltflaeche1()
ThisWorkbook.Sheets("Internetseiten").Range("C2").Value = ThisWorkbook.Sheets("Internetseiten").TextBox1.Value
ThisWorkbook.Sheets("Tabelle2").Range("E2").Value = Date
End Sub

so geht es :)