12/04/27 18:27:49.96 KsqX86Pd
マクロ記録云々は完全に勘違いだわ。ゴメン。
ほい最低限のソース。実際には座標設定とか色々付く訳だがそこは割愛
クリック先がWizonと関係なくてもブロックされる。
書き直してて思ったが、SendInput APIが阻害されてるっていうのが正確だね。そこはお詫びして訂正します。更にゴメン。
こちらではもっと大きなコードで検証済みなので、検証用部分は割愛。検証するなら適当に座標設定も足してちょ。
Option Explicit
Type InputCommand
iType As Long
iX As Long
iY As Long
iWheel As Long
iFlags As Long
iTime As Long
iEx As Long
End Type
Const MOUSEEVENTF_LEFTDOWN = &H2
Const MOUSEEVENTF_LEFTUP = &H4
Private Declare Function SendInput Lib "User32.dll" _
(ByVal nCmds As Long, ByRef iCmd As InputCommand, ByVal cSize As Long) As Long
Sub MoveAndClick()
Dim mCommand As InputCommand
With mCommand
.iFlags = MOUSEEVENTF_LEFTDOWN
SendInput 1&, mCommand, Len(mCommand)
.iFlags = MOUSEEVENTF_LEFTUP
SendInput 1&, mCommand, Len(mCommand)
End With
End Sub