Ich bekomme hier eine Fehlermeldung wenn ich den Pfad zu meiner zweiten Mappe öffnen will.
Ich habe hier versucht selbst was zusammen zustricken. Leider ohne Erfolg.
Wer kann mir hierzu sagen was ich falsch gemacht habe?
Fehler beim kompilieren?
Erwarte Anweisungsende
Private Sub CommandButton2_Click()
Range("B11:J" & Cells(Rows.Count, 2).End(xlUp).Row).AutoFilter Field:=9, Criteria1:="1"
Range("B11:J" & Cells(Rows.Count, 2).End(xlUp).Row).SpecialCells(xlCellTypeVisible).Copy _
Destination:= _
Workbooks.Open "P:\\Filter\Muster\Mappe2.xls" Sheets("Tabelle1").Range("A65536").End(xlUp). _
Offset(1, 0)
End Sub
Gruß Lisa