OVH Cloud OVH Cloud

Première cellule vide à droite

4 réponses
Avatar
Michel
Bonjour
Je souhaite avoir en VBA la première cellule vide à droite de la ligne
sélectionnée
Merci
Michel

4 réponses

Avatar
Pierre Fauconnier
Bonsoir

Si tu veux la première cellule vide à droite, même s'il y en a d'autres non
vides après,
Range("A1").End(xlToRight)(1, 2).Select

Si tu veux celle qui suit la dernière cellule non vide de la ligne,
Range("IV1").End(xlToLeft)(1, 2).Select

En adaptant bien entendu la référence de la cellule de départ en fonction de
la ligne que tu souhaites traiter

Ok?


--
Pierre Fauconnier ()
"Le bonheur n'est pas au bout du chemin. Le bonheur EST le chemin ( proverbe
zen )
Remplacez nospam.nospam par pfi.be pour répondre. Merci

"Michel" a écrit dans le message de news:
%
Bonjour
Je souhaite avoir en VBA la première cellule vide à droite de la ligne
sélectionnée
Merci
Michel



Avatar
Patrick_67
Coucou !

Voilà qui devrait convenir :

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

Il n'y a même pas besoin de sélectionner au préalable une ligne complète. Se
positionner sur n'importe quelle cellule de la ligne suffit.

"Michel" a écrit dans le message de news:
%
Bonjour
Je souhaite avoir en VBA la première cellule vide à droite de la ligne
sélectionnée
Merci
Michel



Avatar
Michel
Merci beaucoup tous les 2, c'est parfait
Bonne journée
Michel

"Patrick_67" a écrit dans le message de news:
%
Coucou !

Voilà qui devrait convenir :

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

Il n'y a même pas besoin de sélectionner au préalable une ligne complète.
Se positionner sur n'importe quelle cellule de la ligne suffit.

"Michel" a écrit dans le message de news:
%
Bonjour
Je souhaite avoir en VBA la première cellule vide à droite de la ligne
sélectionnée
Merci
Michel







Avatar
déCalcoManiaque
bonjour,

ça dépend de ce qu'on cherche en fait :
la réponse donnée correspond à la 1ère cellule à droite de la dernière
cellule remplie de la ligne;
alors que si on cherche le 1er blanc de la ligne , la réponse est la
même si pas de "trou" et donne le 1er "trou" de la ligne sinon :
Range("A" & ActiveCell.Row).End(xlToRight).Select

amicalement


Michel a émis l'idée que voici :
Merci beaucoup tous les 2, c'est parfait
Bonne journée
Michel

"Patrick_67" a écrit dans le message de news:
%
Coucou !

Voilà qui devrait convenir :

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

Il n'y a même pas besoin de sélectionner au préalable une ligne complète.
Se positionner sur n'importe quelle cellule de la ligne suffit.

"Michel" a écrit dans le message de news:
%
Bonjour
Je souhaite avoir en VBA la première cellule vide à droite de la ligne
sélectionnée
Merci
Michel