Problème de Range

jmarichal · 7 Juillet 2008

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

Code:

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

Code:

Range(ActiveCell.Cells(j, 1), ActiveCell.Cells(j, 3)).Select

je ne comprend pas le pourquoi

d'avance merci

jmarichal · 7 Juillet 2008

Re : Problème de Range

après une petite recherche je me rend compte que j'ai oublier SET

RENAUDER · 7 Juillet 2008

Re : Problème de Range

Bonjour,
peut-être cela

Code:

    Dim Myrange As Range
    j = Range("A1").CurrentRegion.Rows.Count
    Set Myrange = Range(ActiveCell.Cells(j, 1), ActiveCell.Cells(j, 3))
    MsgBox Myrange.Address

job75 · 7 Juillet 2008

Re : Problème de Range

Bonjour,

Ecrire :

Code:

Dim Myrange As Range
---------------------
Set Myrange = Range(......)

Les variables Range ont un comportement particulier...

A+

Bonjour Renauder, pas raffraichi à temps

Problème de Range

jmarichal

Guest

jmarichal

Guest

RENAUDER

Nous a quitté

job75

XLDnaute Barbatruc

Discussions similaires

Problème de Range

jmarichal

Guest

jmarichal

Guest

RENAUDER

Nous a quitté

job75

XLDnaute Barbatruc

Discussions similaires

Privacy & Transparency

Privacy & Transparency