Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
732to736
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
732to736
732to736
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Datei speichern

Datei speichern
14.02.2006 17:23:51
F Zap
Hallo,
hier im Forum habe ich diesen Code
zum speichern gefunden, und habe da noch ein Problem mit.
Falls schon eine Datei mit dem selben
Namen existiert, kommt eine MsgBox die mich darauf hinweist.
Diese kann ich mit Yes, No und Cancel bestätigen.
Bei bestätigen mit No oder Cancel kommt eine Fehlermeldung.
Wie muß der Code verändert werden, damit er
funktioniert ???

Private Sub CommandButton1_Click()
Dim pfad$, fname$
pfad = Range("A1")
fname = Range("a2")
ActiveWorkbook.SaveAs pfad & fname
End Sub

Mit freundlichen Grüssen Frank

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

Betreff
Datum
Anwender
Anzeige
AW: Datei speichern
14.02.2006 17:26:27
Horst

Private Sub CommandButton1_Click()
Dim pfad$, fname$
pfad = Range("A1")
fname = Range("a2")
On error resume next
ActiveWorkbook.SaveAs pfad & fname
End Sub

Die brutale Methode.
mfg Horst
AW: Datei speichern
14.02.2006 17:39:05
F Zap
Hallo Horst,
vielen Dank, das funktioniert.
Gibt es denn auch eine nicht brutale Methode?
Falls jemand antwortet, ich kann das erst morgen lesen,
da ich jetzt weg muss.
Mit freundlichen Grüssen Frank

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige