Fehler bei neuem Workbook m. Macro

Hallo noch einmal,
Eine Verständnisfrage zu frolgendem Sachverhalt:
in Datei 1 werden die Umsätze des ganzen Jahres auf 12 Tabs gesammelt.
Jeweils zum Ende eines Monats soll das aktuelle Monats-Tab separiert werden und mit einer Berechnungsvorlage (hidden Sheet: CCS) in einem neuem Workbook (Datei 2) gespeichert werden.
Diese wird dann an die verschiedene Mgr geschickt, welche daraus Commssionsabrechnungen (Datei 3) für die einzelnen Mitarbeiter erstellen.
In der Datei 1 ist ein Macro in Module2 hinterlegt, welches den Kopiervorgang zu Datei 2 erledigt.
Bisher hatte ich das Macro für die Kommissionsberechung in einem allgemeinen Module der Datei 1, da lief auch alles bestens. Nur seit dem ich den Schritt mit der Erstellung der 2. Datei habe, komme ich nicht mehr zurecht.
Ich hatte, das Macro direkt auf dem Tabellenblatt hinterlegt. Dann bekomme ich aber eine Fehlermeldung "400".
Wo und wie muss ich das Macro hinterlegen, damit ich es bei der Erstellung der Datei 2 zur Verfügung habe, aber nicht mehr in der Datei 3 dabei ist. Diese soll eine Code-freie Datei sein.
Würde mich über eine nochmalige Unterstützung freuen.
Die Datei1 habe ich hochgeladen. Der Tab "Work-Tab" ist zum testen.
https://www.herber.de/bbs/user/81390.xlsm
Vielen Dank
Gert

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Benutzer

' insert Name of Employee ' Mit dem "'" wird der Ausdruck in einen Text umgewandelt. ' Mit der Right$-Anweisung wird nur noch das = am Anfang von Criteria1 gelöscht. With ActiveWorkbook.Worksheets(varWShOrigin) Range("Cell_NameStaff").Value = "'" & Right$("" & .AutoFilter.Filters(varFiltCol). _ Criteria1, Len(.AutoFilter.Filters(varFiltCol).Criteria1) - 1) varStaffNa = Range("Cell_NameStaff").Value

Nein leider nicht ganz, richtig.
In Datei 1 gibt es einen Button, der per Macro ein Montas-Tab und eine Sheet als Berechnungsform in eine neue Datei 2 kopiert.
(Die erste ist zu groß um sie zu verschicken)
Die Datei 2 wird an verschiedene Mgr geschickt, die mit dieser die ProvAbrg für MA's machen.
Dafür gibt es auf dem Monats-Tab einen 2. Buton "Copy Data ..." das Macro hierzu existiet in Datei 1 schon.
Dieses öffnet das versteckte Abrechungsform,
setzte die über Auto-Filter selektierten Daten ein und
kopiert dann das entstanden Sheet in einen neuen/separaten File.
Das ist nötig, weil mit dieser Vorgang mehrmals mit unterschiedlichen Filterungen durchgeführt werden muss und das Template so geschütz ist.
Wenn nun der 2. Button gedrückt spricht das makro aber den ursprünglichen File an.
hier noch einmal der Link zu dem Problemfall.
https://www.herber.de/bbs/user/81390.xlsm
Als erstes "Copy Period-Sheet)
ergibt einen neuen File
dann "Copy Data to ...."
und dann ist mein Problem schon da.
Grüße
Gert

Beliebteste Forumthreads (12 Monate)

Fehler bei neuem Workbook m. Macro

8 Beiträge zum Forumthread Beiträge zu diesem Forumthread

VBA Beispiele zu verwandten Themen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

8
Beiträge zum Forumthread

Beiträge zu diesem Forumthread