Option Explicit
Private Sub Workbook_BeforePrint(Cancel As Boolean)
If Left(ActiveSheet.Name, 2) = "KW" Then
Worksheets("UR").PrintOut
ElseIf ActiveSheet.Name = "AR" Then
' Passwortabfrage per UserForm da sonst sichtbar
'If Passwort = Falsch Then Cancel True
End If
End Sub
Drucken per VBA steuern
finger59 26.11.2008 - 64 Hits - 1 Antwort
Bestimmte Zeilen drucken
flash2back 10.01.2009 - 100 Hits - 7 Antworten
Makro im Makro deaktivieren ?
korfuweb 02.03.2009 - 178 Hits - 7 Antworten
Excel: 'Kopfzeilen' auf allen Zeilen drucken
Mikoop 17.03.2009 - 183 Hits - 2 Antworten
VB - Excel Makro, drucken unter Bedingung
Carteluno 19.05.2009 - 578 Hits - 2 Antworten