Bonjour
Je dispose d un fichier avec des chiffres en colonne A de A2 à A65000 avec des chiffres dans n 'importe quel
ordre ....
exemple
A3 = 8547
A4 46
A5 48
A6= 8550
A7 52
A8 53
A9 51
A10= 8549
donc msgbox " manque aucun Numero"
en revanche avec cet exemple
A3 = 8547
A4 46
A5 54
A6= 8555
A7 52
A8 53
A9 51
A10= 8549
donc msgbox " manque 8548 / 8550"
et si en manquait trois ben il aurait mis les 3 et ainsi de suite
je voudrais ceci à la fermeture du fichier
merci.
Bonjour
Je dispose d un fichier avec des chiffres en colonne A de A2 à A65000 avec des chiffres dans n 'importe quel
ordre ....
exemple
A3 = 8547
A4 46
A5 48
A6= 8550
A7 52
A8 53
A9 51
A10= 8549
donc msgbox " manque aucun Numero"
en revanche avec cet exemple
A3 = 8547
A4 46
A5 54
A6= 8555
A7 52
A8 53
A9 51
A10= 8549
donc msgbox " manque 8548 / 8550"
et si en manquait trois ben il aurait mis les 3 et ainsi de suite
je voudrais ceci à la fermeture du fichier
merci.
Bonjour
Je dispose d un fichier avec des chiffres en colonne A de A2 à A65000 avec des chiffres dans n 'importe quel
ordre ....
exemple
A3 = 8547
A4 46
A5 48
A6= 8550
A7 52
A8 53
A9 51
A10= 8549
donc msgbox " manque aucun Numero"
en revanche avec cet exemple
A3 = 8547
A4 46
A5 54
A6= 8555
A7 52
A8 53
A9 51
A10= 8549
donc msgbox " manque 8548 / 8550"
et si en manquait trois ben il aurait mis les 3 et ainsi de suite
je voudrais ceci à la fermeture du fichier
merci.
Bonjour
Je verrais bien ceci:
1) trier col A
2) en B1, prendre le plus petit nombre de colA
3) via recopie incrémentée, tirer B1 jusqu'en bas.
4) on peut déjà comparer le dernier de la col A avec celui de la col B et
voir combien il en manque.
5) via une petite macro, supprimer tous les nombres de la col B qui sont
dans la col A (doux blonds).
6) il ne restera, in fine, que les absents.....
7) après, éventuellement et pour le fun, faire un msg d'alerte ....
Jacquouille
" Le vin est au repas ce que le parfum est à la femme."
"achille" a écrit dans le message de groupe de discussion :
4d95844a$0$5389$
Bonjour
Je dispose d un fichier avec des chiffres en colonne A de A2 à A65000 avec
des chiffres dans n 'importe quel ordre ....
exemple
A3 = 8547
A4 46
A5 48
A6= 8550
A7 52
A8 53
A9 51
A10= 8549
donc msgbox " manque aucun Numero"
en revanche avec cet exemple
A3 = 8547
A4 46
A5 54
A6= 8555
A7 52
A8 53
A9 51
A10= 8549
donc msgbox " manque 8548 / 8550"
et si en manquait trois ben il aurait mis les 3 et ainsi de suite
je voudrais ceci à la fermeture du fichier
merci.
Bonjour
Je verrais bien ceci:
1) trier col A
2) en B1, prendre le plus petit nombre de colA
3) via recopie incrémentée, tirer B1 jusqu'en bas.
4) on peut déjà comparer le dernier de la col A avec celui de la col B et
voir combien il en manque.
5) via une petite macro, supprimer tous les nombres de la col B qui sont
dans la col A (doux blonds).
6) il ne restera, in fine, que les absents.....
7) après, éventuellement et pour le fun, faire un msg d'alerte ....
Jacquouille
" Le vin est au repas ce que le parfum est à la femme."
"achille" a écrit dans le message de groupe de discussion :
4d95844a$0$5389$ba4acef3@reader.news.orange.fr...
Bonjour
Je dispose d un fichier avec des chiffres en colonne A de A2 à A65000 avec
des chiffres dans n 'importe quel ordre ....
exemple
A3 = 8547
A4 46
A5 48
A6= 8550
A7 52
A8 53
A9 51
A10= 8549
donc msgbox " manque aucun Numero"
en revanche avec cet exemple
A3 = 8547
A4 46
A5 54
A6= 8555
A7 52
A8 53
A9 51
A10= 8549
donc msgbox " manque 8548 / 8550"
et si en manquait trois ben il aurait mis les 3 et ainsi de suite
je voudrais ceci à la fermeture du fichier
merci.
Bonjour
Je verrais bien ceci:
1) trier col A
2) en B1, prendre le plus petit nombre de colA
3) via recopie incrémentée, tirer B1 jusqu'en bas.
4) on peut déjà comparer le dernier de la col A avec celui de la col B et
voir combien il en manque.
5) via une petite macro, supprimer tous les nombres de la col B qui sont
dans la col A (doux blonds).
6) il ne restera, in fine, que les absents.....
7) après, éventuellement et pour le fun, faire un msg d'alerte ....
Jacquouille
" Le vin est au repas ce que le parfum est à la femme."
"achille" a écrit dans le message de groupe de discussion :
4d95844a$0$5389$
Bonjour
Je dispose d un fichier avec des chiffres en colonne A de A2 à A65000 avec
des chiffres dans n 'importe quel ordre ....
exemple
A3 = 8547
A4 46
A5 48
A6= 8550
A7 52
A8 53
A9 51
A10= 8549
donc msgbox " manque aucun Numero"
en revanche avec cet exemple
A3 = 8547
A4 46
A5 54
A6= 8555
A7 52
A8 53
A9 51
A10= 8549
donc msgbox " manque 8548 / 8550"
et si en manquait trois ben il aurait mis les 3 et ainsi de suite
je voudrais ceci à la fermeture du fichier
merci.
merci jackouille .....
merci jackouille mais je suis sur qu on peut mieux faire en vba..
merci quand meme
"Jacquouille" a écrit dans le message de news:
4d958e01$0$14254$Bonjour
Je verrais bien ceci:
1) trier col A
2) en B1, prendre le plus petit nombre de colA
3) via recopie incrémentée, tirer B1 jusqu'en bas.
4) on peut déjà comparer le dernier de la col A avec celui de la col B et voir combien il en manque.
5) via une petite macro, supprimer tous les nombres de la col B qui sont dans la col A (doux blonds).
6) il ne restera, in fine, que les absents.....
7) après, éventuellement et pour le fun, faire un msg d'alerte ....
Jacquouille
" Le vin est au repas ce que le parfum est à la femme."
"achille" a écrit dans le message de groupe de discussion :
4d95844a$0$5389$
Bonjour
Je dispose d un fichier avec des chiffres en colonne A de A2 à A65000 avec
des chiffres dans n 'importe quel ordre ....
exemple
A3 = 8547
A4 46
A5 48
A6= 8550
A7 52
A8 53
A9 51
A10= 8549
donc msgbox " manque aucun Numero"
en revanche avec cet exemple
A3 = 8547
A4 46
A5 54
A6= 8555
A7 52
A8 53
A9 51
A10= 8549
donc msgbox " manque 8548 / 8550"
et si en manquait trois ben il aurait mis les 3 et ainsi de suite
je voudrais ceci à la fermeture du fichier
merci.
merci jackouille .....
merci jackouille mais je suis sur qu on peut mieux faire en vba..
merci quand meme
"Jacquouille" <j.thiernesse@skynet.be> a écrit dans le message de news:
4d958e01$0$14254$ba620e4c@news.skynet.be...
Bonjour
Je verrais bien ceci:
1) trier col A
2) en B1, prendre le plus petit nombre de colA
3) via recopie incrémentée, tirer B1 jusqu'en bas.
4) on peut déjà comparer le dernier de la col A avec celui de la col B et voir combien il en manque.
5) via une petite macro, supprimer tous les nombres de la col B qui sont dans la col A (doux blonds).
6) il ne restera, in fine, que les absents.....
7) après, éventuellement et pour le fun, faire un msg d'alerte ....
Jacquouille
" Le vin est au repas ce que le parfum est à la femme."
"achille" a écrit dans le message de groupe de discussion :
4d95844a$0$5389$ba4acef3@reader.news.orange.fr...
Bonjour
Je dispose d un fichier avec des chiffres en colonne A de A2 à A65000 avec
des chiffres dans n 'importe quel ordre ....
exemple
A3 = 8547
A4 46
A5 48
A6= 8550
A7 52
A8 53
A9 51
A10= 8549
donc msgbox " manque aucun Numero"
en revanche avec cet exemple
A3 = 8547
A4 46
A5 54
A6= 8555
A7 52
A8 53
A9 51
A10= 8549
donc msgbox " manque 8548 / 8550"
et si en manquait trois ben il aurait mis les 3 et ainsi de suite
je voudrais ceci à la fermeture du fichier
merci.
merci jackouille .....
merci jackouille mais je suis sur qu on peut mieux faire en vba..
merci quand meme
"Jacquouille" a écrit dans le message de news:
4d958e01$0$14254$Bonjour
Je verrais bien ceci:
1) trier col A
2) en B1, prendre le plus petit nombre de colA
3) via recopie incrémentée, tirer B1 jusqu'en bas.
4) on peut déjà comparer le dernier de la col A avec celui de la col B et voir combien il en manque.
5) via une petite macro, supprimer tous les nombres de la col B qui sont dans la col A (doux blonds).
6) il ne restera, in fine, que les absents.....
7) après, éventuellement et pour le fun, faire un msg d'alerte ....
Jacquouille
" Le vin est au repas ce que le parfum est à la femme."
"achille" a écrit dans le message de groupe de discussion :
4d95844a$0$5389$
Bonjour
Je dispose d un fichier avec des chiffres en colonne A de A2 à A65000 avec
des chiffres dans n 'importe quel ordre ....
exemple
A3 = 8547
A4 46
A5 48
A6= 8550
A7 52
A8 53
A9 51
A10= 8549
donc msgbox " manque aucun Numero"
en revanche avec cet exemple
A3 = 8547
A4 46
A5 54
A6= 8555
A7 52
A8 53
A9 51
A10= 8549
donc msgbox " manque 8548 / 8550"
et si en manquait trois ben il aurait mis les 3 et ainsi de suite
je voudrais ceci à la fermeture du fichier
merci.
Bonjour,
Ceci peut-être
'----------------
Sub jj()
Dim x As Long, y As Long
MsgBox "Il manque: " & [MAX(a:a)-MIN(a:a)+1-COUNT(a:a)] & " Chiffre(s)"
x = [MIN(a:a)]
y = [max(a:a)]
For i = x To y - 1
If IsError(Application.Match(i + 1, [a:a], 0)) Then
msg = msg & i + 1 & "/"
End If
Next
MsgBox Left(msg, Len(msg) - 1)
End Sub
'--------------------
voir ici
http://www.cijoint.fr/cjlink.php?file=cj201104/cijD0w7plj.xls
--
Salutations
JJ
"achille" a écrit dans le message de news:
4d95844a$0$5389$Bonjour
Je dispose d un fichier avec des chiffres en colonne A de A2 à A65000
avec des chiffres dans n 'importe quel
ordre ....
exemple
A3 = 8547
A4 46
A5 48
A6= 8550
A7 52
A8 53
A9 51
A10= 8549
donc msgbox " manque aucun Numero"
en revanche avec cet exemple
A3 = 8547
A4 46
A5 54
A6= 8555
A7 52
A8 53
A9 51
A10= 8549
donc msgbox " manque 8548 / 8550"
et si en manquait trois ben il aurait mis les 3 et ainsi de suite
je voudrais ceci à la fermeture du fichier
merci.
Bonjour,
Ceci peut-être
'----------------
Sub jj()
Dim x As Long, y As Long
MsgBox "Il manque: " & [MAX(a:a)-MIN(a:a)+1-COUNT(a:a)] & " Chiffre(s)"
x = [MIN(a:a)]
y = [max(a:a)]
For i = x To y - 1
If IsError(Application.Match(i + 1, [a:a], 0)) Then
msg = msg & i + 1 & "/"
End If
Next
MsgBox Left(msg, Len(msg) - 1)
End Sub
'--------------------
voir ici
http://www.cijoint.fr/cjlink.php?file=cj201104/cijD0w7plj.xls
--
Salutations
JJ
"achille" <stephol@prodiag.fr> a écrit dans le message de news:
4d95844a$0$5389$ba4acef3@reader.news.orange.fr...
Bonjour
Je dispose d un fichier avec des chiffres en colonne A de A2 à A65000
avec des chiffres dans n 'importe quel
ordre ....
exemple
A3 = 8547
A4 46
A5 48
A6= 8550
A7 52
A8 53
A9 51
A10= 8549
donc msgbox " manque aucun Numero"
en revanche avec cet exemple
A3 = 8547
A4 46
A5 54
A6= 8555
A7 52
A8 53
A9 51
A10= 8549
donc msgbox " manque 8548 / 8550"
et si en manquait trois ben il aurait mis les 3 et ainsi de suite
je voudrais ceci à la fermeture du fichier
merci.
Bonjour,
Ceci peut-être
'----------------
Sub jj()
Dim x As Long, y As Long
MsgBox "Il manque: " & [MAX(a:a)-MIN(a:a)+1-COUNT(a:a)] & " Chiffre(s)"
x = [MIN(a:a)]
y = [max(a:a)]
For i = x To y - 1
If IsError(Application.Match(i + 1, [a:a], 0)) Then
msg = msg & i + 1 & "/"
End If
Next
MsgBox Left(msg, Len(msg) - 1)
End Sub
'--------------------
voir ici
http://www.cijoint.fr/cjlink.php?file=cj201104/cijD0w7plj.xls
--
Salutations
JJ
"achille" a écrit dans le message de news:
4d95844a$0$5389$Bonjour
Je dispose d un fichier avec des chiffres en colonne A de A2 à A65000
avec des chiffres dans n 'importe quel
ordre ....
exemple
A3 = 8547
A4 46
A5 48
A6= 8550
A7 52
A8 53
A9 51
A10= 8549
donc msgbox " manque aucun Numero"
en revanche avec cet exemple
A3 = 8547
A4 46
A5 54
A6= 8555
A7 52
A8 53
A9 51
A10= 8549
donc msgbox " manque 8548 / 8550"
et si en manquait trois ben il aurait mis les 3 et ainsi de suite
je voudrais ceci à la fermeture du fichier
merci.
merci jacky c est exactement ce que je cherchais...
merci infiniment
"Jacky" a écrit dans le message de news: in43bc$qcq$Bonjour,
Ceci peut-être
'----------------
Sub jj()
Dim x As Long, y As Long
MsgBox "Il manque: " & [MAX(a:a)-MIN(a:a)+1-COUNT(a:a)] & " Chiffre(s)"
x = [MIN(a:a)]
y = [max(a:a)]
For i = x To y - 1
If IsError(Application.Match(i + 1, [a:a], 0)) Then
msg = msg & i + 1 & "/"
End If
Next
MsgBox Left(msg, Len(msg) - 1)
End Sub
'--------------------
voir ici
http://www.cijoint.fr/cjlink.php?file=cj201104/cijD0w7plj.xls
--
Salutations
JJ
"achille" a écrit dans le message de news:
4d95844a$0$5389$Bonjour
Je dispose d un fichier avec des chiffres en colonne A de A2 à A65000 avec des chiffres dans n 'importe
quel
ordre ....
exemple
A3 = 8547
A4 46
A5 48
A6= 8550
A7 52
A8 53
A9 51
A10= 8549
donc msgbox " manque aucun Numero"
en revanche avec cet exemple
A3 = 8547
A4 46
A5 54
A6= 8555
A7 52
A8 53
A9 51
A10= 8549
donc msgbox " manque 8548 / 8550"
et si en manquait trois ben il aurait mis les 3 et ainsi de suite
je voudrais ceci à la fermeture du fichier
merci.
merci jacky c est exactement ce que je cherchais...
merci infiniment
"Jacky" <Dupond@marcel.fr> a écrit dans le message de news: in43bc$qcq$1@speranza.aioe.org...
Bonjour,
Ceci peut-être
'----------------
Sub jj()
Dim x As Long, y As Long
MsgBox "Il manque: " & [MAX(a:a)-MIN(a:a)+1-COUNT(a:a)] & " Chiffre(s)"
x = [MIN(a:a)]
y = [max(a:a)]
For i = x To y - 1
If IsError(Application.Match(i + 1, [a:a], 0)) Then
msg = msg & i + 1 & "/"
End If
Next
MsgBox Left(msg, Len(msg) - 1)
End Sub
'--------------------
voir ici
http://www.cijoint.fr/cjlink.php?file=cj201104/cijD0w7plj.xls
--
Salutations
JJ
"achille" <stephol@prodiag.fr> a écrit dans le message de news:
4d95844a$0$5389$ba4acef3@reader.news.orange.fr...
Bonjour
Je dispose d un fichier avec des chiffres en colonne A de A2 à A65000 avec des chiffres dans n 'importe
quel
ordre ....
exemple
A3 = 8547
A4 46
A5 48
A6= 8550
A7 52
A8 53
A9 51
A10= 8549
donc msgbox " manque aucun Numero"
en revanche avec cet exemple
A3 = 8547
A4 46
A5 54
A6= 8555
A7 52
A8 53
A9 51
A10= 8549
donc msgbox " manque 8548 / 8550"
et si en manquait trois ben il aurait mis les 3 et ainsi de suite
je voudrais ceci à la fermeture du fichier
merci.
merci jacky c est exactement ce que je cherchais...
merci infiniment
"Jacky" a écrit dans le message de news: in43bc$qcq$Bonjour,
Ceci peut-être
'----------------
Sub jj()
Dim x As Long, y As Long
MsgBox "Il manque: " & [MAX(a:a)-MIN(a:a)+1-COUNT(a:a)] & " Chiffre(s)"
x = [MIN(a:a)]
y = [max(a:a)]
For i = x To y - 1
If IsError(Application.Match(i + 1, [a:a], 0)) Then
msg = msg & i + 1 & "/"
End If
Next
MsgBox Left(msg, Len(msg) - 1)
End Sub
'--------------------
voir ici
http://www.cijoint.fr/cjlink.php?file=cj201104/cijD0w7plj.xls
--
Salutations
JJ
"achille" a écrit dans le message de news:
4d95844a$0$5389$Bonjour
Je dispose d un fichier avec des chiffres en colonne A de A2 à A65000 avec des chiffres dans n 'importe
quel
ordre ....
exemple
A3 = 8547
A4 46
A5 48
A6= 8550
A7 52
A8 53
A9 51
A10= 8549
donc msgbox " manque aucun Numero"
en revanche avec cet exemple
A3 = 8547
A4 46
A5 54
A6= 8555
A7 52
A8 53
A9 51
A10= 8549
donc msgbox " manque 8548 / 8550"
et si en manquait trois ben il aurait mis les 3 et ainsi de suite
je voudrais ceci à la fermeture du fichier
merci.
Re...
Ajoute
On Error Resume Next
Avant la ligne
MsgBox Left(msg, Len(msg) - 1)
Au cas ou il n'y aurait pas de manquant
--
Salutations
JJ
"achille" a écrit dans le message de news:
4d95962c$0$32453$merci jacky c est exactement ce que je cherchais...
merci infiniment
"Jacky" a écrit dans le message de news:
in43bc$qcq$Bonjour,
Ceci peut-être
'----------------
Sub jj()
Dim x As Long, y As Long
MsgBox "Il manque: " & [MAX(a:a)-MIN(a:a)+1-COUNT(a:a)] & " Chiffre(s)"
x = [MIN(a:a)]
y = [max(a:a)]
For i = x To y - 1
If IsError(Application.Match(i + 1, [a:a], 0)) Then
msg = msg & i + 1 & "/"
End If
Next
MsgBox Left(msg, Len(msg) - 1)
End Sub
'--------------------
voir ici
http://www.cijoint.fr/cjlink.php?file=cj201104/cijD0w7plj.xls
--
Salutations
JJ
"achille" a écrit dans le message de news:
4d95844a$0$5389$Bonjour
Je dispose d un fichier avec des chiffres en colonne A de A2 à A65000
avec des chiffres dans n 'importe quel
ordre ....
exemple
A3 = 8547
A4 46
A5 48
A6= 8550
A7 52
A8 53
A9 51
A10= 8549
donc msgbox " manque aucun Numero"
en revanche avec cet exemple
A3 = 8547
A4 46
A5 54
A6= 8555
A7 52
A8 53
A9 51
A10= 8549
donc msgbox " manque 8548 / 8550"
et si en manquait trois ben il aurait mis les 3 et ainsi de suite
je voudrais ceci à la fermeture du fichier
merci.
Re...
Ajoute
On Error Resume Next
Avant la ligne
MsgBox Left(msg, Len(msg) - 1)
Au cas ou il n'y aurait pas de manquant
--
Salutations
JJ
"achille" <stephol@prodiag.fr> a écrit dans le message de news:
4d95962c$0$32453$ba4acef3@reader.news.orange.fr...
merci jacky c est exactement ce que je cherchais...
merci infiniment
"Jacky" <Dupond@marcel.fr> a écrit dans le message de news:
in43bc$qcq$1@speranza.aioe.org...
Bonjour,
Ceci peut-être
'----------------
Sub jj()
Dim x As Long, y As Long
MsgBox "Il manque: " & [MAX(a:a)-MIN(a:a)+1-COUNT(a:a)] & " Chiffre(s)"
x = [MIN(a:a)]
y = [max(a:a)]
For i = x To y - 1
If IsError(Application.Match(i + 1, [a:a], 0)) Then
msg = msg & i + 1 & "/"
End If
Next
MsgBox Left(msg, Len(msg) - 1)
End Sub
'--------------------
voir ici
http://www.cijoint.fr/cjlink.php?file=cj201104/cijD0w7plj.xls
--
Salutations
JJ
"achille" <stephol@prodiag.fr> a écrit dans le message de news:
4d95844a$0$5389$ba4acef3@reader.news.orange.fr...
Bonjour
Je dispose d un fichier avec des chiffres en colonne A de A2 à A65000
avec des chiffres dans n 'importe quel
ordre ....
exemple
A3 = 8547
A4 46
A5 48
A6= 8550
A7 52
A8 53
A9 51
A10= 8549
donc msgbox " manque aucun Numero"
en revanche avec cet exemple
A3 = 8547
A4 46
A5 54
A6= 8555
A7 52
A8 53
A9 51
A10= 8549
donc msgbox " manque 8548 / 8550"
et si en manquait trois ben il aurait mis les 3 et ainsi de suite
je voudrais ceci à la fermeture du fichier
merci.
Re...
Ajoute
On Error Resume Next
Avant la ligne
MsgBox Left(msg, Len(msg) - 1)
Au cas ou il n'y aurait pas de manquant
--
Salutations
JJ
"achille" a écrit dans le message de news:
4d95962c$0$32453$merci jacky c est exactement ce que je cherchais...
merci infiniment
"Jacky" a écrit dans le message de news:
in43bc$qcq$Bonjour,
Ceci peut-être
'----------------
Sub jj()
Dim x As Long, y As Long
MsgBox "Il manque: " & [MAX(a:a)-MIN(a:a)+1-COUNT(a:a)] & " Chiffre(s)"
x = [MIN(a:a)]
y = [max(a:a)]
For i = x To y - 1
If IsError(Application.Match(i + 1, [a:a], 0)) Then
msg = msg & i + 1 & "/"
End If
Next
MsgBox Left(msg, Len(msg) - 1)
End Sub
'--------------------
voir ici
http://www.cijoint.fr/cjlink.php?file=cj201104/cijD0w7plj.xls
--
Salutations
JJ
"achille" a écrit dans le message de news:
4d95844a$0$5389$Bonjour
Je dispose d un fichier avec des chiffres en colonne A de A2 à A65000
avec des chiffres dans n 'importe quel
ordre ....
exemple
A3 = 8547
A4 46
A5 48
A6= 8550
A7 52
A8 53
A9 51
A10= 8549
donc msgbox " manque aucun Numero"
en revanche avec cet exemple
A3 = 8547
A4 46
A5 54
A6= 8555
A7 52
A8 53
A9 51
A10= 8549
donc msgbox " manque 8548 / 8550"
et si en manquait trois ben il aurait mis les 3 et ainsi de suite
je voudrais ceci à la fermeture du fichier
merci.
merci jackouille .....
merci jackouille mais je suis sur qu on peut mieux faire en vba..
merci quand meme
"Jacquouille" a écrit dans le message de news:
4d958e01$0$14254$Bonjour
Je verrais bien ceci:
1) trier col A
2) en B1, prendre le plus petit nombre de colA
3) via recopie incrémentée, tirer B1 jusqu'en bas.
4) on peut déjà comparer le dernier de la col A avec celui de la col B et
voir combien il en manque.
5) via une petite macro, supprimer tous les nombres de la col B qui sont
dans la col A (doux blonds).
6) il ne restera, in fine, que les absents.....
7) après, éventuellement et pour le fun, faire un msg d'alerte ....
Jacquouille
" Le vin est au repas ce que le parfum est à la femme."
"achille" a écrit dans le message de groupe de discussion :
4d95844a$0$5389$
Bonjour
Je dispose d un fichier avec des chiffres en colonne A de A2 à A65000
avec
des chiffres dans n 'importe quel ordre ....
exemple
A3 = 8547
A4 46
A5 48
A6= 8550
A7 52
A8 53
A9 51
A10= 8549
donc msgbox " manque aucun Numero"
en revanche avec cet exemple
A3 = 8547
A4 46
A5 54
A6= 8555
A7 52
A8 53
A9 51
A10= 8549
donc msgbox " manque 8548 / 8550"
et si en manquait trois ben il aurait mis les 3 et ainsi de suite
je voudrais ceci à la fermeture du fichier
merci.
merci jackouille .....
merci jackouille mais je suis sur qu on peut mieux faire en vba..
merci quand meme
"Jacquouille" <j.thiernesse@skynet.be> a écrit dans le message de news:
4d958e01$0$14254$ba620e4c@news.skynet.be...
Bonjour
Je verrais bien ceci:
1) trier col A
2) en B1, prendre le plus petit nombre de colA
3) via recopie incrémentée, tirer B1 jusqu'en bas.
4) on peut déjà comparer le dernier de la col A avec celui de la col B et
voir combien il en manque.
5) via une petite macro, supprimer tous les nombres de la col B qui sont
dans la col A (doux blonds).
6) il ne restera, in fine, que les absents.....
7) après, éventuellement et pour le fun, faire un msg d'alerte ....
Jacquouille
" Le vin est au repas ce que le parfum est à la femme."
"achille" a écrit dans le message de groupe de discussion :
4d95844a$0$5389$ba4acef3@reader.news.orange.fr...
Bonjour
Je dispose d un fichier avec des chiffres en colonne A de A2 à A65000
avec
des chiffres dans n 'importe quel ordre ....
exemple
A3 = 8547
A4 46
A5 48
A6= 8550
A7 52
A8 53
A9 51
A10= 8549
donc msgbox " manque aucun Numero"
en revanche avec cet exemple
A3 = 8547
A4 46
A5 54
A6= 8555
A7 52
A8 53
A9 51
A10= 8549
donc msgbox " manque 8548 / 8550"
et si en manquait trois ben il aurait mis les 3 et ainsi de suite
je voudrais ceci à la fermeture du fichier
merci.
merci jackouille .....
merci jackouille mais je suis sur qu on peut mieux faire en vba..
merci quand meme
"Jacquouille" a écrit dans le message de news:
4d958e01$0$14254$Bonjour
Je verrais bien ceci:
1) trier col A
2) en B1, prendre le plus petit nombre de colA
3) via recopie incrémentée, tirer B1 jusqu'en bas.
4) on peut déjà comparer le dernier de la col A avec celui de la col B et
voir combien il en manque.
5) via une petite macro, supprimer tous les nombres de la col B qui sont
dans la col A (doux blonds).
6) il ne restera, in fine, que les absents.....
7) après, éventuellement et pour le fun, faire un msg d'alerte ....
Jacquouille
" Le vin est au repas ce que le parfum est à la femme."
"achille" a écrit dans le message de groupe de discussion :
4d95844a$0$5389$
Bonjour
Je dispose d un fichier avec des chiffres en colonne A de A2 à A65000
avec
des chiffres dans n 'importe quel ordre ....
exemple
A3 = 8547
A4 46
A5 48
A6= 8550
A7 52
A8 53
A9 51
A10= 8549
donc msgbox " manque aucun Numero"
en revanche avec cet exemple
A3 = 8547
A4 46
A5 54
A6= 8555
A7 52
A8 53
A9 51
A10= 8549
donc msgbox " manque 8548 / 8550"
et si en manquait trois ben il aurait mis les 3 et ainsi de suite
je voudrais ceci à la fermeture du fichier
merci.
C'est normal, Docteur?
Ya pas de kwa.....
Dis, Jacky, chez moi, il affiche un msgbox avec le nombre de nombres manquants, mais pas LES nombres.
C'est normal, Docteur?
Jacquouille
" Le vin est au repas ce que le parfum est à la femme."
"Jacky" a écrit dans le message de groupe de discussion : in44h1$t65$merci jackouille .....
ouille ouille ouille
;o)))
--
Salutations
JJ
"achille" a écrit dans le message de news:
4d9590e9$0$7707$merci jackouille mais je suis sur qu on peut mieux faire en vba..
merci quand meme
"Jacquouille" a écrit dans le message de news:
4d958e01$0$14254$Bonjour
Je verrais bien ceci:
1) trier col A
2) en B1, prendre le plus petit nombre de colA
3) via recopie incrémentée, tirer B1 jusqu'en bas.
4) on peut déjà comparer le dernier de la col A avec celui de la col B et voir combien il en manque.
5) via une petite macro, supprimer tous les nombres de la col B qui sont dans la col A (doux blonds).
6) il ne restera, in fine, que les absents.....
7) après, éventuellement et pour le fun, faire un msg d'alerte ....
Jacquouille
" Le vin est au repas ce que le parfum est à la femme."
"achille" a écrit dans le message de groupe de discussion :
4d95844a$0$5389$
Bonjour
Je dispose d un fichier avec des chiffres en colonne A de A2 à A65000 avec
des chiffres dans n 'importe quel ordre ....
exemple
A3 = 8547
A4 46
A5 48
A6= 8550
A7 52
A8 53
A9 51
A10= 8549
donc msgbox " manque aucun Numero"
en revanche avec cet exemple
A3 = 8547
A4 46
A5 54
A6= 8555
A7 52
A8 53
A9 51
A10= 8549
donc msgbox " manque 8548 / 8550"
et si en manquait trois ben il aurait mis les 3 et ainsi de suite
je voudrais ceci à la fermeture du fichier
merci.
C'est normal, Docteur?
Ya pas de kwa.....
Dis, Jacky, chez moi, il affiche un msgbox avec le nombre de nombres manquants, mais pas LES nombres.
C'est normal, Docteur?
Jacquouille
" Le vin est au repas ce que le parfum est à la femme."
"Jacky" a écrit dans le message de groupe de discussion : in44h1$t65$1@speranza.aioe.org...
merci jackouille .....
ouille ouille ouille
;o)))
--
Salutations
JJ
"achille" <stephol@prodiag.fr> a écrit dans le message de news:
4d9590e9$0$7707$ba4acef3@reader.news.orange.fr...
merci jackouille mais je suis sur qu on peut mieux faire en vba..
merci quand meme
"Jacquouille" <j.thiernesse@skynet.be> a écrit dans le message de news:
4d958e01$0$14254$ba620e4c@news.skynet.be...
Bonjour
Je verrais bien ceci:
1) trier col A
2) en B1, prendre le plus petit nombre de colA
3) via recopie incrémentée, tirer B1 jusqu'en bas.
4) on peut déjà comparer le dernier de la col A avec celui de la col B et voir combien il en manque.
5) via une petite macro, supprimer tous les nombres de la col B qui sont dans la col A (doux blonds).
6) il ne restera, in fine, que les absents.....
7) après, éventuellement et pour le fun, faire un msg d'alerte ....
Jacquouille
" Le vin est au repas ce que le parfum est à la femme."
"achille" a écrit dans le message de groupe de discussion :
4d95844a$0$5389$ba4acef3@reader.news.orange.fr...
Bonjour
Je dispose d un fichier avec des chiffres en colonne A de A2 à A65000 avec
des chiffres dans n 'importe quel ordre ....
exemple
A3 = 8547
A4 46
A5 48
A6= 8550
A7 52
A8 53
A9 51
A10= 8549
donc msgbox " manque aucun Numero"
en revanche avec cet exemple
A3 = 8547
A4 46
A5 54
A6= 8555
A7 52
A8 53
A9 51
A10= 8549
donc msgbox " manque 8548 / 8550"
et si en manquait trois ben il aurait mis les 3 et ainsi de suite
je voudrais ceci à la fermeture du fichier
merci.
C'est normal, Docteur?
Ya pas de kwa.....
Dis, Jacky, chez moi, il affiche un msgbox avec le nombre de nombres manquants, mais pas LES nombres.
C'est normal, Docteur?
Jacquouille
" Le vin est au repas ce que le parfum est à la femme."
"Jacky" a écrit dans le message de groupe de discussion : in44h1$t65$merci jackouille .....
ouille ouille ouille
;o)))
--
Salutations
JJ
"achille" a écrit dans le message de news:
4d9590e9$0$7707$merci jackouille mais je suis sur qu on peut mieux faire en vba..
merci quand meme
"Jacquouille" a écrit dans le message de news:
4d958e01$0$14254$Bonjour
Je verrais bien ceci:
1) trier col A
2) en B1, prendre le plus petit nombre de colA
3) via recopie incrémentée, tirer B1 jusqu'en bas.
4) on peut déjà comparer le dernier de la col A avec celui de la col B et voir combien il en manque.
5) via une petite macro, supprimer tous les nombres de la col B qui sont dans la col A (doux blonds).
6) il ne restera, in fine, que les absents.....
7) après, éventuellement et pour le fun, faire un msg d'alerte ....
Jacquouille
" Le vin est au repas ce que le parfum est à la femme."
"achille" a écrit dans le message de groupe de discussion :
4d95844a$0$5389$
Bonjour
Je dispose d un fichier avec des chiffres en colonne A de A2 à A65000 avec
des chiffres dans n 'importe quel ordre ....
exemple
A3 = 8547
A4 46
A5 48
A6= 8550
A7 52
A8 53
A9 51
A10= 8549
donc msgbox " manque aucun Numero"
en revanche avec cet exemple
A3 = 8547
A4 46
A5 54
A6= 8555
A7 52
A8 53
A9 51
A10= 8549
donc msgbox " manque 8548 / 8550"
et si en manquait trois ben il aurait mis les 3 et ainsi de suite
je voudrais ceci à la fermeture du fichier
merci.