Microsoft Excel

Excel und VBA: Formeln, Programmierung, Lösungen

Die Excel/VBA-Beispiele

Thema

Text aus UserForm in eine Zelle schreiben

Gruppe

TextBox

Problem

Wie kann ich einen TextBox-Wert in einer UserForm während dem Editieren in eine Zelle schreiben lassen?

Lösung
Geben Sie den nachfolgenden Code in das Klassenmodul der UserForm ein.

ClassModule: frmEdit

Private Sub cmdContinue_Click()
   Unload Me
End Sub

Private Sub txtEdit_Change()
   Range("A1").Value = txtEdit.Text
End Sub

Private Sub UserForm_Initialize()
   txtEdit.Text = Range("A1").Value
End Sub

StandardModule: basMain

Sub CallForm()
   frmEdit.Show
End Sub