Dans une feuille J'ai sur une colonne entre S17 et S116 qui represente des
Poids certaines cellules sont égale à 0 (c'est à dire non vide), je voudrai
conaitre la première cellule de cette colonne contenant 0 (c'est à dire les
coordonnées de la cellule ou plus exactement le N° de ligne)
Sub ff() For Each c In Range("S17:S1116") If Not IsEmpty(c) And c.Value = 0 Then MsgBox c.Row Exit Sub End If Next A+
Bonjour,
Je cherche a intgrer dans une procedure VBA :
Dans une feuille J'ai sur une colonne entre S17 et S116 qui represente des Poids certaines cellules sont égale à 0 (c'est à dire non vide), je voudrai conaitre la première cellule de cette colonne contenant 0 (c'est à dire les coordonnées de la cellule ou plus exactement le N° de ligne)
Merci d'avance
Christian
Bonjour,
pas le plus rapide mais simple
Sub ff()
For Each c In Range("S17:S1116")
If Not IsEmpty(c) And c.Value = 0 Then
MsgBox c.Row
Exit Sub
End If
Next
A+
Bonjour,
Je cherche a intgrer dans une procedure VBA :
Dans une feuille J'ai sur une colonne entre S17 et S116 qui represente des
Poids certaines cellules sont égale à 0 (c'est à dire non vide), je voudrai
conaitre la première cellule de cette colonne contenant 0 (c'est à dire les
coordonnées de la cellule ou plus exactement le N° de ligne)
Sub ff() For Each c In Range("S17:S1116") If Not IsEmpty(c) And c.Value = 0 Then MsgBox c.Row Exit Sub End If Next A+
Bonjour,
Je cherche a intgrer dans une procedure VBA :
Dans une feuille J'ai sur une colonne entre S17 et S116 qui represente des Poids certaines cellules sont égale à 0 (c'est à dire non vide), je voudrai conaitre la première cellule de cette colonne contenant 0 (c'est à dire les coordonnées de la cellule ou plus exactement le N° de ligne)
Merci d'avance
Christian
MichDenis
Pour obtenir la première ligne de ta colonne contenant la valeur 0 Adapte la plage de cellules
Validation matricielle : Maj + Ctrl + Enter =MIN(SI(A1:A4=0;LIGNE(A1:A4)))
"RAOUX" a écrit dans le message de news:
Bonjour,
Je cherche a intgrer dans une procedure VBA :
Dans une feuille J'ai sur une colonne entre S17 et S116 qui represente des Poids certaines cellules sont égale à 0 (c'est à dire non vide), je voudrai conaitre la première cellule de cette colonne contenant 0 (c'est à dire les coordonnées de la cellule ou plus exactement le N° de ligne)
Merci d'avance
Christian
Pour obtenir la première ligne de ta colonne contenant la valeur 0
Adapte la plage de cellules
Validation matricielle : Maj + Ctrl + Enter
=MIN(SI(A1:A4=0;LIGNE(A1:A4)))
"RAOUX" <christian.raoux@wanadoo.fr> a écrit dans le message de news:
XnF98DC9D8AF7CAFchristianraouxwanado@193.252.117.183...
Bonjour,
Je cherche a intgrer dans une procedure VBA :
Dans une feuille J'ai sur une colonne entre S17 et S116 qui represente des
Poids certaines cellules sont égale à 0 (c'est à dire non vide), je voudrai
conaitre la première cellule de cette colonne contenant 0 (c'est à dire les
coordonnées de la cellule ou plus exactement le N° de ligne)
Pour obtenir la première ligne de ta colonne contenant la valeur 0 Adapte la plage de cellules
Validation matricielle : Maj + Ctrl + Enter =MIN(SI(A1:A4=0;LIGNE(A1:A4)))
"RAOUX" a écrit dans le message de news:
Bonjour,
Je cherche a intgrer dans une procedure VBA :
Dans une feuille J'ai sur une colonne entre S17 et S116 qui represente des Poids certaines cellules sont égale à 0 (c'est à dire non vide), je voudrai conaitre la première cellule de cette colonne contenant 0 (c'est à dire les coordonnées de la cellule ou plus exactement le N° de ligne)
Merci d'avance
Christian
MichDenis
En VBA, la fonction Match lorsqu'elle ne trouve pas ce qu'elle cherche renvoie une erreur 91 . c'est le pourquoi de la présence de On error resume next '--------------------- Sub test() On Error Resume Next MsgBox Range("S17:S116")(Application.Match(0, Range("S17:S116"), 0)).Row End Sub '---------------------
"RAOUX" a écrit dans le message de news:
Bonjour,
Je cherche a intgrer dans une procedure VBA :
Dans une feuille J'ai sur une colonne entre S17 et S116 qui represente des Poids certaines cellules sont égale à 0 (c'est à dire non vide), je voudrai conaitre la première cellule de cette colonne contenant 0 (c'est à dire les coordonnées de la cellule ou plus exactement le N° de ligne)
Merci d'avance
Christian
En VBA, la fonction Match lorsqu'elle ne trouve pas ce qu'elle
cherche renvoie une erreur 91 . c'est le pourquoi de la présence
de On error resume next
'---------------------
Sub test()
On Error Resume Next
MsgBox Range("S17:S116")(Application.Match(0, Range("S17:S116"), 0)).Row
End Sub
'---------------------
"RAOUX" <christian.raoux@wanadoo.fr> a écrit dans le message de news:
XnF98DC9D8AF7CAFchristianraouxwanado@193.252.117.183...
Bonjour,
Je cherche a intgrer dans une procedure VBA :
Dans une feuille J'ai sur une colonne entre S17 et S116 qui represente des
Poids certaines cellules sont égale à 0 (c'est à dire non vide), je voudrai
conaitre la première cellule de cette colonne contenant 0 (c'est à dire les
coordonnées de la cellule ou plus exactement le N° de ligne)
En VBA, la fonction Match lorsqu'elle ne trouve pas ce qu'elle cherche renvoie une erreur 91 . c'est le pourquoi de la présence de On error resume next '--------------------- Sub test() On Error Resume Next MsgBox Range("S17:S116")(Application.Match(0, Range("S17:S116"), 0)).Row End Sub '---------------------
"RAOUX" a écrit dans le message de news:
Bonjour,
Je cherche a intgrer dans une procedure VBA :
Dans une feuille J'ai sur une colonne entre S17 et S116 qui represente des Poids certaines cellules sont égale à 0 (c'est à dire non vide), je voudrai conaitre la première cellule de cette colonne contenant 0 (c'est à dire les coordonnées de la cellule ou plus exactement le N° de ligne)
Merci d'avance
Christian
JB
Bonjour,
Set x = [A:A].Find(what:="0", LookIn:=xlValues) If Not x Is Nothing Then MsgBox x.Row
JB
On 19 fév, 15:29, RAOUX wrote:
Bonjour,
Je cherche a intgrer dans une procedure VBA :
Dans une feuille J'ai sur une colonne entre S17 et S116 qui represente des Poids certaines cellules sont égale à 0 (c'est à dire non vide), je voudrai conaitre la première cellule de cette colonne contenant 0 (c'est à di re les coordonnées de la cellule ou plus exactement le N° de ligne)
Merci d'avance
Christian
Bonjour,
Set x = [A:A].Find(what:="0", LookIn:=xlValues)
If Not x Is Nothing Then MsgBox x.Row
JB
On 19 fév, 15:29, RAOUX <christian.ra...@wanadoo.fr> wrote:
Bonjour,
Je cherche a intgrer dans une procedure VBA :
Dans une feuille J'ai sur une colonne entre S17 et S116 qui represente des
Poids certaines cellules sont égale à 0 (c'est à dire non vide), je voudrai
conaitre la première cellule de cette colonne contenant 0 (c'est à di re les
coordonnées de la cellule ou plus exactement le N° de ligne)
Set x = [A:A].Find(what:="0", LookIn:=xlValues) If Not x Is Nothing Then MsgBox x.Row
JB
On 19 fév, 15:29, RAOUX wrote:
Bonjour,
Je cherche a intgrer dans une procedure VBA :
Dans une feuille J'ai sur une colonne entre S17 et S116 qui represente des Poids certaines cellules sont égale à 0 (c'est à dire non vide), je voudrai conaitre la première cellule de cette colonne contenant 0 (c'est à di re les coordonnées de la cellule ou plus exactement le N° de ligne)
Merci d'avance
Christian
JB
Set x = [S17:S1116].Find(what:="0", LookIn:=xlValues) If Not x Is Nothing Then MsgBox x.Row
JB
On 19 fév, 15:29, RAOUX wrote:
Bonjour,
Je cherche a intgrer dans une procedure VBA :
Dans une feuille J'ai sur une colonne entre S17 et S116 qui represente des Poids certaines cellules sont égale à 0 (c'est à dire non vide), je voudrai conaitre la première cellule de cette colonne contenant 0 (c'est à di re les coordonnées de la cellule ou plus exactement le N° de ligne)
Merci d'avance
Christian
Set x = [S17:S1116].Find(what:="0", LookIn:=xlValues)
If Not x Is Nothing Then MsgBox x.Row
JB
On 19 fév, 15:29, RAOUX <christian.ra...@wanadoo.fr> wrote:
Bonjour,
Je cherche a intgrer dans une procedure VBA :
Dans une feuille J'ai sur une colonne entre S17 et S116 qui represente des
Poids certaines cellules sont égale à 0 (c'est à dire non vide), je voudrai
conaitre la première cellule de cette colonne contenant 0 (c'est à di re les
coordonnées de la cellule ou plus exactement le N° de ligne)
Set x = [S17:S1116].Find(what:="0", LookIn:=xlValues) If Not x Is Nothing Then MsgBox x.Row
JB
On 19 fév, 15:29, RAOUX wrote:
Bonjour,
Je cherche a intgrer dans une procedure VBA :
Dans une feuille J'ai sur une colonne entre S17 et S116 qui represente des Poids certaines cellules sont égale à 0 (c'est à dire non vide), je voudrai conaitre la première cellule de cette colonne contenant 0 (c'est à di re les coordonnées de la cellule ou plus exactement le N° de ligne)
Merci d'avance
Christian
RAOUX
Merci anonymousA
ça marche super
anonymousA écrivait news:45d9b6f0$0$25930$:
Bonjour,
pas le plus rapide mais simple
Sub ff() For Each c In Range("S17:S1116") If Not IsEmpty(c) And c.Value = 0 Then MsgBox c.Row Exit Sub End If Next A+
Bonjour,
Je cherche a intgrer dans une procedure VBA :
Dans une feuille J'ai sur une colonne entre S17 et S116 qui represente des Poids certaines cellules sont égale à 0 (c'est à dire non vide), je voudrai conaitre la première cellule de cette colonne contenant 0 (c'est à dire les coordonnées de la cellule ou plus exactement le N° de ligne)
Sub ff()
For Each c In Range("S17:S1116")
If Not IsEmpty(c) And c.Value = 0 Then
MsgBox c.Row
Exit Sub
End If
Next
A+
Bonjour,
Je cherche a intgrer dans une procedure VBA :
Dans une feuille J'ai sur une colonne entre S17 et S116 qui
represente des Poids certaines cellules sont égale à 0 (c'est à dire
non vide), je voudrai conaitre la première cellule de cette colonne
contenant 0 (c'est à dire les coordonnées de la cellule ou plus
exactement le N° de ligne)
Sub ff() For Each c In Range("S17:S1116") If Not IsEmpty(c) And c.Value = 0 Then MsgBox c.Row Exit Sub End If Next A+
Bonjour,
Je cherche a intgrer dans une procedure VBA :
Dans une feuille J'ai sur une colonne entre S17 et S116 qui represente des Poids certaines cellules sont égale à 0 (c'est à dire non vide), je voudrai conaitre la première cellule de cette colonne contenant 0 (c'est à dire les coordonnées de la cellule ou plus exactement le N° de ligne)
Merci d'avance
Christian
RAOUX
JB, salut et merci de ta réponse mais elle ne fonctionne pas elle me renvois une valeur fausse la premiere ligne contenant seulement 0 est à la ligne 79 et ta valeur me renvois 18
merci
"JB" écrivait news::
Set x = [S17:S1116].Find(what:="0", LookIn:=xlValues) If Not x Is Nothing Then MsgBox x.Row
JB
On 19 fév, 15:29, RAOUX wrote:
Bonjour,
Je cherche a intgrer dans une procedure VBA :
Dans une feuille J'ai sur une colonne entre S17 et S116 qui represente des Poids certaines cellules sont égale à 0 (c'est à dire non vide), je voudrai conaitre la première cellule de cette colonne contenant 0 (c'est à di re les coordonnées de la cellule ou plus exactement le N° de ligne)
Merci d'avance
Christian
JB, salut et merci de ta réponse mais elle ne fonctionne pas elle me
renvois une valeur fausse la premiere ligne contenant seulement 0 est à
la ligne 79 et ta valeur me renvois 18
Set x = [S17:S1116].Find(what:="0", LookIn:=xlValues)
If Not x Is Nothing Then MsgBox x.Row
JB
On 19 fév, 15:29, RAOUX <christian.ra...@wanadoo.fr> wrote:
Bonjour,
Je cherche a intgrer dans une procedure VBA :
Dans une feuille J'ai sur une colonne entre S17 et S116 qui
represente des Poids certaines cellules sont égale à 0 (c'est à dire
non vide), je voudrai conaitre la première cellule de cette colonne
contenant 0 (c'est à di re les coordonnées de la cellule ou plus
exactement le N° de ligne)
JB, salut et merci de ta réponse mais elle ne fonctionne pas elle me renvois une valeur fausse la premiere ligne contenant seulement 0 est à la ligne 79 et ta valeur me renvois 18
merci
"JB" écrivait news::
Set x = [S17:S1116].Find(what:="0", LookIn:=xlValues) If Not x Is Nothing Then MsgBox x.Row
JB
On 19 fév, 15:29, RAOUX wrote:
Bonjour,
Je cherche a intgrer dans une procedure VBA :
Dans une feuille J'ai sur une colonne entre S17 et S116 qui represente des Poids certaines cellules sont égale à 0 (c'est à dire non vide), je voudrai conaitre la première cellule de cette colonne contenant 0 (c'est à di re les coordonnées de la cellule ou plus exactement le N° de ligne)
Merci d'avance
Christian
JB
Sur la PJ, j'obtiend bien 79:
http://cjoint.com/?ctr3yuFs5U
JB
On 19 fév, 17:13, RAOUX wrote:
JB, salut et merci de ta réponse mais elle ne fonctionne pas elle me renvois une valeur fausse la premiere ligne contenant seulement 0 est à la ligne 79 et ta valeur me renvois 18
merci
"JB" écrivaitnews: 000cwc.googlegroups.com:
Set x = [S17:S1116].Find(what:="0", LookIn:=xlValues) If Not x Is Nothing Then MsgBox x.Row
JB
On 19 fév, 15:29, RAOUX wrote:
Bonjour,
Je cherche a intgrer dans une procedure VBA :
Dans une feuille J'ai sur une colonne entre S17 et S116 qui represente des Poids certaines cellules sont égale à 0 (c'est à dire non vide), je voudrai conaitre la première cellule de cette colonne contenant 0 (c'est à di re les coordonnées de la cellule ou plus exactement le N° de ligne)
Merci d'avance
Christian- Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
Sur la PJ, j'obtiend bien 79:
http://cjoint.com/?ctr3yuFs5U
JB
On 19 fév, 17:13, RAOUX <christian.ra...@wanadoo.fr> wrote:
JB, salut et merci de ta réponse mais elle ne fonctionne pas elle me
renvois une valeur fausse la premiere ligne contenant seulement 0 est à
la ligne 79 et ta valeur me renvois 18
Set x = [S17:S1116].Find(what:="0", LookIn:=xlValues)
If Not x Is Nothing Then MsgBox x.Row
JB
On 19 fév, 15:29, RAOUX <christian.ra...@wanadoo.fr> wrote:
Bonjour,
Je cherche a intgrer dans une procedure VBA :
Dans une feuille J'ai sur une colonne entre S17 et S116 qui
represente des Poids certaines cellules sont égale à 0 (c'est à dire
non vide), je voudrai conaitre la première cellule de cette colonne
contenant 0 (c'est à di re les coordonnées de la cellule ou plus
exactement le N° de ligne)
Merci d'avance
Christian- Masquer le texte des messages précédents -
JB, salut et merci de ta réponse mais elle ne fonctionne pas elle me renvois une valeur fausse la premiere ligne contenant seulement 0 est à la ligne 79 et ta valeur me renvois 18
merci
"JB" écrivaitnews: 000cwc.googlegroups.com:
Set x = [S17:S1116].Find(what:="0", LookIn:=xlValues) If Not x Is Nothing Then MsgBox x.Row
JB
On 19 fév, 15:29, RAOUX wrote:
Bonjour,
Je cherche a intgrer dans une procedure VBA :
Dans une feuille J'ai sur une colonne entre S17 et S116 qui represente des Poids certaines cellules sont égale à 0 (c'est à dire non vide), je voudrai conaitre la première cellule de cette colonne contenant 0 (c'est à di re les coordonnées de la cellule ou plus exactement le N° de ligne)
Merci d'avance
Christian- Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
RAOUX
Jb, Dans ton fichier cela fonction bien mais ma liste comporte des chiffre avec des 0 voir http://cjoint.com/?ctvAfjWejX et la ça ne fonctionne pas
JB, salut et merci de ta réponse mais elle ne fonctionne pas elle me renvois une valeur fausse la premiere ligne contenant seulement 0 est à
la ligne 79 et ta valeur me renvois 18
merci
"JB" écrivaitnews:1171896861.592553.3640 @h3g2
000cwc.googlegroups.com:
Set x = [S17:S1116].Find(what:="0", LookIn:=xlValues) If Not x Is Nothing Then MsgBox x.Row
JB
On 19 fév, 15:29, RAOUX wrote:
Bonjour,
Je cherche a intgrer dans une procedure VBA :
Dans une feuille J'ai sur une colonne entre S17 et S116 qui represente des Poids certaines cellules sont égale à 0 (c'est à dire non vide), je voudrai conaitre la première cellule de cette colonne contenant 0 (c'est à di re les coordonnées de la cellule ou plus exactement le N° de ligne)
Merci d'avance
Christian- Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
Jb,
Dans ton fichier cela fonction bien mais ma liste comporte des chiffre
avec des 0 voir
http://cjoint.com/?ctvAfjWejX
et la ça ne fonctionne pas
Set x = [S17:S1116].Find(what:="0", LookIn:=xlValues)
If Not x Is Nothing Then MsgBox x.Row
JB
On 19 fév, 15:29, RAOUX <christian.ra...@wanadoo.fr> wrote:
Bonjour,
Je cherche a intgrer dans une procedure VBA :
Dans une feuille J'ai sur une colonne entre S17 et S116 qui
represente des Poids certaines cellules sont égale à 0 (c'est à
dire non vide), je voudrai conaitre la première cellule de cette
colonne contenant 0 (c'est à di re les coordonnées de la cellule ou
plus exactement le N° de ligne)
Merci d'avance
Christian- Masquer le texte des messages précédents -
JB, salut et merci de ta réponse mais elle ne fonctionne pas elle me renvois une valeur fausse la premiere ligne contenant seulement 0 est à
la ligne 79 et ta valeur me renvois 18
merci
"JB" écrivaitnews:1171896861.592553.3640 @h3g2
000cwc.googlegroups.com:
Set x = [S17:S1116].Find(what:="0", LookIn:=xlValues) If Not x Is Nothing Then MsgBox x.Row
JB
On 19 fév, 15:29, RAOUX wrote:
Bonjour,
Je cherche a intgrer dans une procedure VBA :
Dans une feuille J'ai sur une colonne entre S17 et S116 qui represente des Poids certaines cellules sont égale à 0 (c'est à dire non vide), je voudrai conaitre la première cellule de cette colonne contenant 0 (c'est à di re les coordonnées de la cellule ou plus exactement le N° de ligne)
Merci d'avance
Christian- Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
RAOUX
Jb, Dans ton fichier cela fonction bien mais ma liste comporte des chiffre avec des 0 voir http://cjoint.com/?ctvAfjWejX et la ça ne fonctionne pas il me donne 18 je cherche la 1ere ligne dont le poid et 0
christian
Jb,
Dans ton fichier cela fonction bien mais ma liste comporte des chiffre
avec des 0 voir
http://cjoint.com/?ctvAfjWejX
et la ça ne fonctionne pas il me donne 18
je cherche la 1ere ligne dont le poid et 0
Jb, Dans ton fichier cela fonction bien mais ma liste comporte des chiffre avec des 0 voir http://cjoint.com/?ctvAfjWejX et la ça ne fonctionne pas il me donne 18 je cherche la 1ere ligne dont le poid et 0
