Visual Basic para Aplicaciones - ¡¡¡ Ocultar cursor en Excel !!!

Estimados amigos:

Quisiera consultar si es posible ocultar a través de código, el cursor en Excel.

Gracias por su atención.

En el objeto Application no encontre una propiedad para eso, pero puedes hacerlo con una funcion API que te incluyo aqui, solo ten cuidado de volverlo a mostrar al terminar tu codigo...

Option Explicit
Declare Function ShowCursor Lib "user32" (ByVal bShow As Long) As Long

Public Sub Oculta()
Dim CadenaResultante As Long
´Esconde el cursor del mouse
CadenaResultante = ShowCursor(False)
End Sub

Public Sub Muestra()
Dim CadenaResultante As Long
´Muestra el cursor del mouse
CadenaResultante = ShowCursor(True)
End Sub