Sendkeys ile Window ( Pencere ) Tuşuna Basma

[asi_kral]

Selamun Aleyküm
Excelde wın+m tuşlarına basmak istiyorum. Açıkta olan tüm pencereler aşağıya inmesi için yalnız bulamadım.
Yarımlarınızı bekliyorum.

 

[Muzaffer Ali]

Win tuşuna basmak için sanıyorum ki api kullanılması gerekiyor fakat api kodlarını bulamadım.
Ama aşağıdaki linkteki en sonda sunulan çözümü de kullanabilirsiniz.

https://www.mytoworld.com/windows-10-masaustunu-goster-kullanma-yollari/

 

[asi_kral]

Teşekkür ederim.
sendkeys ile yapılabilir mi acaba?

 

[Muzaffer Ali]

Teşekkür ederim.
sendkeys ile yapılabilir mi acaba?

Cevap eklediğim linkte.

 

[excelokyanus500]

deneyin

Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)
Const KEYEVENTF_KEYUP = &H2
Const VK_LWIN = &H5B

Sub Minimize()
    ' 77 is the character code for the letter 'M'
    Call keybd_event(VK_LWIN, 0, 0, 0)
    Call keybd_event(77, 0, 0, 0)
    Call keybd_event(VK_LWIN, 0, KEYEVENTF_KEYUP, 0)
End Sub

 

[asi_kral]

teşekkür ederim

 

[Emir Hüseyin Çoban]

.

Sub kod()
    Set ShellApp = CreateObject("shell.application")
    ShellApp.ToggleDesktop
End Sub

.

 

[asi_kral]

Teşekkür ederim