XL 2010 Résolu par Chris : atteindre 1ère cellule vide à gauche de la ligne active

[Usine à gaz]

Bonjour à toutes et à tous,

Encore un souci que je n'arrive pas à résoudre.

Exemple :
Je suis sur la ligne 10 et j'ai les cellules de A10 à D10 NON vides
J'ai besoin d'atteindre la 1ère cellule vide soit la cellule E10

J'ai un code qui fonctionne bien mais qui m'envoie à la première cellule vide + une complètement à droite.

Range("IV" & ActiveCell.Row).End(xlToLeft).Offset(0, 1).Select

Je n'arrive pas, malgré mes recherche, à la modifier pour atteindre et sélectionner la 1ère cellule vide à gauche.

Pourriez-vous m'aider ?
Si besoin d'un fichier test, j'en ferai un 😉
Avec mes remerciements,
Je vous souhaite à toutes et à tous une bonne journée,
Amicalement,
Lionel,

 

[chris]

Bonjour

Si tu as des cellules remplies après E10 et que tu veux atteindre E10, il faut faire le déplacement dans le sens inverse ActiveCell.End(xlToRight).Select

 

[Usine à gaz]

Bonjour Chris,
Merci de m'avoir répondu ..... je teste et je reviens
😉

 

[chris]

Re

J'ai oublié de préciser que c'est en partant d'une cellule située avant E et omis l'offset
Donc au pire remplacer Activecell par cells(activecell.row, 1)

Cells(ActiveCell.Row, 1).End(xlToRight).Offset(0, 1).Select

 

[Usine à gaz]

Re Chris,

ça marche super 😉
j'ai utilisé ce code :

ActiveCell.End(xlToRight).Offset(0, 1).Select

Un grand merci,
Amicalement,
Lionel,

 

[TooFatBoy]

Bonjour,

J'ai oublié de préciser que c'est en partant d'une cellule située avant E

C'est même avant "D", non ?
Parce que si on part de D (vide ou pleine) et que E est vide, on se retrouve sur la première cellule pleine ou en XFD, me semble-t-il.

 

[Usine à gaz]

Bonjour Marcel,

Merci pour ton message.
ça marche super avec ce code :

ActiveCell.End(xlToRight).Offset(0, 1).Select

😉

 

[TooFatBoy]

ça marche super avec ce code :

ActiveCell.End(xlToRight).Offset(0, 1).Select

Je ne doute absolument pas que ça fonctionne parfaitement dans ton cas. 😉

Mais dans l'absolu, si ton ActiveCell est en colonne D et que E est vide, tu ne tomberas pas sur E avec cette instruction, bien que E soit la première cellule non vide.
C'est tout ce que je voulais faire remarquer. Oui, je sais, je suis "légèrement" pointilleux... LOL

[edit]Et du coup l'offset risque peut-être de créer une erreur si le End(xlToRight) pointe en colonne XFD.[/edit]


@+ 😉