STRG+Pause ausschalten

Bild

Betrifft: STRG+Pause ausschalten
von: ray
Geschrieben am: 17.06.2015 15:04:24

Hallo,

ich möchte nicht, dass die User den VBAcode mit STRG+Pause unterbrechen können. Was muss ich einbauen?

Viele Grüße aus kalten Hamburg bei 15 Grad

Ray

Bild

Betrifft: Archivbeitrag funzt auch nicht
von: ray
Geschrieben am: 17.06.2015 15:22:44
So gehts nicht. Ist hier aus Archiv. STRG+PAUSE beenden trotzdem

Private Sub Workbook_Open()
Application.OnKey "^{BREAK}", "nix" 'bei STRG+PAUSE wird das Modul nix aufgerufen, wo nix drin  _
ist also nix passiet und der User kann den Code nicht abbrechen
frmAnfang.Show
End Sub


Bild

Betrifft: AW: STRG+Pause ausschalten
von: Rudi Maintaire
Geschrieben am: 17.06.2015 15:24:23
Hallo,
application.cancelkey=false
Unbedingt wieder einschalten und Vorsicht damit. Erst einbauen wenn alles fehlerfrei läuft.
Gruß
Rudi

Bild

Betrifft: so etwa?
von: ray
Geschrieben am: 17.06.2015 15:27:57
so oder an anderer Stelle?:

Private Sub Workbook_Open()
application.cancelkey=false
frmAnfang.Show
End Sub
Einschalten so?
Private Sub Workbook_BeforeClose(Cancel As Boolean)
application.cancelkey=true
End Sub


Bild

Betrifft: AW: so etwa?
von: Rudi Maintaire
Geschrieben am: 17.06.2015 15:33:54
Hallo,
Korrektur: Application.EnableCanceKey=False/True
ich würde eher

Private Sub Workbook_Open()
application.enablecancelkey=false
frmAnfang.Show
application.enablecancelkey=true
End Sub
Gruß
Rudi

Bild

Betrifft: und lies die Hilfe. owT
von: Rudi Maintaire
Geschrieben am: 17.06.2015 15:37:32


Bild

Betrifft: da steht nix.....wo finde ich das?
von: ray
Geschrieben am: 17.06.2015 15:41:49
WEnn ich oben rechts im VBeditor cancelkey eingebe, dann findet er nix. Wo finde ich das?

Bild

Betrifft: AW: da steht nix.....wo finde ich das?
von: Rudi Maintaire
Geschrieben am: 17.06.2015 15:44:34
gib enablecancelkey ein

Bild

Betrifft: super Danke Rudi!!!! ot
von: ray
Geschrieben am: 17.06.2015 16:15:15
ot

 Bild

Beiträge aus den Excel-Beispielen zum Thema "STRG+Pause ausschalten"