Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
704to708
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
704to708
704to708
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

automatisch speichern

automatisch speichern
06.12.2005 11: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

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

Betreff
Datum
Anwender
Anzeige
AW: automatisch speichern
06.12.2005 11: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 11:37:47
gio
Danke!
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige