Office: Text aus Makro-Textfeld in Zelle

Hi,

ich habe ein kleines Problem, dass für jemanden, der sich mit VBA auskennt wahrscheinlich keine Hürde darstellen wird:

Ich habe ein Eingabemodul gebaut, dass ein Textfeld hat, in dem ein Name eingegeben werden soll. Dann soll Excel zu einer bestimmten Zelle springen (das habe ich schon hinbekommen) und dann in dieser Zelle das eintragen, was in dem Textfeld steht. Könnt ihr mir da weiterhelfen? Arbeite mit Excel 2007.

 

Hallo!

Im Prinzip einfach so:
Range("A1") = TextBox1

 

Hallo,

ich nehme an, dass Du eine Userform gebaut hast, in die Du ein Textfeld (zB. mit Namen "TextBox1") aufgenommen hast, ferner einen Befehlsschalter (Button) z.B. mit Namen "BefehlZelleingabe".

Ich nehme an, dass Du mit "zu einer bestimmten Zelle springen" meinst, dass Du die aktive Zelle in eine bestimmte Zelle eines bestimmten Arbeitsblattes platzieren willst (zB. Arbeitsblatt "Tabelle1" in Zelle "B10").

Dann müsste das Makro, das zum Klick-Ereignis des Buttons "BefehlZeilleingabe" gehört, folgendermaßen lauten:

Code:

Private Sub BefehlZelleingabe_Click()
  With Worksheets("Tabelle1").Range("B10")
    .Select
    .Value = Me!TextBox1.Value
  End With
End Sub

 

Hab's gepackt. Vielen Dank für die flotte Hilfe!