Координаты курсора мыши
Добавлено: 15 фев 2008, 02:19
Возможно ли через VBA (Excel 2007) определить положение курсора?
GetCursorPos - Возвращает текущую позицию курсора мыши (глобально).
Синтаксис объявления:
Код: Выделить всё
Declare Function GetCursorPos Lib "user32" Alias "GetCursorPos" _
(lpPoint As POINTAPI) As LongКод: Выделить всё
Type POINTAPI
x As Long
y As Long
End Type
Private Sub Command1_Click()
Dim a As POINTAPI
GetCursorPos a
MsgBox a.x & a.y
End Sub