Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Anzeige
Inhaltsverzeichnis

automatisch speichern

Forumthread: automatisch speichern

automatisch speichern
06.12.2005 12:12:08
gio
Hallo,
erst mal einen schönen guten tag.
Nun zu meiner Frage:
wie kann ich unteres Makro so umstellen, daß wenn das angegebene Verzeichnis nicht existiert einfach alternativ C: herangezogen wird.
Besten Dank
gio

Sub DateiSpeichern()
ActiveWorkbook.SaveAs "C:\Programme\Angebote\" & Range("K1")
End Sub

Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: automatisch speichern
06.12.2005 12:23:35
Daniel
Hallo gio,
versuchs mal so:

Sub DateiSpeichern()
If Dir("C:\Programme\Angebote\" & Range("K1")) = Range("K1") Then
ActiveWorkbook.SaveAs "C:\Programme\Angebote\" & Range("K1")
Endif
End Sub

Hoffe es hilft
Gruss
Daniel
AW: automatisch speichern
06.12.2005 12:37:47
gio
Danke!
Anzeige
Anzeige
Anzeige
Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.05.2026 13:31:09
14.05.2026 09:50:42
13.05.2026 19:14:18