Damit keine Missverständnisse aufkommen;
Selbstverständlich habe ich das Archiv nach Lösungen durchforstet, leider jedoch ohne fündig zu werden. Meine gestrige Anfrage habe ich offenbar im Betreff zu allgemein formuliert. Deshalb heute noch einmal.
Ich habe folgendes Problem:
die Datenübergabe der mit Spezialfilter ausgewählten Daten funktioniert einwandfrei, solange die Arbeitsmappe nicht freigegeben ist. Nach erfolgter Freigabe bricht Excel die Verarbeitung mit Laufzeitfehler 1004 ab.
Private Sub Worksheet_Activate()
Sheets("Teilnehmer").Range("B6:AS8000"). _
AdvancedFilter Action:=xlFilterCopy, CriteriaRange:=Sheets("Teilnehmer").Range("C1:G5"), _
CopyToRange:=Sheets("Druckdaten").Range("B1:AS52"), Unique:=False
End Sub
Ich benötige eine Lösung, die es mir erlaubt, obenstehende Anweisung in einer freigegebenen Arbeitsmappe zu nutzen.
Über geeignete Vorschläge freue ich mich sehr.
Mit vielem Dank für Eure Mühe verbleibe ich für heute
Hans-Dieter Friedrich