Drucken

Forumthread: Drucken
2 Beiträge zu diesem Forumthread
Anzeige

Forumthread: Drucken

Drucken

17.01.2004 02:50:05

Stefan Glander

Hallo Excelanier
ich möchte von Tabellenblatt "A" über einen Commandbutton den Bereich A4:F16 drucken.
Wo ist mein Fehler im Code?

Private Sub CommandButton3_Click()
Application.ScreenUpdating = False
ausblenden
PageCount
    ActiveSheet.PrintOut Copies:=1
    Sheets(61).Select
    Range("A4:F16").Select
    Selection.PrintOut Copies:=1
einblenden
PageCount
Application.ScreenUpdating = True
End Sub

Code eingefügt mit Syntaxhighlighter 2.5

Danke vorab
Gruss
Stefan Glander

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Drucken

17.01.2004 07:38:04

felix
AW: Danke klappt einwandfrei o.T.

17.01.2004 12:41:27

Stefan Glander

AW: Drucken

17.01.2004 07:38:04

felix

Hallo Stefan,
so müßte es gehen,


Private Sub CommandButton3_Click()
'ausblenden  ??????
'PageCount   ??????
Sheets(61).Range("A4:F16").PrintOut Copies:=1
'einblenden  ?????
'PageCount   ?????
End Sub

ohne Select brauchst Du kein screenupdating
und die Zeilen mit den ???? brauchst du für den druck auch nicht.
ich weiß allerdings nicht was sich dahinter verbirgt.
Gruß
Felix

AW: Danke klappt einwandfrei o.T.

17.01.2004 12:41:27

Stefan Glander

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!