Discussion :

[wipMan]

yo

J'affiche une MsgBox a l'initialisation d'un UserForm. Aucun probleme. Jusqu'a ce que j'ajoute "Application.ScreenUpdating = False" qui produit des problemes d'affichage lorsque je deplace ma fenetre (MsgBox).
Je remarque que "Application.ScreenUpdating = True" ne pose pas de probleme.

Cela m'ennuie car j'ai plusieurs extractions a faire successivement depuis des fichiers que je ne souhaite pas rendre visibles.
Est-ce un comportement 'normal' ? Devrais-je appeler des fonctions realisant le meme travail a l'initialisation de mon formulaire pour palier ce probleme ?

Merci.

[MlNOU]

Bonjour ( yo ^^),

Il est normal que cela te pose des problemes d'affichage car le "false" te bloque tes fenetres et le "true" les debloque .
Tu peux mettres des "false" à chaque fois que tu fais des calculs et remettre "true" quand tu veux manipuler ton userform ou tout simplement ne pas mettre "false" mais tu risques d'avoir une macro un peu plus lente.

Voila en esperant t'avoir aidé

Cordialement MlNOU.

[Daniel.C]

Bonjour,

Si tu ne veux pas qu'on voie tes extractions, affiche une feuille vierge avant d'afficher ton userform.

[Invité]

Bonjour,
Il n’est pas interdit d’utiliser une autre instance d’Excel qui lui ne serait pas visible.
Ton application est visible tes fichier ne sont pas visible.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
Sub test()
Dim MyExcel As New Excel.Application
Dim MyClasseur As Workbook
Dim MyFeuille As Worksheet
Dim MyPlageCellule As Range
MyExcel.Visible = False
Set MyClasseur = MyExcel.Workbooks.Add
Set MyFeuille = MyClasseur.Sheets.Add
Set MyPlageCellule = MyFeuille.Range("A1:V12")
MyPlageCellule = "test"
End Sub

[wipMan]

Merci pour ces reponses. J'ai opte pour la plus simple mais elles me sont toutes utiles.