Gruppe
Dialog
Bereich
TextBox
Thema
Textvariable in eine UserForm-TextBox eintragen
Problem
Wie kann ich eine öffentliche Textvariable über eine Schaltfläche in eine UserForm-Textbox eintragen lassen?
Lösung
Geben Sie den nachfolgenden Code in das Klassenmodul der UserForm ein.
ClassModule: frmTest
Private Sub cmdTest_Click()
txtTest.Text = sTest
End Sub
Private Sub cmdWeiter_Click()
Unload Me
End Sub
StandardModule: basMain
Public sTest As String
Sub CallForm()
sTest = "Hallo"
frmTest.Show
End Sub