Drucken nur über CommandButton

[Primo Centurio]

Ave zusammen :D

Ich wollte wissen ob es möglich ist, das Drucken eines Tabellenblattes nur über einen CommandButton zu steuern?
Das heisst, dass das Drucken über Datei -> Drucken deaktiviert wird.

Ich bedanke mich jetzt schon mal für eure Hilfe und verbleibe,

mit freundlichen Grüssen

Primo

[RPP63]

Mahlzeit!
Ja so etwas ist durchaus möglich …
… nur: warum?

Fragt sich Ralf

[Glausius]

Hallo Primo,

ja, das ist möglich!

Siehe folgende Anleitung:

Drucken nur über CommandButton
'****************************************
'* H. Ziplies
'* 20.03.03
'* erstellt von Hajo.Ziplies@web.de
'* http://Hajo-Excel.de/
'***************************************
………………………………….……
‘Modul: DieseArbeitsmappe
‘………………………………..………………
Option Explicit
 Private Sub Workbook_BeforePrint(Cancel As Boolean)
            If Druck = False Then
                        Cancel = True
                        MsgBox "Drucken ist nur über den vorgesehen Button möglich!!!"
            Else
                        Druck = False
            End If
End Sub
 ‘………………………………………………………………….………
‘Modul: Tabelle (Code hinter die Tabelle)
‘…………………………………………………………….……………
Option Explicit
Private Sub CommandButton1_Click()
             Druck = True
            ActiveSheet.PrintOut
End Sub
 ‘………………………………………………………………………..…………………
‘Modul: allgemeines Modul (Variablendeklaration)
‘………………………………………………………………..…………………………
Option Explicit
Public Druck As Boolean

[RPP63]

Ganz schön viel Platz für so wenig Content.  

[Glausius]

Hallo Rpp63,

das fand ich auch und habe das bereits 2x editiert, nur wurde es damit nicht kürzer, sondern immer auseinandergezogener - weiß der Kuckuck, warum!

[Steffl]

Hallo Günter,

vielleicht muss André hier mal tätig werden

https://www.clever-excel-forum.de/Thread...eanie+code

[Primo Centurio]

Also der Grund ist, dass die Leute auf der Arbeit nicht wirklich fähig sind Anweisungen zu befolgen und ich so möglich Fehlerquellen minimieren will.
Zusätzlich wird durch das betätigen des CommandButton ein Zähler fortgesetzt, welcher mir anzeigt wieviel Kopien gedruckt wurden.

@Glausius Danke Dir, genau das habe ich gesucht, funktioniert perfekt.

Lg Primo