|
Hallo,
Ich habe eine UserFom welche ich zum Befüllen einer Tabelle nutzen möchte. Ich möchte diese UserForm aufrufen wenn ich in eine Bestimmte Zelle klicke. Dann Soll die Userfom mir die aktive Zelle und die Zelle daneben mit Werten befüllen. Soweit kein Prolblem das ist der Code Dafür:
Private Sub CommandButton1_Click()
Tabelle3.Cells(6, 2).Value = ListBox1.Value
Tabelle3.Cells(6, 3).Value = TextBox_Menge * 1
Unload UserForm1
End Sub
Die Userform ist eine Listbox wo ich ein bestimtes Produkt aussuche und eine Menge dazu eintrage. bei klick auf den Comand Button befüllt mir die UserForm dann Zeile 6 Spalte 2 (B2) mit dem Wert und Zeile 6 Spalte 3 (B3) mit der eingegebenen Menge.
Ich möchte jetzt die gleiche UserForm aber für 11 Weitere Zellen abrufen können und bei Klick auf den Comand Button sollen dann die Jeweiligen Zellen befüllt werden.
Der Zellenbereich den ich anwählen möchte ist Zeile 6 bis Zeile 17. Und befüllt werden sollen eben immer Spalte 2 und 3
Aber es soll in jede Zeile eben immer ein individueller Wert ausgewählt werden können und nicht in jede Zeile der gleiche Wert.
Wie kann ich das anstellen?
Ich hoffe es ist verständlich beschrieben.
Vielen Dank für die Zeit und Mühe.
VG
|