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

Bestimmte Formatierung beim drucken weglassen

Bestimmte Formatierung beim drucken weglassen
01.12.2003 11:03:19
Gunter
Hallo Zusammen,
ich habe einen Druckbereich festgelegt. Ist es nun möglich, alle Zellen deren Schrift rot formatiert ist, bei dem Ausdruck zu unterdrücken. Zusammenfassen:
Alles was schwarz formatiert ist, soll gedruckt werden,
alles was rot formatiert ist, soll nicht gedruckt werden.

Danke schon mal im voraus.

Gunter

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Bestimmte Formatierung beim drucken weglassen
01.12.2003 11:21:18
Matthias G
Hallo Gunter,
ich hab nur mal die Idee, alles rote vor dem Drucken weiß zu färben und anschließend wieder rot:
Folgender Code in "DieseArbeitsmappe":

Private Sub Workbook_BeforePrint(Cancel As Boolean)
Dim z As Range
Cancel = True
For Each z In ActiveSheet.UsedRange
If z.Font.ColorIndex = 3 Then z.Font.ColorIndex = 2
Next z
Application.EnableEvents = False
ActiveSheet.PrintOut
Application.EnableEvents = True
For Each z In ActiveSheet.UsedRange
If z.Font.ColorIndex = 2 Then z.Font.ColorIndex = 3
Next z
End Sub

Der Code funktioniert aber nicht mit bedingten Formatierungen.

Gruß,
Matthias
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige