Liebes Forum,
Ich suche eine Lösung für folgende Problemstellung:
Von einer Tabelle im Spreadsheet A möchte ich ganze Zeilen in Spreadsheet B übertragen sofern Sie in einer spezifischen Spalte im Spreadsheet A Werte > 5 aufweisen. Irgendwie scheint mein Cood nicht zu fuktionieren:
Sub Filterung()
If ActiveCell.Cells(ab19) >= 15 Then
Sheets("main").Range("b19:ab19").Copy Destionation:=Sheets("selection").Range("b1:ab19")
End If
End Sub
Was habe ich falsche eingegeben? Danke im Voraus für eure Hilfe.
Gruss
Serge
|