Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Tastatur/Maus sperre Blockinput verbessern ?

Forumthread: Tastatur/Maus sperre Blockinput verbessern ?

Tastatur/Maus sperre Blockinput verbessern ?
chris
Hallo VBA Profis,
habe noch eine kurze frage bevor das Wochenende da ist.
Ich würde mich sehr über Hilfe freuen.
Ich benutze unten gezeigtes Makro um währen ein excelMakro läuft die tastatur und Maus zu sperren.#
aber leider fumktioniert das nicht so wie ich es mir wünsche.
Wenn ich STRG+ALT+Entf drücke und dann ESC kann ich wieder Maus und Tastatus benutzen.
Gibt es eine möglichkeit auch das zu verhindern ?
Vielen dank für eure Antworten und Hilfe im vorraus !
gruß chris
Private Declare

Function BlockInput Lib "user32" (ByVal fBlock As Long) As Long


Sub Meinmakro()
BlockInput True
'..... Makro ..
'..... Makro ..
BlockInput False
End Sub


Anzeige

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Tastatur/Maus sperre Blockinput verbessern ?
03.07.2009 14:00:26
Dieter
Hi,
du willst dich also völlig aussperren?
Cancelkey disablen.
mfg Dieter
AW: Tastatur/Maus sperre Blockinput verbessern ?
03.07.2009 14:37:12
chris
Und wie geht das ?
cancelkey disabled in excel bringt ja nichts :?
Danke
AW: bringt nichts
03.07.2009 14:43:40
chris
Hallo dieter du meinst so oder :
Option Explicit
Private Declare

Function BlockInput Lib "user32" (ByVal fBlock As Long) As Long


Sub MachWas()
Application.EnableCancelKey = xlDisabled
BlockInput True
End Sub


Das bringt nichts !
Danke für weitere Hilfreiche Tipps.
gruß Chris

Anzeige
nicht unter Vista!
03.07.2009 16:33:29
Tino
Hallo,
kenne diesen Code, funktioniert nicht unter Vista.
Habe aber auch keine alternative.
Frage ist offen
Gruß Tino
AW: bringt nichts
03.07.2009 16:53:12
Original
Hi,
verwende Application.Interactive
mfg Kurt
super, kannte ich auch noch nicht. oT.
03.07.2009 17:12:23
Tino
Anzeige
AW: super, kannte ich auch noch nicht. oT.
03.07.2009 17:17:40
chris
danke für alle Antworten.
Meld mich deshalb am Dienstag !
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige