Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
1572to1576
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
Inhaltsverzeichnis

Drucken ohne Farbe

Drucken ohne Farbe
04.08.2017 10:21:02
Jürgen
Hallo zusammen,
wir haben ein Excel Formular.
einige Zellen sind Grau hinterlegt und andere Grün.
Zum bearbeiten sind die Farben sehr sehr hilfreich.
Aber ich möchte gerne, dass beim drucken das Grau mit druckt aber das grüne soll weiß bleiben.
Klar, kann ich jede Zelle markieren und Markierung aufheben, aber würde es eine andere Lösung geben?
Danke
Jürgen

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

Betreff
Datum
Anwender
Anzeige
AW: Drucken ohne Farbe
04.08.2017 11:41:13
Beverly
Hi Jürgen,
eine Möglichkeit mit folgendem Makro:
Sub OhneFarbeDrucken()
Dim rngZelle As Range
Dim rngBereich As Range
For Each rngZelle In ActiveSheet.UsedRange
If rngZelle.Interior.Color = 5287936 Then
If rngBereich Is Nothing Then
Set rngBereich = rngZelle
Else
Set rngBereich = Union(rngBereich, rngZelle)
End If
End If
Next rngZelle
rngBereich.Interior.ColorIndex = xlNone
ActiveSheet.PrintOut
rngBereich.Interior.Color = 5287936
Set rngBereich = Nothing
End Sub

Farbe für Grün musst du selbstverständlich anpassen.


Anzeige
AW: Drucken ohne Farbe
04.08.2017 14:16:30
jürgen
super danke

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige