es hat sich noch ein weiteres Problem aufgetan. Ich möchte anstatt einem Tabellenblatt aus einer Mappe zwei oder mehr speichern. Für eines habe ich ja folgendes Makro:
Sub DateiKopieren()
Dim Datei
Dim sicherung
Dim kst_stelle
Dim strVerzeichnis
kst_stelle = Range("B1")
Datei = "Personalkostenplanung_HSR_"
sicherung = Datei & kst_stelle & ".xls"
strVerzeichnis = sicherung
ActiveWorkbook.Worksheets("Tabelle1").Copy
ActiveWorkbook.SaveCopyAs strVerzeichnis
End Sub
Kann ich dieses irgendwie modifizieren oder gibt es für mein Problem keine so einfache Lösung?
Gruß und vielen Dank im Voraus
Thorsten