Excel Datei kopieren / Kopie öffnen

[Rabe]

Hi,

für die von Uwe vorgeschlagene Lösung benötigt man tatsächlich keine xltm, das geht mit einer normalen xlsb, xlsx, xlsm.

Bei mir hat das Makro die aufrufende Datei nur mit Angabe der Extension geschlossen.

Option Explicit

Sub Aufruf()
   ' 
   ' 
   ' 
   
   ' 
   'Workbooks.Add "G:\AsienMusterAllg.xlsb" 
   Workbooks.Add ThisWorkbook.Path & "\AsienMusterAllg.xlsb"
   'Workbooks.Add ThisWorkbook.Path & "\AsienMusterAllg.xltm" 
   
   Workbooks("Asien.xlsb").Close SaveChanges:=True
End Sub

[papabaer]

Hi Rabe,

danke für deinen Tip, habe es gleich getestet, es funktioniert super.
Ich habe keine Probleme, bei mir sind alle xlsm Dateien auch die aufgerufene Kopie, klappt einfach super,
Aber wie es so ist im Leben, dass nächste Problem wartet schon.

Bin gerade auf der Suche nach einem Makro mit dem ich die Datei mittels InputBox umbennenen kann.
Habe schon was gefunden, momentan aber viele viele ?????, bin aber noch beim probieren,
sicherlich werde ich deine bzw. eure Hilfe noch einmal benötigen,

mfG  Christian

[Rabe]

Hi Christian,

xlsb ist meiner Meinung nach besser:
üblicherweise nur 1/2 bis 1/3 so groß.

[papabaer]

Hallo Uwe,

danke für den Hinweis

[papabaer]

Hi Uwe

habe mich zu früh gefreut und meine Brille nicht aufgehabt.
ich habe folgende Variante getestet

            Workbooks.Add ThisWorkbook.Phad & "\AsienMusterAllg.xlsm"
            Workbooks("Asien"). Close SaveChanges:=True

es funktioniert einwndfrei, bis zum abspeichert. Das abspeichern funktioniert nicht weil im
VBAProjekt der Dateityp, egal welchen ich nehme, nicht übernommen wird. Angezeigt wird:

            VBAProjekt(AsienMusterAllg1)

Was mache ich falsch bzw. wo steckt der Fehler ???

mfG Christian

[Kuwer]

Hallo Christian,

wie sich das mit dem neuen Dateinamen verhält beim Öffnen einer Vorlage, hat Rabe in #6 ja schon erklärt. Dieses Verhalten ist identisch, wenn man eine Datei, die keine Vorlagenendung hat, als Vorlage verwendet, wie es hier der Fall ist.

Gruß Uwe

[papabaer]

Hallo Uwe

du hast Recht, man sollte eben ab und an mal seine Gedanken ordnen.
Entschuldige bitte das ich mich erst jetzt melde, aber es hat mir keine Ruhe gelassen, dass es nicht möglich sein
soll mittels Makro eine Musterdatei zu kopieren, umzubenennen und abzuspeichern. Ich habe Stundenlang im Internet
gesucht und auch etwas gefunden. Das Makro soll funktionieren, bei mir wie zu erwarten nicht. 
Werde mich in Kürze mit neuem Beitrag "Musterdatei kopiere, umbenennen und speichern" um Hilfe melden.

Nochmals vielen Dank und ein schönes Osterfest
mfG. Christian