Comment accéder à un bouton d'un UserForm ouvert en non modal [Résolu]

[jayjay08]

Bonjour,

Voilà, j'ai une petite macro développée en SolidWorks qui me permet d'imprimer tous les plans des composants d'un assemblage. La macro fonctionne bien mais pendant l'impression des dessins (qui prend un certain temps suivant le nombre de composants) j'affiche un UserForm avec barre de progression. Je souhaiterais également à partir de ce UserForm permettre à l'utilisateur d'annuler l'impression (en fait mettre fin à la macro). Je sais quel code mettre derrière ce bouton mais le problème c'est que le UserForm est ouvert en "Modeless" pour permettre à la macro de poursuivre son traitement. De ce fait je n'ai aucun accès, si ce n'est que visuel, au UserForm en question !

Je suis embêté, quelqu'un aurait-il une solution directe ou est-ce plus compliqué que ça en a l'air ?!

Merci d'avance...

[bbil]

As tu bien au moins un DoEvents dans ta boucle de calcul , qui doit être située après l'affichage en non-modal de ton userform ..?

[jayjay08]

Oui, j'ai pensé à mettre un DoEvents dans l'initialisation de mon UserForm mais ça ne change rien... A moins que je ne l'utilise pas comme je devrais ?!

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
Sub main()
 
Load UserForm1
UserForm1.Show
...
 
End Sub
 
Private Sub UserForm1_Activate()
 
    DoEvents
 
End Sub

[bbil]

Non ce n'est pas la qu'il faut un DoEvents..


la commande UserForm.show , appelle ton userForm en mode Modal ... ou as tu mis ta boucle de calcul

[jayjay08]

Je l'ai mis là où il y a les "..." dans le code ce qui fonctionne assez bien si je travaille en non-modal mais évidemment ça me ne permet plus d'accéder à mon bouton CANCEL. J'ai aussi pensé à déplacer ma boucle de calcul vers mon UserForm, alors un show modal pourrait fonctionner mais je ne sais pas bien sous quel évènement le placer, j'ai quand même pas mal de code avec appel de sous-routines, etc...

[bbil]

il faut laisser le code ou il est travailler en mode non-modal .. puis rajouter des DoEvents dans ton calcul (tes boucles ??) pour permettre au système de prendre la main pour gérer l'affichage...

[jayjay08]

Super ça marche, je l'ai placé au début de ma boucle principal !

Merci beaucoup...