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

Speichern unterbinden.

Forumthread: Speichern unterbinden.

Speichern unterbinden.
15.02.2005 11:31:40
marc
hallo zusammen,
am Ende des Codes bekomme ich eine Excel-Abfrage
"Sollen die Änderungen gespeichert werden?"
wie kann ich die Abfrage unterbinden?
ich habe mit Saved = False versucht leider ohne Erfolg.
Auszug:
Range("A1:H501").Copy Workbooks("TTT_Import.xls"). _
Sheets("TTT_Dat").Range("A1")


Workbooks("TTT_Import.xls").Save
ActiveWorkbook.Saved = False
wb1.Close
End Sub
marc :o)
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Speichern unterbinden.
15.02.2005 11:39:35
Andi
Hi Marc,
ActiveWorkbook.Saved = True
wäre der passende Befehl; damit sagst Du Excel, dass das Workbook schon gespeichert ist, und ein "erneutes" Speichern daher nicht notwendig ist.
Schönen Gruß,
Andi
P.S.: Wenn Du das speichern tatsächlich unterbinden willst, wie Du in Deinem Betreff schreibst, dann schreibe
Cancel = True
ins BeforeSave-Ereignis der Arbeitsmappe
Anzeige
AW: Speichern unterbinden.
marc
hallo Andi,
vielen Dank fuer die bilitzschnelle Hilfe.
-
marc :o))
Gern geschehen... (ot)
15.02.2005 12:05:44
Andi
.
AW: Speichern unterbinden.
15.02.2005 11:59:48
Ralf
Hallo Marc,
setze im Code folgendes ein:
Application.DisplayAlerts = False
DEIN CODE
Application.DisplayAlerts = True
Auf True setzen nicht vergessen.
Gruß
Ralf
Anzeige
AW: Speichern unterbinden.
marc
hallo Ralf,
auch bei Dir moechte ich mich bedanken.
-
marc :o)
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige