Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel Se positionner sur la prochaine cellule vide

Se positionner sur la prochaine cellule vide

6 réponses
Avatar
Jacques \(Be\)
Bonjour,

Je dois récupérer les valeurs se trouvant dans la ligne 5 de la colonne A à
??? la dernière valeur. Comment parcourir cette ligne
jusqu'à la dernière non vide ?

Merci de vos réponses
Signaler un problème avec ce contenu

6 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
michdenis
Bonjour Jacques,

'------------------------
Dim DerLig As Long

With Worksheets("Feuil1")
DerLig = .Range("A65536").End(xlUp)(2).Row
End With
'------------------------


Salutations!



"Jacques (Be)" a écrit dans le message de news:
Bonjour,

Je dois récupérer les valeurs se trouvant dans la ligne 5 de la colonne A à
??? la dernière valeur. Comment parcourir cette ligne
jusqu'à la dernière non vide ?

Merci de vos réponses
Avatar
Jacques \(Be\)
Bonjour

et ... merci :-)


"michdenis" a écrit dans le message de
news:
Bonjour Jacques,

'------------------------
Dim DerLig As Long

With Worksheets("Feuil1")
DerLig = .Range("A65536").End(xlUp)(2).Row
End With
'------------------------


Salutations!



"Jacques (Be)" a écrit dans le message de news:


Bonjour,

Je dois récupérer les valeurs se trouvant dans la ligne 5 de la colonne A
à

??? la dernière valeur. Comment parcourir cette ligne
jusqu'à la dernière non vide ?

Merci de vos réponses





Avatar
jps
bonjour jacques
un truc dans ce genre devrait faire l'affaire :

Sub PremiereCelluleVideA droite()
Range("A5").Select
Do While Not IsEmpty(ActiveCell)
ActiveCell.Offset(0, 1).Select
Loop
End Sub

HTH
jps

"Jacques (Be)" a écrit dans le message de news:

Bonjour,

Je dois récupérer les valeurs se trouvant dans la ligne 5 de la colonne A
à
??? la dernière valeur. Comment parcourir cette ligne
jusqu'à la dernière non vide ?

Merci de vos réponses




Avatar
LSteph
Bonjour "Jacques (de Belgique)",
(Pardon si cela à l'air un peu pointilleux en ce jour, limite désagréable
, ce n'est pas mon but)

Si l'on veut sélectionner jusqu'à la dernière non vide de la ligne (il peut
y avoir des vides dans la lignes)
...cette ligne
....jusqu'à la dernière non vide
'''***

If not isempty(Cells(5,256)) then
Rows(5).select
else
Range(Cells(5,1),Cells(5,256).end(xltoleft)).select
end if
'''***
(> Je dois récupérer les valeurs....cela dépend pour faire quoi ou les
mettre où)
'Sinon:
'"Se positionner sur la prochaine cellule vide" (selon l'objet de ton post)
'c'est bien avec ce qu'a donné JPS
et >'Comment parcourir serait encore autre chose.

;o) à bientôt

'lSteph

"Jacques (Be)" a écrit dans le message de news:

Bonjour,

Je dois récupérer les valeurs se trouvant dans la ligne 5 de la colonne A
à
??? la dernière valeur. Comment parcourir > jusqu'à la dernière non vide ?

Merci de vos réponses




Avatar
Jacques\(BE\)
Bonjour,

Merci à tous pour les réponses.

Pour LSteph restons pointilleux ... de Belgique mais au Canada :-)

Jacques


"LSteph" a écrit dans le message de
news:
Bonjour "Jacques (de Belgique)",
(Pardon si cela à l'air un peu pointilleux en ce jour, limite
désagréable

, ce n'est pas mon but)

Si l'on veut sélectionner jusqu'à la dernière non vide de la ligne (il
peut

y avoir des vides dans la lignes)
...cette ligne
....jusqu'à la dernière non vide
'''***

If not isempty(Cells(5,256)) then
Rows(5).select
else
Range(Cells(5,1),Cells(5,256).end(xltoleft)).select
end if
'''***
(> Je dois récupérer les valeurs....cela dépend pour faire quoi ou les
mettre où)
'Sinon:
'"Se positionner sur la prochaine cellule vide" (selon l'objet de ton
post)

'c'est bien avec ce qu'a donné JPS
et >'Comment parcourir serait encore autre chose.

;o) à bientôt

'lSteph

"Jacques (Be)" a écrit dans le message de news:

Bonjour,

Je dois récupérer les valeurs se trouvant dans la ligne 5 de la colonne
A


à
??? la dernière valeur. Comment parcourir > jusqu'à la dernière non vide
?



Merci de vos réponses








Avatar
LSteph
;o)) Bonne journée!

"Jacques(BE)" a écrit dans le message de news:

Bonjour,

Merci à tous pour les réponses.

Pour LSteph restons pointilleux ... de Belgique mais au Canada :-)

Jacques


"LSteph" a écrit dans le message de
news:
Bonjour "Jacques (de Belgique)",
(Pardon si cela à l'air un peu pointilleux en ce jour, limite
désagréable

, ce n'est pas mon but)

Si l'on veut sélectionner jusqu'à la dernière non vide de la ligne (il
peut

y avoir des vides dans la lignes)
...cette ligne
....jusqu'à la dernière non vide
'''***

If not isempty(Cells(5,256)) then
Rows(5).select
else
Range(Cells(5,1),Cells(5,256).end(xltoleft)).select
end if
'''***
(> Je dois récupérer les valeurs....cela dépend pour faire quoi ou les
mettre où)
'Sinon:
'"Se positionner sur la prochaine cellule vide" (selon l'objet de ton
post)

'c'est bien avec ce qu'a donné JPS
et >'Comment parcourir serait encore autre chose.

;o) à bientôt

'lSteph

"Jacques (Be)" a écrit dans le message de news:

Bonjour,

Je dois récupérer les valeurs se trouvant dans la ligne 5 de la colonne
A


à
??? la dernière valeur. Comment parcourir > jusqu'à la dernière non
vide
?



Merci de vos réponses