Muchas gracias por tu respuesta. Ahora el error está en esta linea:
Cita: GetCursorPos ptcur_x = pt.x * 65535 / ScaleX(Screen.Width, vbTwips, vbPixels)
Me da este error:
Cita: By Ref Argument Type Dismatch
y me marca el "="
Sabés que puede ser?
Muchas gracias!