VBA , Slection d'une colonne

yata -  
 yata -
Bonjour,
voilà j'utilise ce code pour selectionner une colonne remplis!
 Set maplage = ws.Range("H2:H" & ws.Range("H65536").End(xlUp).Row)


je cherche à l'adapter selon un numéro de colonne!
par exemple
 numcolonne = rResult.Column

si numcolonne donne "5" je voudrais pouvoir selectionner la colonne 5 (ou E) comme aupparavant

merci
A voir également:

4 réponses

yata
 
j'ai essayer pleins de varainte du style :

Set maplage = ws.Range(numcolonne).End(xlUp)

Set maplage = ws.Range((numcolonne) & " : " & Range(numcolonne).End(xlUp).Row)

Set maplage = ws.cells(numcolonne).End(xlUp)

et encore plein d'autre mais cela ne fonctionne pas
0
michel_m Messages postés 16602 Date d'inscription   Statut Contributeur Dernière intervention   3 313
 
bonjour
XL<2007
derlig=ws.cells(65536,1).end(xlup).row
set plage=ws.range(cells(1,numcol),cells(derlig,numcol))
0
pijaku Messages postés 12263 Date d'inscription   Statut Modérateur Dernière intervention   2 761
 
Salut,
C'est assez tordu mais ça fonctionne :
Dim derlig As String
derlig = Cells(65536, 5).End(xlUp).Row
ActiveSheet.Range(Cells(1, 5), Cells(derlig, 5)).Select
0
yata
 
merci de m'avoir répondus
j'étais plus ou moin sur la même piste

j'allais vous refaire un petit poste en disans que ca ne marchais pas:p
puis je me suiis rendus compte que j'étais à l'ouest car la premiere solution de michel fonctionne mais je n'avais pas mit mon ws.
puis celle de pijaku j'avais laisser le selest dans mon set maplage

enfin voilà

 derlig = ws.Cells(65536, numColonne).End(xlUp).Row
 Set maplage = ws.Range(ws.Cells(2, numColonne), ws.Cells(derlig, numColonne))


fonctionne correctement ! grand merci à vous
0