LHSP‡           taak <1tot9>   1tot9winkey.dll nodig
taakwinkey }øÿ                ßSub Main
' zie https://qh.antenna.nl/spraakherkenning
	DllCall "DNSKeys","WinKey","b"
	Wait 0.05
	SendSystemKeys "{shift+tab}"
	Wait 0.05
	nummer = Val(ListVar1) -1
	SendKeys "{right " & nummer & "}{enter}"
End Sub
taak <1tot9> <taakcommando>   1tot9taakcommandowinkey.dll nodig
taakwinkey }øÿ                ÿçSub Main
' zie https://qh.antenna.nl/spraakherkenning
	DllCall "DNSKeys","WinKey","b"
	Wait 0.05
	SendSystemKeys "{shift+tab}"
	Wait 0.05
	nummer = Val(ListVar1) -1
	SendKeys "{right " & nummer & "}{enter}"

	Dim t2 As String
	t2 = ""
	If InStr(ListVar2, "\") > 0 Then
	    t2 = Mid(ListVar2, 1, InStr(ListVar2, "\")-1)
	End If
	If t2 <> "" Then
		Wait 0.1
		SendSystemKeys t2
	End If
	Wait 0.3
	' centre mouse in the active window:
	SetMousePosition 4, 0

End Sub
taak <taakcommando>   taakcommando 
taakwinkey }øÿ                ÿ
Sub Main
' zie https://qh.antenna.nl/spraakherkenning
 Dim t1 As String
 t1 = Mid(ListVar1, 1, InStr(ListVar1, "\")-1)

	If t1 <> "" Then
	    SendSystemKeys t1
        Wait 0.3
	End If
	' centre mouse in the active window:
	SetMousePosition 4, 0
End Sub
taak min <1tot9>   1tot9heeft winkey.dll nodig
taakwinkey }øÿ                ÄSub Main
' zie https://qh.antenna.nl/spraakherkenning
	DllCall "DNSKeys","WinKey","b"
	Wait 0.05
	SendSystemKeys "{shift+tab}"
	Wait 0.05
	SendKeys "{left " & ListVar1 & "}{enter}"
End Sub
taak min <1tot9> <taakcommando>   1tot9taakcommandoheeft winkey.dll nodig
taakwinkey }øÿ                ÿ¢Sub Main
' zie https://qh.antenna.nl/spraakherkenning
	Dim t2 As String
	DllCall "DNSKeys","WinKey","b"
	Wait 0.05
	SendSystemKeys "{shift+tab}"
	Wait 0.05
	SendKeys "{left " & ListVar1 & "}{enter}"

	t2 = ""
	t2 = Mid(ListVar2, 1, InStr(ListVar2, "\")-1)
	If t2 <> "" Then
		Wait 0.2
	    SendSystemKeys t2
	End If
	' centre mouse in the active window:
    Wait 0.3
	SetMousePosition 4, 0

End Sub
   1tot9   	   123456789taakcommando      \muis{alt+f4}\sluiten{alt+space}m\maximaliseren{alt+space}n\minimaliseren{alt+space}v\vorig formaat{alt+tab}\terug{f5}\vernieuwen{shift+ctrl+a}\ander displee