Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Zellen hervorheben (nicht beim Druck)

Forumthread: Zellen hervorheben (nicht beim Druck)

Zellen hervorheben (nicht beim Druck)
30.09.2002 12:49:42
Winni
Folgendes Problem: Ich habe ein relativ grosses Tabellenblatt zur Erfassung von Daten und mehrere zur Auswertung der erfassten Daten.
Die Felder, die zur Eingabe bestimmt sind, würde ich gerne zu leichteren Benutzerführung irgendwie hervorheben, z.B. farblich markieren. Diese Markierung darf allerdings beim Druck nicht erscheinen.
Problem: ich habe auch noch andere farbige Elemente, die notwendig sind; d.h. Schwarz-weiss-druck ist keine Lösung.
Hat vielleicht jemand einen Lösungsvorschlag?

mfg.
Winni



Anzeige

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

Betreff
Datum
Anwender
Anzeige
Re: Zellen hervorheben (nicht beim Druck)
30.09.2002 12:57:13
JürgenR
Hi Winni,

du könntest Kommentare in die betr. Zellen geben und diese nicht ausdrucken.

Gruß
Jürgen

Zellen hervorheben (nicht beim Druck)
30.09.2002 13:11:40
WF
Hi Winni,

Ziehe ein Textfeld in Größe der Zelle auf.
Formatiere es wie gewünscht (Doppelklick auf den Rand des Textfeldes).
Bei Eigenschaften das Häkchen bei "Objekt drucken" löschen.

trapp, trapp, trapp, trapp, trapp, brrrrr
WF

http://www.excelformeln.de/
die ultimative Formelseite

Anzeige
Re: Zellen hervorheben (nicht beim Druck)
30.09.2002 13:45:17
Martin Beck
Hallo Winni,

das kannst Du mit zwei Ereignisprozeduren lösen. Zuerst benennst Du den Bereich, der hervorgehoben werden soll mit dem Namen "farbig". Danach weist Du "DieseArbeitsmappe" folgenden Code zu (Tabellennamen ggf. anpassen):

Private Sub Workbook_BeforePrint(Cancel As Boolean)
Worksheets("Tabelle3").Range("farbig").Interior.ColorIndex = xlNone
End Sub

Dem betroffenen Tabellenblatt weist Du noch folgenden Code zu (Tabellennamen ggf. anpassen):

Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
Worksheets("Tabelle3").Range("farbig").Interior.ColorIndex = 3
End Sub

Gruß
Martin Beck

Anzeige
Re: Zellen hervorheben (nicht beim Druck)
01.10.2002 09:13:34
Winni
Danke - die VB-Lösung funktioniert sehr gut.
Die anderen Lösungen scheitern leider an der grossen Anzahl der Eingabefelder.
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige