finns det någpt sätt att få fram muskoordinaterna räknat på hela skärmen??

I en modul:
<code>
Public Declare Function GetCursorPos Lib "user32" (lpPoint As POINTAPI) As Long
Public Type POINTAPI
x As Long
y As Long
End Type
</code>

Där du vill ha koordinaterna:
<code>
Dim mousepos As POINTAPI
Call GetCursorPos(mousepos)
'mousepos.x innehåller x-koordinaten och
'mousepos.y innehåller y-koordinaten
</code>

Hälsningar Ivar