Ich möchte eine Zeile in der fertig steht mit Knopfdruck auf einen Button oder vielleicht automatisch mit worksheet change sobald fertig reingeschrieben wird in eine neue Tabelle (Tabelle2) übertragen.
Ich habe etwas gefunden was funktioniert, aber immer wenn ich auf den Button klicke markiert er mir ohne Grund die ganze 2 Zeile?
Und wieso in ZeileMax eine 25 drin steht versteh ich auch nicht.
With Tabelle3
ZeileMax = .UsedRange.Rows.Count
n = 1
For Zeile = 2 To ZeileMax
If Tabelle3.Cells(Zeile, 6).Value = "fertig" Then
Tabelle3.Rows(Zeile).Copy Destination:=Tabelle2.Rows(n)
n = n + 1
End With
...
Danke und lg,
Lia