vba excel

[jo]

bonjour ;-)

je souhaite mettre un " graphisme " genre icone de chargement lors de
l'exécution de mon prog.
Qqn saurait m'aider ?
Merci 🙂

 

[Roland]

Bonjour Jo

Qu'appelles-tu exécution de ton programme?. Est-ce par ce que l'exécution de fonction est trop longue?


A+ Roland

 

[jo]

salut Roland ;-)

Oui effectivmnt mon prog. prend 1 " 30 sec et c juste pr masquer
l'attente en faite!
bye!

 

[Roland]

Re
Cette exemple de la doc te sera sans doute utile

Private Sub ListBox1_Click()
If IsNull(ListBox1.Value) = False Then
CommandButton1.MousePointer = ListBox1.Value

If CommandButton1.MousePointer = fmMousePointerCustom Then
CommandButton1.MouseIcon = LoadPicture("c:\msvc20\cdk32\samples\circ1\bix.ico")
End If
End If
End Sub

Mais un programme aussi long est souvent du au temps des affichages durant les calculs.

As-tu pensé à l'instruction Application.ScrenUpDate = False au début de tes macros, sinon essaie.

A+ Roland je file au boulot à ce soir ................

Copyright (c) 1996 Microsoft Corporation