BeforePrint
hans
Meines Wissens kann Excel bei BeforePrint nicht unterscheiden, ob der Anwender eine _
Druckvorschau ansehen, oder ob er drucken möchte. Bei Excel 2003 habe ich das Problem so _
umgangen:
Private Sub Workbook_Open()
With Application.CommandBars("Standard")
For IndCntrl = 1 To .Controls.Count
If .Controls(IndCntrl).Id = 109 Then
.Controls(IndCntrl).OnAction = "Seitenansicht"
Else
If .Controls(IndCntrl).Id = 2521 Then
.Controls(IndCntrl).OnAction = "Ausdrucken"
End If
End If
Next IndCntrl
End With
End Sub
Leider funktioniert dies unter Excel 2007 nicht mehr. Gibt es eine Lösung?
Vielen Dank für die Hilfe und herzliche Grüsse
Hans