[VBA-Excel] Changement du curseur de ma souris

**marsupilami34** · 30/08/2006, 16h49

Bonjour,

Je souhaiterai, lorsque le curseur de ma souris se trouve sur un Label, le changer, le faire passer comme ceci

J'utilise la propriété MouseMove, mais j'aimerai lui associé ce curseur.

Merci d'avance

**marsupilami34** · 30/08/2006, 16h50

Désolé, problème de chargement de mon curseur, le voici

**SfJ5Rpw8** · 30/08/2006, 16h58

voir propriété MousePointer du label .. à placer à 99 , et le lien vers fichier icone dans propriété MouseIcon

**marsupilami34** · 30/08/2006, 17h04

Envoyé par bbil

le lien vers fichier icone dans propriété MouseIcon

Le truc c'est que je ne sais pas ou ce trouve l'icone et quelle extension il doit avoir.

L'image que j'ai fait parvenir était un print écran

**SfJ5Rpw8** · 30/08/2006, 17h11

Tiens voila ...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
Private Sub UserForm_Initialize()
 Label1.MouseIcon = LoadPicture("c:\windows\cursors\HARROW.CUR")
 Label1.MousePointer = fmMousePointerCustom
End Sub

aprés je sais pas si fichier toujours la .. pour le chemin de windows on peu utiliser environ("SystemRoot") .. mais pour le sous-répertoire cursors..

**marsupilami34** · 30/08/2006, 17h13

Merci, je vais tester

[VBA-Excel] Changement du curseur de ma souris

Macros et VBA Excel

Vue hybride

Discussions similaires

Partager

Partager