Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1852to1856
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

markieren, kopieren, ext. Mappe/Sheet

markieren, kopieren, ext. Mappe/Sheet
29.10.2021 00:41:23
Fred
Hallo Excel Profis,
0:30h und ich steh auf dem Schlauch.
Ich habe eine weitere Arbeitsmappe geöffnet und möchte dort u.a. eine Formel eintagen (ID) und runterkopieren.

LZ_ee = wbZiel.Sheets("data1").Cells(Rows.Count, 1).End(xlUp).Row
wbZiel.Sheets("data1").Range("A2").FormulaLocal = "=ZEILE()-1"
With wbZiel.Worksheets("data1")
.Range("a2:a2").AutoFill Destination:=Range("a2:a" & LZ_dd), Type:=xlFillDefault  ' gelb, kann nicht ausgeführt werden.
End With
Wo ist der Fehler?
Gruss
Fred

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: markieren, kopieren, ext. Mappe/Sheet
29.10.2021 00:46:07
Fred
.. pfff
hier such ich den Fehler

LZ_ee = wbZiel.Sheets("data1").Cells(Rows.Count, 1).End(xlUp).Row
wbZiel.Sheets("data1").Range("A2").FormulaLocal = "=ZEILE()-1"
With wbZiel.Worksheets("data1")  ' Formeln werden nach unten gezogen
.Range("a2:a2").AutoFill Destination:=Range("a2:a" & LZ_ee), Type:=xlFillDefault
End With

markieren, kopieren, ext. Mappe/Sheet - erledigt
29.10.2021 01:17:21
Fred
... ich hatte zuvor im Makro

wbZiel.Activate
mit

wbZiel.Sheets("data1").Activate
funzt es
...
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige