Changement de l'icone de la souris

[Brat'ac]

Bonjour,

Au passage de la souris sur un label je change le pointeur comme ceci
pas de PB c'est ok

With Label1
.MousePointer = fmMousePointerCustom
.MouseIcon = LoadPicture("c:\Documents\curseur.ico")
End With

Seulement si le fichier "curseur.ico" n'est pas présent dans le
répertoire cela génère une erreur
(que je peux traiter sans PB).

Mais est-il possible de faire en sorte que le fichier "curseur.ico"
soit incorporé au classeur

Cela éviterait d'oublier de le copier lors du portage du classeur sur
une autre machine.

Possible ? Ou alors une autre solution ?

Merci de l'aide.

[Brat'ac]

Post by Brat'ac
Bonjour,
Au passage de la souris sur un label je change le pointeur comme ceci
pas de PB c'est ok
With Label1
.MousePointer = fmMousePointerCustom
.MouseIcon = LoadPicture("c:\Documents\curseur.ico")
End With
Seulement si le fichier "curseur.ico" n'est pas présent dans le répertoire
cela génère une erreur
(que je peux traiter sans PB).
Mais est-il possible de faire en sorte que le fichier "curseur.ico" soit
incorporé au classeur
Cela éviterait d'oublier de le copier lors du portage du classeur sur une
autre machine.
Possible ? Ou alors une autre solution ?
Merci de l'aide.

Bon je viens de trouver, je me compliquais la vie, il y a "MouseIcon"
dans les propriétés du label :-@