|
Hi,
erstmal DANKE! Noch stimmt aber was nicht.
Meine Erkenntnisse hieraus: Tabellenblatt "Info" muss das letzte Blatt in der Mappe sein --> passt
Bei der Ausführung passiert es (komischer Weise nicht immer), dass ein Fehlerhinweis kommt: "Laufzeitfehler 1004: Hierdurch wird ein gefilterter Bereich in Ihrem Arbeitsblatt geändert. Um diesen Vorgang abzuschließen, entfernen Siem bitte die AutoFilter."
Set obj = Range.Worksheet.ListObjects.Add(xlSrcRange, Range, , xlYes)
--> ggf. muss vorher "entfiltert" werden. --> wäre auch kein Thema, müsste doch aber auch so gehen. Deswegen hatte ich in der "manuellen" Variante nach dem Löschen der Zeile 1-17 A1 markiert und dann erst in eine intelligente Tabelle geändert.
Läuft denn das Makro hier nicht von "oben nach unten" durch? Da das Löschen der Zeilen erst zum Schluss kommt.
Danke und Grüße!
|