Num Lock tuşu kapalı kalıyor

[ASLAN7410]

Merhaba hayırlı geceler.

Forumdaki arkadaşların yardımları sayesinde bir excel programı yaptım, ancak sayfayı her kapattığımda num lock tuşu kapanıyor.
Sadece bu programı kapatırken yapıyor bunu.

Benim istediğim sayfayı kapatırken veya açarken makro, num lock tuşunu kontrol edip, açıksa açık, kapalı ise açması lazım.

Forumda ve internette araştırdım ancak böyle bir çalışma bulamadım.
Yardımcı olur musunuz?

Sayfayı kapatırken MenüGöster kodu çalıştırılmazsa Num Lock'a birşey olmuyor, MenüGöster makrosunu aktif edersem Num Lock'u kapatıyor.

Sub auto_close()
ActiveWindow.DisplayHeadings = True
Application.WindowState = xlMaximized
MenüGöster
ActiveWorkbook.Save
ActiveWorkbook.Close
End Sub

Sub MenüGöster()
SendKeys "^{F1}"
End Sub

.

 

[Emir Hüseyin Çoban]

. . .

Kırmızı ile belirttiğim satırı ilave ederek deneyiniz...

Sub MenüGöster()
SendKeys "^{F1}"
[COLOR="DarkRed"]Application.SendKeys ("{NUMLOCK}")[/COLOR]
End Sub

. . .

 

[ASLAN7410]

Sayın Hüseyin Bey ellerinize sağlık çok teşekkür ediyorum, tam istediğim gibi oldu. Allah razı olsun.

Hayırlı çalışmalar, hayırlı geceler.