Neue Datei
Stefanglander
ich habe folgendes Problem: Ich möchte gerne mit einem CMB eine neue Datei anlegen.
Dazu habe ich folgendes ausprobiert, abe rirgendwie haut es nicht hin.
Sub Neu1()
Workbooks.Add
Windows("Recherche_Ergebnisse.xls").Activate
Range("D2").Select
Application.Run "STPCSCopy"
Windows("Mappe6").Activate
Sheets("Tabelle1").Select
Sheets("Tabelle1").Name = "Glander, Stefan"
Range("B32").Select
Windows("Recherche_Ergebnisse.xls").Activate
ActiveWindow.ScrollWorkbookTabs Position:=xlFirst
Sheets("Glander, Stefan").Select
Range("D3").Select
Application.CutCopyMode = False
ActiveSheet.Unprotect
Columns("A:L").Select
Application.Run "STPCSCopy"
Windows("Mappe6").Activate
Columns("A:A").Select
ActiveSheet.Paste
Windows("Recherche_Ergebnisse.xls").Activate
ActiveWindow.ScrollWorkbookTabs Position:=xlLast
Sheets("Variablen").Select
End Sub
Die Datei sollte am Ende noch mit dem Namen des Tabellenblattes gespeichert werdenLieben Gruss
Stefan