Evolution code vba "filtre élaboré"

[nauj]

Bonsoir Forum,
Je me suis permis de récupérer un code vba développé par J. Boisgontier permettant d'effectuer une extraction des lignes selon un critère choisi.
Je souhaiterais, en revanche, que ce code puisse appliquer exactement la même mise en forme des lignes et colonnes (couleur, hauteur, largeur, police, etc.) que celle du tableau d'origine.
Mon niveau en vba étant faible, je me remets à vos compétences.
Vous trouverez un exemple dans le fichier attaché.
Merci d'avance pour votre coopération.
Nauj

 

[BOISGONTIER]

Re : Evolution code vba "filtre élaboré"

Bonjour,

Voir PJ

Sheets("Points d'Action").[A1].CurrentRegion.Copy
[A1].PasteSpecial Paste:=xlPasteColumnWidths

JB

 

[nauj]

Re : Evolution code vba "filtre élaboré"

Bonjour Boisgontier, Forum,
Votre proposition me convient parfaitement
Merci pour le temps que vous avez bien voulu consacrer à mon sujet.
Cdt
Nauj