Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
792to796
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
792to796
792to796
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Drucktitel

Drucktitel
23.08.2006 09:02:58
Walter
Guten Morghen Allerseits,
habe folgende Zeilen in meinem Druckmenü:
ActiveSheet.Names("Print_Titles").Delete
ActiveSheet.Names("Print_Area").Delete
jetzt kommt eine Fehlermeldung, da im Moment keine Drucktitel vorhanden war/ist.
Wie kann ich die abfangen?
Hatte mal hiermit:
If ActiveSheet.Names("Print_Titles").Value = True Or _
ActiveSheet.Names("Print_Area").Value = True Then
ActiveSheet.Names("Print_Titles").Delete
ActiveSheet.Names("Print_Area").Delete
Else ...
versucht, leider kein Erfolg.
mfg walter

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Drucktitel
23.08.2006 09:10:50
Eule
Hi Walter
vor dem delete-Befehl: on error resume next,
nach dem delete-Befehl: on error goto 0
Gruss Eule
Danke Eule, funktioniert !!! -)
23.08.2006 09:22:47
Walter
AW: Drucktitel
23.08.2006 09:11:27
stefanseevetal
Hallo Walter,
versuche es mal mit
On Error Resume Next
ActiveSheet.Names("Print_Titles").Delete
Dann wird die Zeile nach dem "On Error Resume Next" bei einem "Fehler" übersprungen und und normal weiter fortgefahren.
Gruß,
Stefan
Super Danke Stefan, funktioniert ! Ende
23.08.2006 09:20:45
Walter

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige