Const WM_LBUTTONDOWN As Long = &H201
Const WM_LBUTTONUP As Long = &H202
SetForegroundWindow(hwnd)
SendMessage(hwnd, WM_LBUTTONDOWN, 0&, MakeDWord(678, 512))
SendMessage(hwnd, WM_LBUTTONUP, 0&, MakeDWord(678, 512))
Private Function MakeDWord(ByVal LoWord As Integer, ByVal HiWord As Integer) As Long
MakeDWord = (HiWord * &H10000) Or (LoWord And &HFFFF&)
End Function