Se positionner sur la cellule suivante

[Tony44]

Bonjour,

je cherche un moyen par une macro de passer d'une cellule sur la cellule suivante.
Je m'explique :
je me positionne par exemple en cellule A2 et je veux aller en cellule A3, sans la nommer, car dans l'exemple la cellule de départ est A2 mais elle peut être en D15.
En gros je sais aller sur la cellule de départ, mais je ne sais pas dans mon code dire qu'il faut avancer d'une case.
Merci de votre aide,

 

[Sofhy]

Re : Se positionner sur la cellule suivante

Bonjour,

Essaye avec ce code :

activecell.offset(0,1).select

A++
Sofhy

Edit :
offset(X,0) permet de décaler plus ou moins dans la colonne
offset(0,X) permet de décaler plus ou moins dans la ligne

 

[mromain]

Re : Se positionner sur la cellule suivante

Bonjour Tony44, Sophy,

Sinon, pour éviter les Select :

Dim laCellule As Range

    'définir la cellule de départ (Feuil1!A1)
    Set laCellule = ThisWorkbook.Sheets("Feuil1").Range("A1")
    
    'changer la couleur de fond (rouge)
    laCellule.Interior.Color = RGB(255, 0, 0)
    
    'se décaler d'une cellule vers le bas (Feuil1!A2)
    Set laCellule = laCellule.Offset(1, 0)
    'changer la couleur de fond (rouge)
    laCellule.Interior.Color = RGB(255, 0, 0)
    
    'se décaler d'une cellule vers le bas et deux vers la droite (Feuil1!C3)
    Set laCellule = laCellule.Offset(1, 2)
    'changer la couleur de fond (rouge)
    laCellule.Interior.Color = RGB(255, 0, 0)

a+

 

[Tony44]

Re : Se positionner sur la cellule suivante

Merci beaucoup, c'est tout ce qui me manquait.

Bonjour,

Essaye avec ce code :

activecell.offset(0,1).select

A++
Sofhy

Edit :
offset(X,0) permet de décaler plus ou moins dans la colonne
offset(0,X) permet de décaler plus ou moins dans la ligne

 

[Robert]

Re : Se positionner sur la cellule suivante

Bonjour Tony, Sophy, bonjour le forum,

De A2 à A3 moi j'aurais plutôt dit :

ActiveCell.Offset(1, 0)

la première valeur étant le décalage par ligne qui peut être négatif pour remonter ou nul pour rester sur la même ligne)
la seconde valeur étant le décalage par colonne qui peut être négatif pour aller vers la gauche ou nul pour rester dans la même colonne...

 

[Sofhy]

Re : Se positionner sur la cellule suivante

Bonjour Romain et Robert,
Re Tony,

@Robert,
Yes, je me suis trompée, j'ai inversé les conditions.
Merci