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

PrintOut

PrintOut
05.03.2004 09:30:32
Norbert
Hallo ...,
mit folgendem Programm lasse ich mir eine Seite ausdrucken:

Private Sub CommandButton6_Click()
Worksheets("sheet1").Range("A1:L36").Interior.ColorIndex = xlNone
ActiveSheet.PrintOut From:=1, To:=1
Unload Me
End Sub

Da ich Zellen mit Hintergrundfarben habe, habe lasse ich diese mit

Worksheets("sheet1").Range("A1:L36").Interior.ColorIndex = xlNone

ausblenden.
Geht das auch besser?
Ich will ohne Hintergrundfarben drucken?
Oder wie bekomme ich die hinterher wieder bunt?
Danke Norbert

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: PrintOut
05.03.2004 09:37:05
y
hi Norbert,
so in etwa ?
Worksheets("Tabelle1").PageSetup.BlackAndWhite = True
cu Micha
AW: PrintOut
05.03.2004 10:52:01
Norbert
Hallo Micha,
das ging ja einfach ;-))
Danke
Norbert
danke für die rückmeldung :-) o.t.
05.03.2004 10:59:31
y
...

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige