Je cherche à retrouver, pour une ligne donnée, la dernière cellule avec
une valeur.
J'utilise les 3 codes suivants :
w = Sheets("Production").Range("IV7").End(xlToLeft) me donne la
valeur de la cellule.
w = Sheets("Production").Range("IV7").End(xlToLeft) me donne 17.
w = Sheets("Production").Range("IV7").End(xlToLeft).Address
me donne $Q$7.
Je voudrais obtenir "Q". Quelqu'un peut-il m'aider à trouver la solution ?
Cela m'arrive aussi souvent et comme je ne maîtrise pas grand chose dans Excel, cela a encore plus de conséquences pour moi.
As-tu lu ma seconde question dans le mail de 15 H 40. ?
Julie
michdenis a écrit :
Oui oui tu as raison... il y a des matins où c'est plus difficile que d'autres ! ;-))
michdenis
Pour connaître la dernière cellule occupée dans une colonne particulière, tu peux utiliser ceci :
La dernière cellule pourrait contenir par exemple une formule qui retourne "" : exemple : =Si(A1%;10;""). Le code suivant tient compte de cette possibilité. Si tu veux avoir seulement la dernière cellule affichant une valeur, tu modifies XlFormulas par XlValues
With worksheets("NomDeLaFeuille") with Range("B:B") DerLig = .Find(What:="*", _ LookIn:=xlFormulas, _ SearchOrder:=xlByRows, _ SearchDirection:=xlPrevious).Row End with End with
Si tu désires connaître la dernière cellule occupée dans une plage de cellule : Dernière cellule occupée dans la plage : A:K
With worksheets("NomDeLaFeuille") with Range("A:K") DerLig = .Find(What:="*", _ LookIn:=xlFormulas, _ SearchOrder:=xlByRows, _ SearchDirection:=xlPrevious).Row End with End with
"JulieH" a écrit dans le message de groupe de discussion : OobM$ Merci à nouveau, c'est effectivement beaucoup plus "simple". Chez moi, cela fonctionne avec (1).
Si je peux me permettre de profiter à nouveau de votre aide, j'ai une autre question dans le même genre :
J'ai un tableau avec par exemple 10 valeurs en colonne A - 15 valeurs en B - 11 valeurs en C .... Je souhaite retrouver la ligne de la dernière valeur du tableau qui est dans la colonne B. Evidemment, je ne sais par avance que la colonne la plus longue est B.
j'ai essayé avec le code suivant mais cela ne me semble pas fonctionner. z = Sheets("toto").Range("A" & Rows.Count).End(xlUp).Row
Julie
michdenis a écrit :
C'était un zéro à la plage du 1. Il doit me manquer un café...;-)
x =split(Sheets("Production").Range("IV7").End(xlToLeft).Address,"$")(0)
Pour connaître la dernière cellule occupée dans une colonne
particulière, tu peux utiliser ceci :
La dernière cellule pourrait contenir par exemple une formule
qui retourne "" : exemple : =Si(A1%;10;""). Le code suivant
tient compte de cette possibilité. Si tu veux avoir seulement
la dernière cellule affichant une valeur, tu modifies XlFormulas
par XlValues
With worksheets("NomDeLaFeuille")
with Range("B:B")
DerLig = .Find(What:="*", _
LookIn:=xlFormulas, _
SearchOrder:=xlByRows, _
SearchDirection:=xlPrevious).Row
End with
End with
Si tu désires connaître la dernière cellule occupée dans une plage de cellule :
Dernière cellule occupée dans la plage : A:K
With worksheets("NomDeLaFeuille")
with Range("A:K")
DerLig = .Find(What:="*", _
LookIn:=xlFormulas, _
SearchOrder:=xlByRows, _
SearchDirection:=xlPrevious).Row
End with
End with
"JulieH" <julieh@discussions.microsoft.com> a écrit dans le message de groupe de
discussion : OobM$a5vKHA.5936@TK2MSFTNGP04.phx.gbl...
Merci à nouveau, c'est effectivement beaucoup plus "simple".
Chez moi, cela fonctionne avec (1).
Si je peux me permettre de profiter à nouveau de votre aide,
j'ai une autre question dans le même genre :
J'ai un tableau avec par exemple 10 valeurs en colonne A - 15
valeurs en B - 11 valeurs en C ....
Je souhaite retrouver la ligne de la dernière valeur du tableau
qui est dans la colonne B. Evidemment, je ne sais par avance que la
colonne la plus longue est B.
j'ai essayé avec le code suivant mais cela ne me semble pas
fonctionner.
z = Sheets("toto").Range("A" & Rows.Count).End(xlUp).Row
Julie
michdenis a écrit :
C'était un zéro à la plage du 1. Il doit me manquer un café...;-)
x =split(Sheets("Production").Range("IV7").End(xlToLeft).Address,"$")(0)
Pour connaître la dernière cellule occupée dans une colonne particulière, tu peux utiliser ceci :
La dernière cellule pourrait contenir par exemple une formule qui retourne "" : exemple : =Si(A1%;10;""). Le code suivant tient compte de cette possibilité. Si tu veux avoir seulement la dernière cellule affichant une valeur, tu modifies XlFormulas par XlValues
With worksheets("NomDeLaFeuille") with Range("B:B") DerLig = .Find(What:="*", _ LookIn:=xlFormulas, _ SearchOrder:=xlByRows, _ SearchDirection:=xlPrevious).Row End with End with
Si tu désires connaître la dernière cellule occupée dans une plage de cellule : Dernière cellule occupée dans la plage : A:K
With worksheets("NomDeLaFeuille") with Range("A:K") DerLig = .Find(What:="*", _ LookIn:=xlFormulas, _ SearchOrder:=xlByRows, _ SearchDirection:=xlPrevious).Row End with End with
"JulieH" a écrit dans le message de groupe de discussion : OobM$ Merci à nouveau, c'est effectivement beaucoup plus "simple". Chez moi, cela fonctionne avec (1).
Si je peux me permettre de profiter à nouveau de votre aide, j'ai une autre question dans le même genre :
J'ai un tableau avec par exemple 10 valeurs en colonne A - 15 valeurs en B - 11 valeurs en C .... Je souhaite retrouver la ligne de la dernière valeur du tableau qui est dans la colonne B. Evidemment, je ne sais par avance que la colonne la plus longue est B.
j'ai essayé avec le code suivant mais cela ne me semble pas fonctionner. z = Sheets("toto").Range("A" & Rows.Count).End(xlUp).Row
Julie
michdenis a écrit :
C'était un zéro à la plage du 1. Il doit me manquer un café...;-)
x =split(Sheets("Production").Range("IV7").End(xlToLeft).Address,"$")(0)
isabelle
ba non, je reviens tous juste, j'étais parti au café ;-) isabelle
Le 2010-03-09 09:48, michdenis a écrit :
J'espère Isabelle que tu n'es pas offusqué... c'était seulement pour la rigolade !
Salutations.
ba non, je reviens tous juste, j'étais parti au café ;-)
isabelle
Le 2010-03-09 09:48, michdenis a écrit :
J'espère Isabelle que tu n'es pas offusqué... c'était seulement pour la rigolade !
| ba non, je reviens tous juste, j'étais parti au café ;-)
La matinée qui termine sur une bonne note ! ;-)
JulieH
Le temps de prendre le café !!!, de réaliser quelques essais.
Voilà tout fonctionne. Merci beaucoup.
Julie
michdenis a écrit :
Pour connaître la dernière cellule occupée dans une colonne particulière, tu peux utiliser ceci :
La dernière cellule pourrait contenir par exemple une formule qui retourne "" : exemple : =Si(A1%;10;""). Le code suivant tient compte de cette possibilité. Si tu veux avoir seulement la dernière cellule affichant une valeur, tu modifies XlFormulas par XlValues
With worksheets("NomDeLaFeuille") with Range("B:B") DerLig = .Find(What:="*", _ LookIn:=xlFormulas, _ SearchOrder:=xlByRows, _ SearchDirection:=xlPrevious).Row End with End with
Si tu désires connaître la dernière cellule occupée dans une plage de cellule : Dernière cellule occupée dans la plage : A:K
With worksheets("NomDeLaFeuille") with Range("A:K") DerLig = .Find(What:="*", _ LookIn:=xlFormulas, _ SearchOrder:=xlByRows, _ SearchDirection:=xlPrevious).Row End with End with
"JulieH" a écrit dans le message de groupe de discussion : OobM$ Merci à nouveau, c'est effectivement beaucoup plus "simple". Chez moi, cela fonctionne avec (1).
Si je peux me permettre de profiter à nouveau de votre aide, j'ai une autre question dans le même genre :
J'ai un tableau avec par exemple 10 valeurs en colonne A - 15 valeurs en B - 11 valeurs en C .... Je souhaite retrouver la ligne de la dernière valeur du tableau qui est dans la colonne B. Evidemment, je ne sais par avance que la colonne la plus longue est B.
j'ai essayé avec le code suivant mais cela ne me semble pas fonctionner. z = Sheets("toto").Range("A" & Rows.Count).End(xlUp).Row
Julie
michdenis a écrit :
C'était un zéro à la plage du 1. Il doit me manquer un café...;-)
x =split(Sheets("Production").Range("IV7").End(xlToLeft).Address,"$")(0)
Le temps de prendre le café !!!, de réaliser quelques essais.
Voilà tout fonctionne. Merci beaucoup.
Julie
michdenis a écrit :
Pour connaître la dernière cellule occupée dans une colonne
particulière, tu peux utiliser ceci :
La dernière cellule pourrait contenir par exemple une formule
qui retourne "" : exemple : =Si(A1%;10;""). Le code suivant
tient compte de cette possibilité. Si tu veux avoir seulement
la dernière cellule affichant une valeur, tu modifies XlFormulas
par XlValues
With worksheets("NomDeLaFeuille")
with Range("B:B")
DerLig = .Find(What:="*", _
LookIn:=xlFormulas, _
SearchOrder:=xlByRows, _
SearchDirection:=xlPrevious).Row
End with
End with
Si tu désires connaître la dernière cellule occupée dans une plage de cellule :
Dernière cellule occupée dans la plage : A:K
With worksheets("NomDeLaFeuille")
with Range("A:K")
DerLig = .Find(What:="*", _
LookIn:=xlFormulas, _
SearchOrder:=xlByRows, _
SearchDirection:=xlPrevious).Row
End with
End with
"JulieH" <julieh@discussions.microsoft.com> a écrit dans le message de groupe de
discussion : OobM$a5vKHA.5936@TK2MSFTNGP04.phx.gbl...
Merci à nouveau, c'est effectivement beaucoup plus "simple".
Chez moi, cela fonctionne avec (1).
Si je peux me permettre de profiter à nouveau de votre aide,
j'ai une autre question dans le même genre :
J'ai un tableau avec par exemple 10 valeurs en colonne A - 15
valeurs en B - 11 valeurs en C ....
Je souhaite retrouver la ligne de la dernière valeur du tableau
qui est dans la colonne B. Evidemment, je ne sais par avance que la
colonne la plus longue est B.
j'ai essayé avec le code suivant mais cela ne me semble pas
fonctionner.
z = Sheets("toto").Range("A" & Rows.Count).End(xlUp).Row
Julie
michdenis a écrit :
C'était un zéro à la plage du 1. Il doit me manquer un café...;-)
x =split(Sheets("Production").Range("IV7").End(xlToLeft).Address,"$")(0)
Le temps de prendre le café !!!, de réaliser quelques essais.
Voilà tout fonctionne. Merci beaucoup.
Julie
michdenis a écrit :
Pour connaître la dernière cellule occupée dans une colonne particulière, tu peux utiliser ceci :
La dernière cellule pourrait contenir par exemple une formule qui retourne "" : exemple : =Si(A1%;10;""). Le code suivant tient compte de cette possibilité. Si tu veux avoir seulement la dernière cellule affichant une valeur, tu modifies XlFormulas par XlValues
With worksheets("NomDeLaFeuille") with Range("B:B") DerLig = .Find(What:="*", _ LookIn:=xlFormulas, _ SearchOrder:=xlByRows, _ SearchDirection:=xlPrevious).Row End with End with
Si tu désires connaître la dernière cellule occupée dans une plage de cellule : Dernière cellule occupée dans la plage : A:K
With worksheets("NomDeLaFeuille") with Range("A:K") DerLig = .Find(What:="*", _ LookIn:=xlFormulas, _ SearchOrder:=xlByRows, _ SearchDirection:=xlPrevious).Row End with End with
"JulieH" a écrit dans le message de groupe de discussion : OobM$ Merci à nouveau, c'est effectivement beaucoup plus "simple". Chez moi, cela fonctionne avec (1).
Si je peux me permettre de profiter à nouveau de votre aide, j'ai une autre question dans le même genre :
J'ai un tableau avec par exemple 10 valeurs en colonne A - 15 valeurs en B - 11 valeurs en C .... Je souhaite retrouver la ligne de la dernière valeur du tableau qui est dans la colonne B. Evidemment, je ne sais par avance que la colonne la plus longue est B.
j'ai essayé avec le code suivant mais cela ne me semble pas fonctionner. z = Sheets("toto").Range("A" & Rows.Count).End(xlUp).Row
Julie
michdenis a écrit :
C'était un zéro à la plage du 1. Il doit me manquer un café...;-)
x =split(Sheets("Production").Range("IV7").End(xlToLeft).Address,"$")(0)
