VBA , Slection d'une colonne
yata
-
yata -
yata -
Bonjour,
voilà j'utilise ce code pour selectionner une colonne remplis!
je cherche à l'adapter selon un numéro de colonne!
par exemple
si numcolonne donne "5" je voudrais pouvoir selectionner la colonne 5 (ou E) comme aupparavant
merci
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:
- VBA , Slection d'une colonne
- Déplacer une colonne excel - Guide
- Trier une colonne excel - Guide
- Colonne word - Guide
- Excel additionner une colonne - Guide
- Figer une colonne excel - Guide
4 réponses
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
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
bonjour
XL<2007
derlig=ws.cells(65536,1).end(xlup).row
set plage=ws.range(cells(1,numcol),cells(derlig,numcol))
XL<2007
derlig=ws.cells(65536,1).end(xlup).row
set plage=ws.range(cells(1,numcol),cells(derlig,numcol))
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
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
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à
fonctionne correctement ! grand merci à vous
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
