Изменение курсора в Excel

[Евгений Д.]

Уважаемые коллеги, столкнулся я тут с проблемой, которая, казалось, выеденного яйца не стоит.

Суть в следующем: я хочу поменять вид мышиного курсора на стрелку со знаком вопроса, например, из файла C:\WINNT\Cursors\help_rl.cur, причем этот курсор должен быть виден не над определенным контролом, а в любом месте экрана.

Соответственно пишу код:

Declare Function LoadCursorFromFile Lib "user32.dll" Alias _
"LoadCursorFromFileA" (ByVal lpFileName As String) As Long
Declare Function SetCursor Lib "user32.dll" _
(ByVal hCursor As Long) As Long

Function LoadNewCursor(CurPath As String)
Dim hCursor As Long
hCursor = LoadCursorFromFile(CurPath )
hCursor = SetCursor(hCursor )
End Function

Sub Test

Call LoadNewCursor("C:\WINNT\Cursors\help_rl.cur")

End sub

Исполняю... ??? Ошибок не выдается. ??? Курсор не изменяется
Ощущение, что Excel перехватывает, точнее пресекает все поползновения такого рода.

Кто знает, в чем тут дело, помогите!