VBA-Programmierung in Microsoft Excel

Tutorial: Excel-Beispiele

Wert in Abhängigkeit der aufrufenden Schaltfläche eintragen

Gruppe

Dialog

Bereich

CommandButton

Thema

Wert in Abhängigkeit der aufrufenden Schaltfläche eintragen

Problem

Wie kann ich einen UserForm-TextBox-Wert in Abhängigket zu der die UserForm aufrufenden Schaltfläche in Zellen eintragen lassen?

Lösung

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




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

    


Beiträge aus dem Excel-Forum zu den Themen Dialog und CommandButton