A partir du même fichier, En E2 : =SI(ET(A2¡;B2±;C2<>C1+1);A2&B2&C1+1;SI(C2<C1;A1&B1&C1+1;"")) te convient-il ?
-- Bien ,
Patrick patrick.bastardchezdbmail.com
Une première approche pour les trous. http://cjoint.com/?gdw4MD070x Je cherche à intégrer un "ou" pour les suites sans trou.
-- Bien ,
Patrick patrick.bastardchezdbmail.com
je cherche une formule (de préférence) qui me donnerait le n° suivant dans une série de condition en tenant compte des trous éventuel
exemple AAA O 1 AAA O 2 AAA O 3 AAA O 18256 AAA N 1 AAA N 2 AAA N 3 AAA N 4 BCD O 1 BCD O 5 BCD O 6 BCD N 7
Si je cherche le n° suivant pour AAA-O ça devrait être 4. Pour AAA-N c'est 5, BCD-O=2 et BCD-N=1
Une idée ?
en vous remerciant de faire chauffer vos neurones par cette chaleur ;-)
-- JièL / Jean-Louis GOUBERT La FAQ Outlook est là : http://faq-outlook.fr/
Boycott des questions venant de CDO http://faq-outlook.fr/viewpage.php?page_id=2
Modeste
Bonsour® JièL avec ferveur ;o))) vous nous disiez :
nan, nan, c'est des données dans 3 colonnes différentes 2 de texte et une numérique
;o))) entre AMIS et comme cela , çà te conviendrait ????
Donnée1 Donnée2 Donnée3 Suivant AAA N 1 AAA N 2 AAA N 3 AAA N 4 AAA N 5 AAA O 1 AAA O 2 AAA O 3 AAA O 4 AAA O 18256 AAA O 18257 BCD N 7 BCD N 8 BCD O 1 BCD O 2 BCD O 5 BCD O 6 BCD O 7
il faut que les colonnes ABC soient triées respectivement dans l'ordre croissant la formule en D2 =SI(C3<>(C2+1);A2&" "&B2&" "&(C2+1);"")
Bonsour® JièL avec ferveur ;o))) vous nous disiez :
nan, nan, c'est des données dans 3 colonnes différentes
2 de texte et une numérique
;o))) entre AMIS et comme cela , çà te conviendrait ????
Donnée1 Donnée2 Donnée3 Suivant
AAA N 1
AAA N 2
AAA N 3
AAA N 4 AAA N 5
AAA O 1
AAA O 2
AAA O 3 AAA O 4
AAA O 18256 AAA O 18257
BCD N 7 BCD N 8
BCD O 1 BCD O 2
BCD O 5
BCD O 6 BCD O 7
il faut que les colonnes ABC soient triées respectivement dans l'ordre croissant
la formule en D2
=SI(C3<>(C2+1);A2&" "&B2&" "&(C2+1);"")
Bonsour® JièL avec ferveur ;o))) vous nous disiez :
nan, nan, c'est des données dans 3 colonnes différentes 2 de texte et une numérique
;o))) entre AMIS et comme cela , çà te conviendrait ????
Donnée1 Donnée2 Donnée3 Suivant AAA N 1 AAA N 2 AAA N 3 AAA N 4 AAA N 5 AAA O 1 AAA O 2 AAA O 3 AAA O 4 AAA O 18256 AAA O 18257 BCD N 7 BCD N 8 BCD O 1 BCD O 2 BCD O 5 BCD O 6 BCD O 7
il faut que les colonnes ABC soient triées respectivement dans l'ordre croissant la formule en D2 =SI(C3<>(C2+1);A2&" "&B2&" "&(C2+1);"")
isabelle
salut JièL,
cette formule retourne la premiere ligne vide,
=MIN(SI(ESTVIDE(C1:C30);LIGNE(C1:C30))) valider avec ctrl+maj+enter
une fois cette ligne renseignée elle retourne le numéro de la prochaine ligne vide
isabelle
JièL a écrit :
Hello
Daniel.C a écrit :
Mais, bien sûr, avec une macro, c'est possible.
Voui, je m'en doute, on peut tout faire avec des macros... à défaut de formule je veux bien la macro aussi, merci
salut JièL,
cette formule retourne la premiere ligne vide,
=MIN(SI(ESTVIDE(C1:C30);LIGNE(C1:C30)))
valider avec ctrl+maj+enter
une fois cette ligne renseignée elle retourne le numéro de la prochaine
ligne vide
isabelle
JièL a écrit :
Hello
Daniel.C a écrit :
Mais, bien sûr, avec une macro, c'est possible.
Voui, je m'en doute, on peut tout faire avec des macros... à défaut de
formule je veux bien la macro aussi, merci
=MIN(SI(ESTVIDE(C1:C30);LIGNE(C1:C30))) valider avec ctrl+maj+enter
une fois cette ligne renseignée elle retourne le numéro de la prochaine ligne vide
isabelle
JièL a écrit :
Hello
Daniel.C a écrit :
Mais, bien sûr, avec une macro, c'est possible.
Voui, je m'en doute, on peut tout faire avec des macros... à défaut de formule je veux bien la macro aussi, merci
Daniel.C
Bonjour.
Sub test() Dim c As Range, ResA As String, ResB As String Dim Ctr As Long, Test As Byte ResA = [A1] ResB = [B1] Ctr = [C1] - 1 Test = 0 For Each c In Range([A1], [A65536].End(xlUp)) If c = ResA And c.Offset(, 1) = ResB Then If c.Offset(, 2) = Ctr + 1 Then Ctr = Ctr + 1 Test = 2 ElseIf Test <> 1 Then Test = 1 MsgBox ResA & " " & ResB & " " & Ctr + 1 End If Else If Test = 2 Then MsgBox ResA & " " & ResB & " " & Ctr + 1 End If ResA = c ResB = c.Offset(, 1) Ctr = c.Offset(, 2) Test = 0 End If Next c If Test = 0 Then MsgBox ResA & " " & ResB & " " & Ctr + 1 End If End Sub
Daniel
Hello
Daniel.C a écrit :
Mais, bien sûr, avec une macro, c'est possible.
Voui, je m'en doute, on peut tout faire avec des macros... à défaut de formule je veux bien la macro aussi, merci
Bonjour.
Sub test()
Dim c As Range, ResA As String, ResB As String
Dim Ctr As Long, Test As Byte
ResA = [A1]
ResB = [B1]
Ctr = [C1] - 1
Test = 0
For Each c In Range([A1], [A65536].End(xlUp))
If c = ResA And c.Offset(, 1) = ResB Then
If c.Offset(, 2) = Ctr + 1 Then
Ctr = Ctr + 1
Test = 2
ElseIf Test <> 1 Then
Test = 1
MsgBox ResA & " " & ResB & " " & Ctr + 1
End If
Else
If Test = 2 Then
MsgBox ResA & " " & ResB & " " & Ctr + 1
End If
ResA = c
ResB = c.Offset(, 1)
Ctr = c.Offset(, 2)
Test = 0
End If
Next c
If Test = 0 Then
MsgBox ResA & " " & ResB & " " & Ctr + 1
End If
End Sub
Daniel
Hello
Daniel.C a écrit :
Mais, bien sûr, avec une macro, c'est possible.
Voui, je m'en doute, on peut tout faire avec des macros... à défaut de
formule je veux bien la macro aussi, merci
Sub test() Dim c As Range, ResA As String, ResB As String Dim Ctr As Long, Test As Byte ResA = [A1] ResB = [B1] Ctr = [C1] - 1 Test = 0 For Each c In Range([A1], [A65536].End(xlUp)) If c = ResA And c.Offset(, 1) = ResB Then If c.Offset(, 2) = Ctr + 1 Then Ctr = Ctr + 1 Test = 2 ElseIf Test <> 1 Then Test = 1 MsgBox ResA & " " & ResB & " " & Ctr + 1 End If Else If Test = 2 Then MsgBox ResA & " " & ResB & " " & Ctr + 1 End If ResA = c ResB = c.Offset(, 1) Ctr = c.Offset(, 2) Test = 0 End If Next c If Test = 0 Then MsgBox ResA & " " & ResB & " " & Ctr + 1 End If End Sub
Daniel
Hello
Daniel.C a écrit :
Mais, bien sûr, avec une macro, c'est possible.
Voui, je m'en doute, on peut tout faire avec des macros... à défaut de formule je veux bien la macro aussi, merci
Patrick BASTARD
Bonjour, "JièL"
Hello Isabelle de la geôlière... toujours des prisonniers en IV65536 ? ;-)
Non, elle a été transférée dans une nouvelle prison, cellule XFD1048576 :-)
-- Bien ,
Patrick patrick.bastardchezdbmail.com
Bonjour, "JièL"
Hello Isabelle de la geôlière... toujours des prisonniers en IV65536 ? ;-)
Non, elle a été transférée dans une nouvelle prison, cellule XFD1048576
:-)
grrrrrrrrr !! y'a vraiment de gros problème sur notre forum, les mgs n'apparaissent pas toujours, c'est quoi ? la grève chez usenet ? isabelle
Patrick BASTARD a écrit :
Bonjoir,"Modeste"
< Mais alors qui garde la cellule ZZZ262144 (OWC) ????
C'est un domaine (Office Web Component, pas la cellule) où mon ignorance n'a d'égal que ... ... que quoi, au fait ? ;-)
euh mon ange ici c'est pas un forum usenet ;-) je vois environ 40 messages aujourd'hui et toi ?
tiens tiens je vais venir visiter la Belle Province cet été. Mais je ne crois pas malheureusement que je passerai par chez toi
-- Misange migrateuse http://www.excelabo.net : Participez à un travail collaboratif sur excel !
JièL
Salutatousse et mercitatousse aussi, mais... je me suis mal exprimé.
Vos formules et macros sont parfaites, mais ce que je voudrais c'est trouver la prochaine valeur (en tenant compte des trous) selon un critère, pas sur chaque cellule de la colonne adjacente
Dans mon exemple les colonnes A B et C qui contiennent mes données. Dans la cellule E1 je met AAA, dans F1 je met O, la cellule G1 doit m'afficher 4 dans ce cas Si E1 = AAA, F1 = N, G1 affiche 5 Si E1 = BCD, F1 = O, G1 affiche 2 ... je ne veux pas toutes les prochaines valeurs, juste LA prochaine selon les critères saisis. Dit différemment je voudrais un espèce de RECHECHEV "multicritère" (laissez tomber cet aspect de multicritère, je m'en débrouille, mais ça peut être utile si vous faites ça avec des SOMMEPROD par exemple) et qui me donne la prochaine valeur en tenant compte des trous éventuels
en pseudo code ça donnerait =RVperso(E1&F1&99999;A1:C3000;3;VRAI)+1
Si ça peut vous être utile j'ai une colonne qui est ce code complet (AAAO1, AAAO2 etc etc) et c'est moi qui le découpe en N cellules pour pouvoir travailler sur la valeur (si ça embrouille, laissez tombez cet aspect aussi ;-D)
Patrick, je pense que ta macro est une bonne base, faut juste que ça utilise les critères saisis dans 2 cellules et que ça s'arrête au premier "kivabien" et retourne la valeur +1
Encore merci
-- JièL / Jean-Louis GOUBERT La FAQ Outlook est là : http://faq-outlook.fr/
Boycott des questions venant de CDO http://faq-outlook.fr/viewpage.php?page_id=2
JièL a écrit :
Salutatousse
je cherche une formule (de préférence) qui me donnerait le n° suivant dans une série de condition en tenant compte des trous éventuel
exemple AAA O 1 AAA O 2 AAA O 3 AAA O 18256 AAA N 1 AAA N 2 AAA N 3 AAA N 4 BCD O 1 BCD O 5 BCD O 6 BCD N 7
Si je cherche le n° suivant pour AAA-O ça devrait être 4. Pour AAA-N c'est 5, BCD-O=2 et BCD-N=1
Une idée ?
en vous remerciant de faire chauffer vos neurones par cette chaleur ;-)
Salutatousse et mercitatousse aussi, mais... je me suis mal exprimé.
Vos formules et macros sont parfaites, mais ce que je voudrais c'est
trouver la prochaine valeur (en tenant compte des trous) selon un
critère, pas sur chaque cellule de la colonne adjacente
Dans mon exemple les colonnes A B et C qui contiennent mes données.
Dans la cellule E1 je met AAA, dans F1 je met O, la cellule G1 doit
m'afficher 4 dans ce cas
Si E1 = AAA, F1 = N, G1 affiche 5
Si E1 = BCD, F1 = O, G1 affiche 2
...
je ne veux pas toutes les prochaines valeurs, juste LA prochaine selon
les critères saisis.
Dit différemment je voudrais un espèce de RECHECHEV "multicritère"
(laissez tomber cet aspect de multicritère, je m'en débrouille, mais ça
peut être utile si vous faites ça avec des SOMMEPROD par exemple) et qui
me donne la prochaine valeur en tenant compte des trous éventuels
en pseudo code ça donnerait =RVperso(E1&F1&99999;A1:C3000;3;VRAI)+1
Si ça peut vous être utile j'ai une colonne qui est ce code complet
(AAAO1, AAAO2 etc etc) et c'est moi qui le découpe en N cellules pour
pouvoir travailler sur la valeur (si ça embrouille, laissez tombez cet
aspect aussi ;-D)
Patrick, je pense que ta macro est une bonne base, faut juste que ça
utilise les critères saisis dans 2 cellules et que ça s'arrête au
premier "kivabien" et retourne la valeur +1
Encore merci
--
JièL / Jean-Louis GOUBERT
La FAQ Outlook est là : http://faq-outlook.fr/
Boycott des questions venant de CDO
http://faq-outlook.fr/viewpage.php?page_id=2
JièL a écrit :
Salutatousse
je cherche une formule (de préférence) qui me donnerait le n° suivant
dans une série de condition en tenant compte des trous éventuel
exemple
AAA O 1
AAA O 2
AAA O 3
AAA O 18256
AAA N 1
AAA N 2
AAA N 3
AAA N 4
BCD O 1
BCD O 5
BCD O 6
BCD N 7
Si je cherche le n° suivant pour AAA-O ça devrait être 4.
Pour AAA-N c'est 5, BCD-O=2 et BCD-N=1
Une idée ?
en vous remerciant de faire chauffer vos neurones par cette chaleur ;-)
Salutatousse et mercitatousse aussi, mais... je me suis mal exprimé.
Vos formules et macros sont parfaites, mais ce que je voudrais c'est trouver la prochaine valeur (en tenant compte des trous) selon un critère, pas sur chaque cellule de la colonne adjacente
Dans mon exemple les colonnes A B et C qui contiennent mes données. Dans la cellule E1 je met AAA, dans F1 je met O, la cellule G1 doit m'afficher 4 dans ce cas Si E1 = AAA, F1 = N, G1 affiche 5 Si E1 = BCD, F1 = O, G1 affiche 2 ... je ne veux pas toutes les prochaines valeurs, juste LA prochaine selon les critères saisis. Dit différemment je voudrais un espèce de RECHECHEV "multicritère" (laissez tomber cet aspect de multicritère, je m'en débrouille, mais ça peut être utile si vous faites ça avec des SOMMEPROD par exemple) et qui me donne la prochaine valeur en tenant compte des trous éventuels
en pseudo code ça donnerait =RVperso(E1&F1&99999;A1:C3000;3;VRAI)+1
Si ça peut vous être utile j'ai une colonne qui est ce code complet (AAAO1, AAAO2 etc etc) et c'est moi qui le découpe en N cellules pour pouvoir travailler sur la valeur (si ça embrouille, laissez tombez cet aspect aussi ;-D)
Patrick, je pense que ta macro est une bonne base, faut juste que ça utilise les critères saisis dans 2 cellules et que ça s'arrête au premier "kivabien" et retourne la valeur +1
Encore merci
-- JièL / Jean-Louis GOUBERT La FAQ Outlook est là : http://faq-outlook.fr/
Boycott des questions venant de CDO http://faq-outlook.fr/viewpage.php?page_id=2
JièL a écrit :
Salutatousse
je cherche une formule (de préférence) qui me donnerait le n° suivant dans une série de condition en tenant compte des trous éventuel
exemple AAA O 1 AAA O 2 AAA O 3 AAA O 18256 AAA N 1 AAA N 2 AAA N 3 AAA N 4 BCD O 1 BCD O 5 BCD O 6 BCD N 7
Si je cherche le n° suivant pour AAA-O ça devrait être 4. Pour AAA-N c'est 5, BCD-O=2 et BCD-N=1
Une idée ?
en vous remerciant de faire chauffer vos neurones par cette chaleur ;-)
