Option Explicit
Declare Function GetKeyState Lib "user32.dll" _
(ByVal nVirtKey As Long) As Integer
Private Declare Sub keybd_event Lib "user32" ( _
ByVal bVk As Byte, _
ByVal bScan As Byte, _
ByVal dwFlags As Long, _
ByVal dwExtraInfo As Long)
Private Const VK_NUMLOCK = &H90
Private Const KEYEVENTF_KEYUP = &H2
Sub Check_NUMLOCK()
' NUM-Lock aktivieren (falls deaktiviert)
If Not (GetKeyState(vbKeyNumlock) = 1) Then 'eventuell -1 oder -2
keybd_event VK_NUMLOCK, 1, 0, 0
keybd_event VK_NUMLOCK, 1, KEYEVENTF_KEYUP, 0
End If
End Sub
Um die Num Taste in Excel automatisch zu aktivieren, wenn sie deaktiviert ist, kannst Du den folgenden VBA-Code verwenden:
ALT + F11, um den VBA-Editor zu öffnen.Einfügen und wähle Modul.Option Explicit
Declare Function GetKeyState Lib "user32.dll" (ByVal nVirtKey As Long) As Integer
Private Declare Sub keybd_event Lib "user32" ( _
ByVal bVk As Byte, _
ByVal bScan As Byte, _
ByVal dwFlags As Long, _
ByVal dwExtraInfo As Long)
Private Const VK_NUMLOCK = &H90
Private Const KEYEVENTF_KEYUP = &H2
Sub Check_NUMLOCK()
' NUM-Lock aktivieren (falls deaktiviert)
If Not (GetKeyState(vbKeyNumlock) = 1) Then
keybd_event VK_NUMLOCK, 1, 0, 0
keybd_event VK_NUMLOCK, 1, KEYEVENTF_KEYUP, 0
End If
End SubFehler: Nach der Ausführung des Makros bleibt die Num Taste deaktiviert.
Fehler: Die Num Taste wird nicht erkannt.
Wenn Du keine VBA-Lösungen verwenden möchtest, kannst Du die Num Taste manuell aktivieren:
Num oder Num Lock Taste auf Deiner Tastatur.Start > Alle Programme > Zubehör > Erleichterte Bedienung und öffne die Bildschirmtastatur. Dort kannst Du die Num Taste aktivieren.Hier ist ein Beispiel, wie Du den VBA-Code in eine Excel-Tabelle einfügen kannst, um die Num Taste zu aktivieren, bevor Du eine Berechnung durchführst:
Sub Berechnung()
Check_NUMLOCK() ' Stelle sicher, dass die Num Taste aktiviert ist
' Führe hier Deine Berechnungen durch
End Sub1. Wo ist die Num Taste?
Die Num Taste befindet sich normalerweise auf der rechten Seite Deiner Tastatur, oft als Num Lock oder Num bezeichnet.
2. Was macht der VBA-Befehl DoEvents?
DoEvents ermöglicht es Excel, andere Aufgaben auszuführen, während Dein Makro läuft, und kann helfen, die Benutzeroberfläche während längerer Berechnungen reaktionsfähiger zu machen.
3. Wie kann ich die Num Taste in Excel dauerhaft aktivieren? Leider gibt es keine Möglichkeit, die Num Taste dauerhaft über VBA zu aktivieren, da dies von den Systemeinstellungen und der Hardware abhängt. Du kannst jedoch sicherstellen, dass sie aktiv ist, bevor Du Deine Arbeit beginnst.