Ich stehe vor einem Riesenproblem und brauche dringend Hilfe.
Kann mir jemand sagen, warum dieser Code nur funktioniert, wenn er in der Datei und dem Tabellenblatt ausgeführt wird, wo sich der CommandButton befindet(das wäre "Datei1.xls","Tabelle1")? Ich habe schon versucht die "Datei2.xls" vorher zu aktivieren, aber das funktioniert auch nicht. Ziel meiner Bemühungen ist es, den beschriebenen Bereich eines Tabellenblattes, einer im Hintergrund geöffneten Datei, zu markieren und anschließend zu kopieren. Ich scheitere schon bei der Markierung.
Windows("Datei2.xls").Activate
Sheets("Tabelle1").Select
Dim lngLetzteZeile As Long
lngLetzteZeile = Workbooks("Datei2.xls").Worksheets("Tabelle1").Range("A65536").End(xlUp).Row
Workbooks("Datei2.xls").Worksheets("Tabelle1").Range(Cells(3, 1), Cells(lngLetzteZeile, 1)).Select
Vielen Dank für Eure Hilfe!!!
Die Lisa