Stoper un Userform

[creolia]

Bonjour à tous j'ai un petit soucis j'utilise une barre de progression avec cette macro

Private Sub UserForm_Activate()
UserForm1.ListView3.ListItems.Clear
With Application
.Calculation = xlCalculationManual: .ScreenUpdating = False: .DisplayAlerts = False
    With ProgressBar1
   .Min = 0
   .Max = 25
    End With
      'UserForm1.Caption = "patientez !!!  travail en cours..."
      Call Filtres.rose_A
      ProgressBar1.Value = ProgressBar1.Value + 5
     Call rouge_A
      ProgressBar1.Value = ProgressBar1.Value + 5
     Call Filtres.orange_A
      ProgressBar1.Value = ProgressBar1.Value + 5
     Call Filtres.vert_A
      ProgressBar1.Value = ProgressBar1.Value + 5
      Call Filtres.bleu_A
      ProgressBar1.Value = ProgressBar1.Value + 5
.Calculation = xlCalculationAutomatic: .ScreenUpdating = True: .DisplayAlerts = True
End With
End

End Sub

De mon userform1 je lance mon second userform (FiltreMe) probleme à la fin de ma barre de progresion

FiltreMe et Userform1 se ferme alors que je voudrais que se soit FiltreMe uniquement qui se ferme

j'ai un peut tous essayer End Unload FiltreMe mais rien à faire les deux s'arretes

pouvez vous m'aidez Svp merci

 

[Pierrot93]

Re : Stoper un Userform

Bonjour,

pour décharger un usf :

Unload UserForm1

sans fichier, difficile d'en dire plus... enfin pour moi...

bonne journée
@+

 

[creolia]

Re : Stoper un Userform

Merci pierrot mais sa me ferme les deux userform je vais faire un petit fichier en Pj

 

[Pierrot93]

Re : Stoper un Userform

Re,

essaye peut être en le masquant :

UserForm1.Hide

 

[creolia]

Re : Stoper un Userform

Re pierrot bon dans là Pj tous se passe bien c'est donc dans mon Réel projet que sa pose probleme je vais faire une investigation de ce coté et je vous tien informé

 

[Pierrot93]

Re : Stoper un Userform

Re,

as tu vu mon post de 10h37 ?

 

[creolia]

Re : Stoper un Userform

Re oui j'etait en train de le tester effectivement sa me le cache bien probleme quand je le relance j'utilise la commande FiltreMe.show et la erreur pour le faire réaparaitre dois je utilisé une autre commande

 

[creolia]

Re : Stoper un Userform

la pj mais bon lol sa fonctionne avec la pj pas le fichier réel qui est imense

 

[Pierrot93]

Re : Stoper un Userform

Bonjour,

j'ai un message d'erreur quand j'ouvre ton fichier... problème de bibliothèque.... mais je ne dispose pas de ce contrôle sur cette machine...

 

[creolia]

Re : Stoper un Userform

re Cher pierrot probleme résolu c'etait tous bete pour faire les teste je le faisais à directement par vba et sa fonctionnais pas unload Filtreme
mais en lançant Usf par le bias du bouton à partir de ma page tous fonctionne bien la fermeture ne se fais que sur FiltreMe donc je ne sais pas pourquoi mais sa marche

en tous cas grand merci

à trés bientot