Hallo Zusammen,
Ich hab ein Problem. Ich würde gern durch das schreiben einer 1 hinter meiner Materialsammlung per Knopfdruck alle gewählten Zeilen in eine Zusammengestellte Tabelle einfügen.
Die Materialsammlung bei der ich auswähle ist in Tabelle zwei und wird dann per Knopfdruck abgefragt. Die markierten sollen dann in Tabelle 1 in eine Tabelle eingefügt werden.
Da ich aber mit Variablen Arbeite ist das schwieriger als gedacht
Hier mein code zum verdeutlichen
Private Sub CommandButton1_Click()
Dim strBereich As Range Dim x As Integer
For x = 3 To 60 If Worksheets(2).Cells(x, 10) = "1" Then
Worksheets(1).Range(Cells(x, 2), Cells(x, 9))=Worksheets(2).Range(Cells(x, 1), Cells(x, 8))
End If Next x
End Sub
funktioniert leider aber nicht.
Bitte im Hilfe