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

Bildschirmanzeige nicht drucken

Bildschirmanzeige nicht drucken
12.05.2005 17:14:03
hegner
Hallo,
ich möchte aus einer Kalkulation welche die Zellen A1:G55 umfasst
das gesamt Blatt ausdrucken, jedoch sollen die Zellen B10, B12 und B14
nicht auf dem Ausdruck erscheinen. In der Bildschirmansicht sollen die
Texte jedoch lesbar sein.
Beste Grüße
Markus

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

Betreff
Datum
Anwender
Anzeige
AW: Bildschirmanzeige nicht drucken
12.05.2005 17:48:12
Reinhard
Hallo Markus,
vielleicht so:

Private Sub Workbook_BeforePrint(Cancel As Boolean)
Cancel = True
Application.EnableEvents = False
With ActiveSheet
merker = .[A1].Font.ColorIndex
.[A1].Font.ColorIndex = 2
.[A2].Font.ColorIndex = 2
.[A2].Font.ColorIndex = 2
.PrintOut
.[A1].Font.ColorIndex = merker
.[A2].Font.ColorIndex = merker
.[A3].Font.ColorIndex = merker
End With
Application.EnableEvents = True
End Sub

Gruß
Reinhard
AW: Bildschirmanzeige nicht drucken
13.05.2005 09:17:41
Hegner
Hallo,
danke für die Hilfe und beste Grüße
Markus
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige