encore une question de Range

[XanorK]

Bonjour,


Si y'a bien un truc qui me gene en VBA, c'est le RAnge.

Aujourd'hui, grace a l'enregistreur de macro, j'obtiens, apres retouche, la ligne de code suivante :
Range("B7:d" & DerLign & ",J7:J" & DerLign).Select
avec ca, il me sélectionne bien les colonnes B, C, D et J

Mon probleme est que c'est pas forcement la colonne J dont j'ai besoin, mais ca peut etre la colonne N°col (avec un dim N°col as integer)

j'ai donc ecrit ceci :
Range("B7:d" & DerLign, Range(Cells(7, N°col), Cells(DerLign, N°col))).Select
mais la il me selectionne toutes les colonnes de B à J


Comment faire ? Ou est mon erreur ?


D'avance merci

 

[skoobi]

Re : encore une question de Range

Bonjour,

essaye comme ceci:

Union(Range("B7:d" & DerLign), Cells(7, N°col), Cells(DerLign, N°col)).Select

 

[XanorK]

Re : encore une question de Range

Merci Skoobi,


Ta commande union m'a bien aidé.
Juste pour aider quiquonque aurait le meme souci, je precise que ta commande m'a selection les B7 à D&derlign MAIS unique la premiere et la derniere case de l'autre colonne.

J'ai dc rajouter un range ce qui donne :

Union(Range("B7:d" & DerLign), Range(Cells(7, N°col), Cells(DerLign, N°col))).Select

Et la miracle, ca marche !!!!!!!!!!