Traduction "sélectionner cellule contiguë" en VBA

[Magic_Doctor]

Bonjour à tous,

Je clique sur une cellule, une macro événementielle se déclenche.
Cette possibilité s'applique en fait à plusieurs cellules réparties sur la feuille.
Je voudrais, quand la macro s'achève, que la cellule immédiatement à droite de la cellule qui déclenche la macro quand on clique dessus soit sélectionnée.
Exemple : si A1 la cellule "opératrice" ---> B1 sélectionnée
si H27 la cellule "opératrice" ---> I27 sélectionnée

Merci pour vos conseils.

 

[tototiti2008]

Re : Traduction "sélectionner cellule contiguë" en VBA

Bonjour Magic_Doctor,

à tester

Target.offset(0,1).select

Edit : Attention à ce que ça ne déclenche pas un autre évènement, tu risques de te retrouver assez vite dans la dernière colonne, sinon 🙂

 

[Magic_Doctor]

Re : Traduction "sélectionner cellule contiguë" en VBA

Merci tototiti pour ton intervention,

C'est exactement ce que je cherchais.

 

[Etienne2323]

Re : Traduction "sélectionner cellule contiguë" en VBA

Salut Magic_Doctor,
pour faire suite à ce que tototiti mentionne, il suffit d'ajouter ceci pour t'assurer qu'il n'y a pas d'autres évènementielles qui se déclenchent entre temps:

Application.EnableEvents = False
Target.Offset(0, 1).Select
Application.EnableEvents = True

Cordialement,

Étienne

 

[Magic_Doctor]

Re : Traduction "sélectionner cellule contiguë" en VBA

Bonsoir Etienne2323,

J'ai pris compte de ton conseil et modifié la routine en conséquence.

Bonne soirée