pb affichage userform pdt une macro

B

ben

Guest
rebonjour tout le monde

J'ai un souci avec le code suivant
j'ai une macro qui dure plusieurs minutes et pdt l'exécution j'affiche un userform avec un texte à l'interrieur veuillez pattienter...
Le pb et que ds mon code actuelle qd il affiche le userform ma macro s'arrete ma question est de savoir comment fait ton pour afficher un userform pdt que ma macro s'exécute et le fermer à la fin.
Voici mon code actuel, la macro s'arrete à l'ouverture du userform6

Private Sub CommandButton1_Click()

'insertion d'un chrono pour durée de comparaison
debut_macro = Timer
UserForm6.Show
Call comparaison2
'arret du chrono et affichage de la durée
fin_macro = Timer
Dim temps_execution As Long

Unload UserForm6
temps_execution = (fin_macro - debut_macro) / 60


MsgBox " La comparaison à durée : " & temps_execution & " minutes "

Call sauvegarde


End Sub
 
@

@Christophe@

Guest
Bonjour Ben

C'est normal, c'est parce que ton userform à le focus et non la feuille.

Pour éviter ce problème, faut juste espéré que tu as Excel 2000, parce que pour les version plus ancienne c'est un peu plus compiqué:

Remplace ton Userform6.show par Userform6.show 0

Le 0 ou rien, est pour modal et non-modal, ce qui veux dire que pendant que ton userform est ouvert tu peux travailler sur ta feuille

Bonne chance

@christophe@
 
B

ben

Guest
cela ne marche pas j'ai un message : impossible d'afficher une feuille non modale lorsqu'une feuille modale est affiché, et je ne peut pas faire un unload sur mes autre feuille car j'ai besoin des donnée

As tu une autre solution ?
 

Discussions similaires

Statistiques des forums

Discussions
312 967
Messages
2 094 028
Membres
105 920
dernier inscrit
SAUSSARd