Gruppe
Dialog
Problem
Wie kann ich einen UserForm-TextBox-Wert in Abhängigket zu der die UserForm aufrufenden Schaltfläche in Zellen eintragen lassen?
ClassModule: Tabelle1
Private Sub cmdButtonA_Click()
frmEintragen.Tag = "A1"
frmEintragen.Show
End Sub
Private Sub cmdButtonB_Click()
frmEintragen.Tag = "A2"
frmEintragen.Show
End Sub
Private Sub cmdButtonC_Click()
frmEintragen.Tag = "A3"
frmEintragen.Show
End Sub
ClassModule: frmEintragen
Private Sub cmdEintragen_Click()
Range(Me.Tag).Value = txtEintragen.Value
Unload Me
End Sub