Drucken über Code verändert Formatierung im Header
Michael
ich habe einen Code, der per Comandbutton ein ausgeblendetes Blatt drucken soll.
Private Sub CommandButton1_Click()
With Worksheets("test")
Application.ScreenUpdating = False
.Visible = True
.Activate
.Range("A1").Select
Sheets("test").PrintOut
.Visible = False
End With
End Sub
Das ist nicht erwünscht! Wenn ich diese Seite einblende und dann über den Standarddruckbefehl gehe, passiert diese "Umformatierung" nicht.
An welcher STelle läuft da was schief? Am Code selbst kann es doch nicht liegen.
Hat einer von euch eine Idee?
Vielen Dank für jeden Hinweis
Michael