Zellfarbe nicht drucken
18.01.2007 09:38:59
Ines
ich habe eine Datei, in der User bestimmte Angaben hinterlegen müssen. Damit sie keine zu füllenden Zellen übersehen, sind die entsprechenden Zellen farblich hervorgehoben (Zellfarbe gelb). Da wir aber nur Schwarz-weiß-Drucker haben, sind die Ausdrucke zwar noch einigermaßen lesbar, aber wenn man z. B. versucht sie zu faxen, kann der Empfänger nichts mehr erkennen. Schriftart fett und ganz helles gelb helfen da auch nicht.
Gibt es eine Möglichkeit irgendwo einzustellen, dass die Zellfarbe nicht gedruckt wird? Ich habe auch schon ein kleines Makro geschrieben, das vor dem Drucken die Zellfarbe löscht, aber ich habe leider keine Möglichkeit gefunden nach dem Drucken die Zellfarbe wieder einzustellen:
Private Sub Workbook_BeforePrint(Cancel As Boolean)
Range("A16:F24").Select
Selection.Interior.ColorIndex = xlNone
End Sub
Gedruckt wird erst nach dem Ende der Prozedur. Deshalb kann ich nichts hineinbringen, was die Formatierung wieder setzt. Mir fällt aber auch kein Ereignis ein, mit dem ich ein anschließendes Makro starten kann, das die Zellfarbe dann wieder setzt.
Hat jemand eine Idee?
Viele Grüße
Ines