Office: (Office 2010) Prüfen ob Excel Datei gespeichert wurde

Ich habe ein Excel Add-In geschrieben, dass alle "Speichern" und "Speichern Unter" Dialoge abfängt und selbst implementiert. Das funktioniert dank der Hilfe hier aus dem Forum gut.

Folgendes fehlt mir noch: Standardmässig erkennt Excel ob eine Datei schon einmal gespeichert wurde. Wenn ja wird ohne Dialog auf den bestehenden Namen gespeichert. Wenn nicht erscheint der "Speichern Unter" Dialog. Wie kann ich diese Funktionalität nachbauen? Irgendwie muss ich herausfinden, ob die Datei schon einmal gespeichert wurde oder nicht.

:)

 

hallo!
ich würde an deiner stelle die datei-eigenschaften überprüfen (activeworkbook.builtinDocumentProperties)
lg m

 

Vielen Dank, das sieht erfolgversprechend aus!

Ich habe hier eine ganze Liste von Eigenschaften gefunden. Aber mit welcher könnte ich den herausfinden, ob die Datei schon einmal gespeichert wurde?

 

hello!
lt. vba hilfe müsste es "Last Save Time" geben...
bzw. weiß ich, dass wenn man den dateinamen via formel abfragt und die file noch nicht gespeichert wurde ein fehler geliefert wird (UPDATE) und ich vermute, dass das in vba auch so sein wird (/UPDATE)

die formel wäre übrigens:
=TEIL(ZELLE("Dateiname"); SUCHEN("["; ZELLE("Dateiname"))+1; SUCHEN("]"; ZELLE("Dateiname"))- SUCHEN("["; ZELLE("Dateiname")) -1)

würde sich zur not für einen work-around anbieten... wenn(istfehler(....

 

Hallo,

prüfe die Eigenschaft Saved des betreffenden Workbooks.

Grüße
EarlFred

P.S.: Grußformeln wären nett.

 

Grüezi zusammen

Oder prüfen ob Thisworkbook.Path leer ist, das ist dann der Fall, wenn die Mappe aus einer Vorlage erstellt und noch nicht gespeichert worden ist.

 

Hi Anton,

wenn die Datei normalerweise als XLSX oder XLSM gespeichert werden soll, kannst du auch abfragen, ob der Dateiname .XLSX oder .XLSM enthält
Code:

 

Hallo EarlFred

Saved ist leider auch auf falsch gesetzt, wenn die Datei geändert wurde, aber schon einmal gespeichert wurde. Das ist in meinem Fall leider nutzlos.

Viele Grüsse
Anton

 

Hallo Anton,

da habe ich wohl nicht richtig gelesen.
Aus der Kombination mit dem Eigenschaftswert von ThisWorkbook.Saved (Datei gegenüber dem Urzustand geändert?) und Thomas' Hinweis auf ThisWorkbook.Path > "" solltest Du das aber sicher hinbekommen.

Grüße
EarlFred

 

was ist mit der last save time ... sollte das nicht einfacher & eindeutiger sein?
lg m

 

Hallo zusammen

Danke für eure Hilfe! Ich prüfe jetzt den Path, das scheint soweit gut zu funktionieren.

Viele Grüsse
Anton