A few suggestions untested here :

Application.Interactive = False 

Turn it back to TRUE when done.

ThisApplication.UserInterfaceManager.UserInteractionDisabled = True

Turn it back to TRUE when done.

You could just hide it from them:

Private Declare Function ShowCursor Lib "user32.dll" (ByVal bShow As Long) As Long

Private Sub Form_Load()

ShowCursor (0) ' Hide mouse cursor

ShowCursor (1) ' Show mouse cursor

End Sub