VBA: Range avec variable

Fermé
jmarichal - 7 juil. 2008 à 10:24
Shooshoo Messages postés 1 Date d'inscription jeudi 25 avril 2013 Statut Membre Dernière intervention 25 avril 2013 - 25 avril 2013 à 15:07
Bonjours a tous,

j'espère que vous avez passé un bon W-E

Voici mon problème

j'aimerai que dans une boucle 8 cellule de la même ligne soit dans 1 seule variable (Range)
mais je n'y arrive pas

j'avais penser a faire ceci
j = Range("A1").CurrentRegion.Rows.Count
Myrange = Range(ActiveCell.Cells(j, 1), ActiveCell.Cells(j, 3))
mais sa ne marche pas

par contre ceci fonctionne
Range(ActiveCell.Cells(j, 1), ActiveCell.Cells(j, 3)).Select

je ne comprend pas le pourquoi

d'avance merci

3 réponses

michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 303
7 juil. 2008 à 10:35
Bonjour,

Sub selectionner_zone()
Dim myrange As Range
j = Range("A1").CurrentRegion.Rows.Count
Set myrange = Range(Cells(j, 1), Cells(j, 3))
'test macro: on colorie la zone sélectionnée myrange en jaune
myrange.Interior.ColorIndex = 6
Set myrange = Nothing
End Sub

il fallait déclarer et instancier myrange
activecell ne servait à rien

Michel
4