Rapport de message :*
 

Re: Macro pour suppression de lignes

Titre du sujet : Re: Macro pour suppression de lignes
par Guy le 20/02/2011 21:47:18

Bonjour Sylvain,

Ben oui. C'est que tu cherches à être général et tu poses une question particulière. Bref, si tu bricoles une plage dynamique en colonne B tu n'auras qu'à remplacer

Set Plage = Feuil1.Range("B1:B10")
par
Set Plage = Feuil1.Range("UnePlageDynamique")
et UnePlageDynamique aura la forme
=DECALER(Feuil1!$B$1;;;NBVAL(Feuil1!$B:$B))
à condition que cette fois Feuil1 soit le nom d'onglet de la feuille en question et qu'aucune cellule vide ne soit intercalée dans cette plage.

Pour définir la plage : menu Insertion/Nom/Définir... saisir Nom dans le claseur : UnePlageDynamique et Fait référence à : =DECALER(Feuil1!$B$1;;;NBVAL(Feuil1!$B:$B))  selon ce qui est indiqué et le tour est joué.

Cordialement,

Guy