Initialiser le curseur

  • Initiateur de la discussion Initiateur de la discussion Eric D
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

Eric D

XLDnaute Occasionnel
Bonjour à toutes et tous,

Mon intitulé ne correspond peut être pas exactement à ce que je souhaite obtenir, mais bon...
je souhaite donc changer mon curseur, par un perso, lorsque j'ouvre mon classeur et remettre l'original biensur quand je referme mon classeur.
Merci pour votre aide
Eric D
 
Re : Initialiser le curseur

Bonjour,
Code:
Private Sub Workbook_Open()
    Application.Cursor = xlIBeam
    ' Pour info
    'xlDefault  Pointeur par défaut.
    'xlIBeam  Pointeur en I.
    'xlNorthwestArrow  Pointeur en flèche orientée nord-ouest.
    'xlWait Sablier
End Sub
 
Re : Initialiser le curseur

Re,

En fait quand je survole un objet, je peux redéfinir le curseur, je souhaiterais pouvoir redéfinir le curseur pour l'application et lui redonner celui qui lui était attribué avant, quand je sort de l'application.
Merci l'aide.
Eric D
 
Re : Initialiser le curseur

Bonjour,

Ca n'a rien à voir.
Dans mon code, la définition du curseur est :
La propriété Application.Cursor renvoie ou définit l'apparence du pointeur de la souris dans Microsoft Excel.
Pour utiliser un fichier comme le tien tu peux le faire avec les contrôles ActiveX (sur un Form)

Par exemple sur un Label, tu mets dans
la propriété MousePointer la valeur 99-fmMousePointerCustom
et pour la
propriété MouseIcon tu sélectionnes un fichier image *.ico ou *.cur je crois
 
Re : Initialiser le curseur

Bonjour cococh,
Re RENAUDER,

Je voudrais que mon curseur change pour toute l'application, même sans objet, et de revenir au curseur initial quand je quitte l'application, sinon la solution est effectivement, de mettre un label transparent de la taille de ma feuille ,et de définir un curseur pour le label, mais après bonjour la gestion de la position du curseur par rapport aux cellules !!!
As tu une idée. Merci.
Eric D
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
7
Affichages
512
  • Question Question
Microsoft 365 Classeur Disparu
Réponses
2
Affichages
570
  • Question Question
Microsoft 365 Classeur disparu
Réponses
19
Affichages
1 K
Retour