in der recherche habe ich diesen code gefunden. da ich jedoch alle zeilen bei welchen in der zelle der spalte h ein "x" steht in ein anderes tabellenblatt kopieren möchte muss ich den code anpassen. nun weiss ich leider nicht was ich verändern muss. wäre super, wenn mir das jemand zeigen könnte.
Sub Bei_leer_kopieren()
Columns("H:H").SpecialCells(xlCellTypeBlanks).EntireRow.Copy Destination:=Worksheets("Tabelle2") _
_
.Range("A1")
End Sub
andi