Affichage sablier lors d'un enregistrement

**jpegue** · 14/10/2009, 12h25

Bonjour à tous,

Est-il possible d'afficher le sablier à la place du curseur de la sourie lorsque je clique sur bouton "VALIDER" qui permet entre autre d'engistrer les données saisie dans des combobox, des checkbox, etc...
Pour le moment, j'ai le curseur de la sourie qui reste le même, et la seule différence visible est au niveau du bouton que j'ai cliqué.

merci pour aide.

**Fvandermeulen** · 14/10/2009, 13h55

Salut,
Je crois que ceci répond à ta question,

Code :

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

1
2
3
4
5
6
7
 
UserForm1.MousePointer = fmMousePointerHourGlass
DoEvents
 
'Ton code
 
UserForm1.MousePointer = fmMousePointerDefault

A+

**jpegue** · 14/10/2009, 15h44

bonjour,
Cela fonctionne, mais je dois le remettre par défaut après la sauvegarde, voici ce que j'ai :

Code :

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

1
2
3
4
UserForm1.MousePointer = fmMousePointerHourGlass
DoEvents
ActiveWorkbook.Save 
UserForm1.MousePointer = fmMousePointerDefault

Est ce qu'il n'y aurait pas une possibilité de le faire autrement ?

**Pierre Fauconnier** · 14/10/2009, 17h54

Pas à ma connaissance

**jpegue** · 15/10/2009, 09h03

Bon et bien merci pour votre aide, très sympat.
tout marche,

Affichage sablier lors d'un enregistrement

Macros et VBA Excel

Vue hybride

Discussions similaires

Partager

Partager