Masqué des colonnes avant impression

[Arnaud_Dubarre]

Bonjour à tous je viens vers vous car j’ai un petit souci j’ai réalisé ce code pour pouvoir pré-programmer l’impressions selon ce que la personne a besoin le problème est qu’une fois sur deux cela fonctionne pouvez-vous m’expliquer et savoir si il y a peut-être une autre façon de faire pour réaliser cela je vous mets le classeur en pièce jointe cela se trouve dans le userform6 et le userform7 je vous mets un exemple de code que j’ai réalisé en plus du classeur merci d’avance de votre aideGestion_des_Artistes_v300662020.xlsm (270,8 Ko)

[Yoyo01000]

Bonjour,
merci de poster un fichier sans données confidentielles !!!

[FFO]

Bonjour
Après analyse de tes procédures il me semble que les déchargements de tes formulaires sont effectués trop tôt et peuvent donc interrompre leur suite
Exemple :

Module12.Tri_par_pays

ActiveSheet.Range("$B$3:$AI$45").Autofilter Field:=13, Criteria1:=« ALLEMAGNE »

Unload Me
Feuil5.PrintPreview

ActiveSheet.ShowAllData

With Sheets(« Membres »).Cells
.EntireColumn.Hidden = False
.EntireRow.Hidden = False
End With

Le déchargement du formulaire est effectué avec la ligne de code :

Unload Me

C’est à dire que la suite peut en être affecté et notamment ce qui concerne l’impression :

Feuil5.PrintPreview

Je mettrais cette ligne en fin de procédure pour ne pas altérer son exécution ainsi :

Module12.Tri_par_pays

ActiveSheet.Range("$B$3:$AI$45").Autofilter Field:=13, Criteria1:=« ALLEMAGNE »

Feuil5.PrintPreview

ActiveSheet.ShowAllData

With Sheets(« Membres »).Cells
.EntireColumn.Hidden = False
.EntireRow.Hidden = False
End With
Unload Me

A tester et si concluant à répercuter sur tous les traitements dans le même cas

Espérant résoudre ta déconvenue