RESOLU par pierrejean - Bug des deux Usf

[castor30]

Bonjour à tous, le forum,
Je me retrouve bloqué avec les Usf, si je valide, je ne peut plus rien faire d'autre qu'éteindre le PC
Si vous arrivez à trouver vous êtes champions.

 

[pierrejean]

Bonjour castor 30

Dans la sub Ecrire tester:

With Selection.Font
.Name = "Times New Roman"
.Size = 8
End With
Unload Usf_EC
Selection.Font.Italic = True

 

[castor30]

Bonjour pierrejean,
Heureux de vous revoir. C'est OK pour l'Usf_EC
Ne reste plus que l'Usf_Action qui pose le même problème.
Je vous remercie de tout cœur.

 

[pierrejean]

Re
Pas très difficile a trouver :

End With
Unload Usf_Action
Unload Usf_EC
Selection.Font.Italic = True

 

[castor30]

Re
Je ne comprend pas car l'Usf_Action ne concerne que la feuille Base

 

[pierrejean]

Re
Aucun rapport avec la ou les feuilles
Il faut simplement 'unloader' les Usf avant de faire un PrintPreview

 

[castor30]

OK Merci pierrejean je prend bonne note