Cette formule (merci Daniel) me mets en AL3 uniquement les chiffres
Pour ajouter les lettres je ferais un petit conacatener ou quelques chose comme ça Pas de soucis
Par contre je voudrais dire que si si il n'y a que des chiffres en AK qu'il copie simplement ce chiffre
Donc cela fera quelque chose comme =If(AK3="only figures";AK3;VALUE(RIGHT(AK3;FIND(" ";AK3)*3)))
Que mettre à la place de only figures
Merci et à bientôt
Rex
"rthompson" a écrit dans le message de news:
Bonjour à toutes et tous
A mon avis celle-ci doit être plus facile que mon décortiquage
Dans la colonne V j'ai un nom de pays France, Switzerland, Belgium
Dans la colonne AK j'ai le code postal qui n'est pas conforme
certain ne contiennent pas les pays (ex 3051 au lieu B - 3051)
Donc je me suis dis que le plus simple était de créer trois colonnes supplémentaires que je pourrais facilement recombiner après
Donc je commence une formule dans le genre
= If(And(V4="France".......
Mais comment fait-on pour dire que si en AK4 il y a déjà F - et le code postal de copier uniquement les chiffres?
Merci et à très bientôt
Rex
rthompson
Bonjour François
Yes it is No it is not
J'esssssplikkkkk
Pour la plupart cela à l'air de fonctionner
MAIS
Pour les Suisse il me met S CH puis le code au lieu de CH et le code
Et aussi
Dans la colonne actuel du code certains sont F - 5241 et d'autre 5241 Pour le premier dans la nouvelle colonne c'est impeccable Mais pour le secaond le code devient F 5241 sans le trait
T'as une idée?
Rex
"Francois L" a écrit dans le message de news:
rthompson a écrit :
Bonjour,
Supposons en A les pays, en B les codes postaux corrects ou non, en C tu met : =SI(STXT(A1;1;1)=STXT(B1;1;1);B1;STXT(A1;1;1)& " " &B1)
et tu auras en colonne C les codes postaux corrects
isn't it ?
-- François L
Bonjour à toutes et tous
A mon avis celle-ci doit être plus facile que mon décortiquage
Dans la colonne V j'ai un nom de pays France, Switzerland, Belgium
Dans la colonne AK j'ai le code postal qui n'est pas conforme
certain ne contiennent pas les pays (ex 3051 au lieu B - 3051)
Donc je me suis dis que le plus simple était de créer trois colonnes supplémentaires que je pourrais facilement recombiner après
Donc je commence une formule dans le genre
= If(And(V4="France".......
Mais comment fait-on pour dire que si en AK4 il y a déjà F - et le code postal de copier uniquement les chiffres?
Merci et à très bientôt
Rex
Bonjour François
Yes it is No it is not
J'esssssplikkkkk
Pour la plupart cela à l'air de fonctionner
MAIS
Pour les Suisse il me met S CH puis le code
au lieu de CH et le code
Et aussi
Dans la colonne actuel du code certains sont F - 5241 et d'autre 5241
Pour le premier dans la nouvelle colonne c'est impeccable
Mais pour le secaond le code devient F 5241 sans le trait
T'as une idée?
Rex
"Francois L" <gardiendephare@etbalises.fr.invalid> a écrit dans le message
de news: usMPAjX7IHA.1196@TK2MSFTNGP05.phx.gbl...
rthompson a écrit :
Bonjour,
Supposons en A les pays, en B les codes postaux corrects ou non, en C tu
met :
=SI(STXT(A1;1;1)=STXT(B1;1;1);B1;STXT(A1;1;1)& " " &B1)
et tu auras en colonne C les codes postaux corrects
isn't it ?
--
François L
Bonjour à toutes et tous
A mon avis celle-ci doit être plus facile que mon décortiquage
Dans la colonne V j'ai un nom de pays France, Switzerland, Belgium
Dans la colonne AK j'ai le code postal qui n'est pas conforme
certain ne contiennent pas les pays (ex 3051 au lieu B - 3051)
Donc je me suis dis que le plus simple était de créer trois colonnes
supplémentaires
que je pourrais facilement recombiner après
Donc je commence une formule dans le genre
= If(And(V4="France".......
Mais comment fait-on pour dire que si en AK4 il y a déjà F - et le code
postal
de copier uniquement les chiffres?
Pour les Suisse il me met S CH puis le code au lieu de CH et le code
Et aussi
Dans la colonne actuel du code certains sont F - 5241 et d'autre 5241 Pour le premier dans la nouvelle colonne c'est impeccable Mais pour le secaond le code devient F 5241 sans le trait
T'as une idée?
Rex
"Francois L" a écrit dans le message de news:
rthompson a écrit :
Bonjour,
Supposons en A les pays, en B les codes postaux corrects ou non, en C tu met : =SI(STXT(A1;1;1)=STXT(B1;1;1);B1;STXT(A1;1;1)& " " &B1)
et tu auras en colonne C les codes postaux corrects
isn't it ?
-- François L
Bonjour à toutes et tous
A mon avis celle-ci doit être plus facile que mon décortiquage
Dans la colonne V j'ai un nom de pays France, Switzerland, Belgium
Dans la colonne AK j'ai le code postal qui n'est pas conforme
certain ne contiennent pas les pays (ex 3051 au lieu B - 3051)
Donc je me suis dis que le plus simple était de créer trois colonnes supplémentaires que je pourrais facilement recombiner après
Donc je commence une formule dans le genre
= If(And(V4="France".......
Mais comment fait-on pour dire que si en AK4 il y a déjà F - et le code postal de copier uniquement les chiffres?
Merci et à très bientôt
Rex
Modeste
Bonsour® rthompson avec ferveur ;o))) vous nous disiez :
Pour les Suisse il me met S CH puis le code au lieu de CH et le code Dans la colonne actuel du code certains sont F - 5241 et d'autre 5241 Pour le premier dans la nouvelle colonne c'est impeccable Mais pour le secaond le code devient F 5241 sans le trait
un petite fonction personnalisée ;o))) Function CP(target) CP = "" For i = 1 To Len(target) If Mid(target, i, 1) Like "#" Then CP = CP & Mid(target, i, 1) End If Next CP = Left(Cells(target.Row, "V"), 1) & "-" & CP CP = Application.Substitute(CP, "S", "CH") 'CP = Application.Substitute(CP, "L", "Lu") End Function
-- @+ ;o)))
Bonsour® rthompson avec ferveur ;o))) vous nous disiez :
Pour les Suisse il me met S CH puis le code
au lieu de CH et le code
Dans la colonne actuel du code certains sont F - 5241 et d'autre 5241
Pour le premier dans la nouvelle colonne c'est impeccable
Mais pour le secaond le code devient F 5241 sans le trait
un petite fonction personnalisée ;o)))
Function CP(target)
CP = ""
For i = 1 To Len(target)
If Mid(target, i, 1) Like "#" Then
CP = CP & Mid(target, i, 1)
End If
Next
CP = Left(Cells(target.Row, "V"), 1) & "-" & CP
CP = Application.Substitute(CP, "S", "CH")
'CP = Application.Substitute(CP, "L", "Lu")
End Function
Bonsour® rthompson avec ferveur ;o))) vous nous disiez :
Pour les Suisse il me met S CH puis le code au lieu de CH et le code Dans la colonne actuel du code certains sont F - 5241 et d'autre 5241 Pour le premier dans la nouvelle colonne c'est impeccable Mais pour le secaond le code devient F 5241 sans le trait
un petite fonction personnalisée ;o))) Function CP(target) CP = "" For i = 1 To Len(target) If Mid(target, i, 1) Like "#" Then CP = CP & Mid(target, i, 1) End If Next CP = Left(Cells(target.Row, "V"), 1) & "-" & CP CP = Application.Substitute(CP, "S", "CH") 'CP = Application.Substitute(CP, "L", "Lu") End Function
-- @+ ;o)))
Francois L
Modeste a écrit :
Bonjour,
Le maître a parlé...
PS pour Allemagne, c'est pas G - ? -- François L
Bonsour® rthompson avec ferveur ;o))) vous nous disiez :
Pour les Suisse il me met S CH puis le code au lieu de CH et le code Dans la colonne actuel du code certains sont F - 5241 et d'autre 5241 Pour le premier dans la nouvelle colonne c'est impeccable Mais pour le secaond le code devient F 5241 sans le trait
un petite fonction personnalisée ;o))) Function CP(target) CP = "" For i = 1 To Len(target) If Mid(target, i, 1) Like "#" Then CP = CP & Mid(target, i, 1) End If Next CP = Left(Cells(target.Row, "V"), 1) & "-" & CP CP = Application.Substitute(CP, "S", "CH") 'CP = Application.Substitute(CP, "L", "Lu") End Function
Modeste a écrit :
Bonjour,
Le maître a parlé...
PS pour Allemagne, c'est pas G - ?
--
François L
Bonsour® rthompson avec ferveur ;o))) vous nous disiez :
Pour les Suisse il me met S CH puis le code
au lieu de CH et le code
Dans la colonne actuel du code certains sont F - 5241 et d'autre 5241
Pour le premier dans la nouvelle colonne c'est impeccable
Mais pour le secaond le code devient F 5241 sans le trait
un petite fonction personnalisée ;o)))
Function CP(target)
CP = ""
For i = 1 To Len(target)
If Mid(target, i, 1) Like "#" Then
CP = CP & Mid(target, i, 1)
End If
Next
CP = Left(Cells(target.Row, "V"), 1) & "-" & CP
CP = Application.Substitute(CP, "S", "CH")
'CP = Application.Substitute(CP, "L", "Lu")
End Function
Bonsour® rthompson avec ferveur ;o))) vous nous disiez :
Pour les Suisse il me met S CH puis le code au lieu de CH et le code Dans la colonne actuel du code certains sont F - 5241 et d'autre 5241 Pour le premier dans la nouvelle colonne c'est impeccable Mais pour le secaond le code devient F 5241 sans le trait
un petite fonction personnalisée ;o))) Function CP(target) CP = "" For i = 1 To Len(target) If Mid(target, i, 1) Like "#" Then CP = CP & Mid(target, i, 1) End If Next CP = Left(Cells(target.Row, "V"), 1) & "-" & CP CP = Application.Substitute(CP, "S", "CH") 'CP = Application.Substitute(CP, "L", "Lu") End Function
Modeste
Bonsour® Francois L avec ferveur ;o))) vous nous disiez :
PS pour Allemagne, c'est pas G - ?
dans la fonction perso fournie ça dépend de ce qui il y a d'écrit en colonne V !!!! Germany, Allemagne ou Deutschland ???
;o))) dans ce cas en colonne V ecrire le code puis le pays D - Allemagne ;o))) puis modifier la fonction et ajouter CP = Application.Substitute(CP, "D", "G")
-- -- @+ ;o)))
Bonsour® Francois L avec ferveur ;o))) vous nous disiez :
PS pour Allemagne, c'est pas G - ?
dans la fonction perso fournie
ça dépend de ce qui il y a d'écrit en colonne V !!!!
Germany, Allemagne ou Deutschland ???
;o)))
dans ce cas en colonne V ecrire le code puis le pays
D - Allemagne
;o)))
puis modifier la fonction
et ajouter
CP = Application.Substitute(CP, "D", "G")
Bonsour® Francois L avec ferveur ;o))) vous nous disiez :
PS pour Allemagne, c'est pas G - ?
dans la fonction perso fournie ça dépend de ce qui il y a d'écrit en colonne V !!!! Germany, Allemagne ou Deutschland ???
;o))) dans ce cas en colonne V ecrire le code puis le pays D - Allemagne ;o))) puis modifier la fonction et ajouter CP = Application.Substitute(CP, "D", "G")
-- -- @+ ;o)))
rthompson
Bonjour et merci
Et maintenant pour la question à mille euros
Je n'ai jamais utilisé de fonction perso
Comment faire?
Est-ce dans la cellule ou dans une macro
Je colle ton code dans un module, et puis qu'en figes mon ami?
A bientôt
Rex
"Modeste" a écrit dans le message de news:
Bonsour® rthompson avec ferveur ;o))) vous nous disiez :
Pour les Suisse il me met S CH puis le code au lieu de CH et le code Dans la colonne actuel du code certains sont F - 5241 et d'autre 5241 Pour le premier dans la nouvelle colonne c'est impeccable Mais pour le secaond le code devient F 5241 sans le trait
un petite fonction personnalisée ;o))) Function CP(target) CP = "" For i = 1 To Len(target) If Mid(target, i, 1) Like "#" Then CP = CP & Mid(target, i, 1) End If Next CP = Left(Cells(target.Row, "V"), 1) & "-" & CP CP = Application.Substitute(CP, "S", "CH") 'CP = Application.Substitute(CP, "L", "Lu") End Function
-- @+ ;o)))
Bonjour et merci
Et maintenant pour la question à mille euros
Je n'ai jamais utilisé de fonction perso
Comment faire?
Est-ce dans la cellule ou dans une macro
Je colle ton code dans un module, et puis qu'en figes mon ami?
A bientôt
Rex
"Modeste" <nomail@nomail.net> a écrit dans le message de news:
ebq7u6X7IHA.2072@TK2MSFTNGP04.phx.gbl...
Bonsour® rthompson avec ferveur ;o))) vous nous disiez :
Pour les Suisse il me met S CH puis le code
au lieu de CH et le code
Dans la colonne actuel du code certains sont F - 5241 et d'autre 5241
Pour le premier dans la nouvelle colonne c'est impeccable
Mais pour le secaond le code devient F 5241 sans le trait
un petite fonction personnalisée ;o)))
Function CP(target)
CP = ""
For i = 1 To Len(target)
If Mid(target, i, 1) Like "#" Then
CP = CP & Mid(target, i, 1)
End If
Next
CP = Left(Cells(target.Row, "V"), 1) & "-" & CP
CP = Application.Substitute(CP, "S", "CH")
'CP = Application.Substitute(CP, "L", "Lu")
End Function
Je colle ton code dans un module, et puis qu'en figes mon ami?
A bientôt
Rex
"Modeste" a écrit dans le message de news:
Bonsour® rthompson avec ferveur ;o))) vous nous disiez :
Pour les Suisse il me met S CH puis le code au lieu de CH et le code Dans la colonne actuel du code certains sont F - 5241 et d'autre 5241 Pour le premier dans la nouvelle colonne c'est impeccable Mais pour le secaond le code devient F 5241 sans le trait
un petite fonction personnalisée ;o))) Function CP(target) CP = "" For i = 1 To Len(target) If Mid(target, i, 1) Like "#" Then CP = CP & Mid(target, i, 1) End If Next CP = Left(Cells(target.Row, "V"), 1) & "-" & CP CP = Application.Substitute(CP, "S", "CH") 'CP = Application.Substitute(CP, "L", "Lu") End Function
-- @+ ;o)))
rthompson
Et oui
Et quand le maître parle, on a tout intérêt à écouter
Ecouter, que dis-je, on s'abreuve goulûment à cette source
(Je crois que mon chapeau est mal mis, ne serait-ce pas goûlument?)
Et puis on s'en fout, l'important est de boire
Une fois de plus un grand merci à toi
Et à propos, pas d'autres idées pour mes addresses? Avec ton code je dois pouvoir en résoudre près de la moitié, mais il m'en restera toujours 5.000
Rex ;-)))) En espérant qu'il me dise ou je peux me mettre sa fonction
"Francois L" a écrit dans le message de news:
Modeste a écrit :
Bonjour,
Le maître a parlé...
PS pour Allemagne, c'est pas G - ? -- François L
Bonsour® rthompson avec ferveur ;o))) vous nous disiez :
Pour les Suisse il me met S CH puis le code au lieu de CH et le code Dans la colonne actuel du code certains sont F - 5241 et d'autre 5241 Pour le premier dans la nouvelle colonne c'est impeccable Mais pour le secaond le code devient F 5241 sans le trait
un petite fonction personnalisée ;o))) Function CP(target) CP = "" For i = 1 To Len(target) If Mid(target, i, 1) Like "#" Then CP = CP & Mid(target, i, 1) End If Next CP = Left(Cells(target.Row, "V"), 1) & "-" & CP CP = Application.Substitute(CP, "S", "CH") 'CP = Application.Substitute(CP, "L", "Lu") End Function
Et oui
Et quand le maître parle, on a tout intérêt à écouter
Ecouter, que dis-je, on s'abreuve goulûment à cette source
(Je crois que mon chapeau est mal mis, ne serait-ce pas goûlument?)
Et puis on s'en fout, l'important est de boire
Une fois de plus un grand merci à toi
Et à propos, pas d'autres idées pour mes addresses?
Avec ton code je dois pouvoir en résoudre près de la moitié, mais il m'en
restera toujours 5.000
Rex ;-))))
En espérant qu'il me dise ou je peux me mettre sa fonction
"Francois L" <gardiendephare@etbalises.fr.invalid> a écrit dans le message
de news: OgK8XCY7IHA.4468@TK2MSFTNGP02.phx.gbl...
Modeste a écrit :
Bonjour,
Le maître a parlé...
PS pour Allemagne, c'est pas G - ?
--
François L
Bonsour® rthompson avec ferveur ;o))) vous nous disiez :
Pour les Suisse il me met S CH puis le code
au lieu de CH et le code
Dans la colonne actuel du code certains sont F - 5241 et d'autre 5241
Pour le premier dans la nouvelle colonne c'est impeccable
Mais pour le secaond le code devient F 5241 sans le trait
un petite fonction personnalisée ;o)))
Function CP(target)
CP = ""
For i = 1 To Len(target)
If Mid(target, i, 1) Like "#" Then
CP = CP & Mid(target, i, 1)
End If
Next
CP = Left(Cells(target.Row, "V"), 1) & "-" & CP
CP = Application.Substitute(CP, "S", "CH")
'CP = Application.Substitute(CP, "L", "Lu")
End Function
Et quand le maître parle, on a tout intérêt à écouter
Ecouter, que dis-je, on s'abreuve goulûment à cette source
(Je crois que mon chapeau est mal mis, ne serait-ce pas goûlument?)
Et puis on s'en fout, l'important est de boire
Une fois de plus un grand merci à toi
Et à propos, pas d'autres idées pour mes addresses? Avec ton code je dois pouvoir en résoudre près de la moitié, mais il m'en restera toujours 5.000
Rex ;-)))) En espérant qu'il me dise ou je peux me mettre sa fonction
"Francois L" a écrit dans le message de news:
Modeste a écrit :
Bonjour,
Le maître a parlé...
PS pour Allemagne, c'est pas G - ? -- François L
Bonsour® rthompson avec ferveur ;o))) vous nous disiez :
Pour les Suisse il me met S CH puis le code au lieu de CH et le code Dans la colonne actuel du code certains sont F - 5241 et d'autre 5241 Pour le premier dans la nouvelle colonne c'est impeccable Mais pour le secaond le code devient F 5241 sans le trait
un petite fonction personnalisée ;o))) Function CP(target) CP = "" For i = 1 To Len(target) If Mid(target, i, 1) Like "#" Then CP = CP & Mid(target, i, 1) End If Next CP = Left(Cells(target.Row, "V"), 1) & "-" & CP CP = Application.Substitute(CP, "S", "CH") 'CP = Application.Substitute(CP, "L", "Lu") End Function
Francois L
Modeste a écrit :
Bonsour® Francois L avec ferveur ;o))) vous nous disiez :
PS pour Allemagne, c'est pas G - ?
dans la fonction perso fournie ça dépend de ce qui il y a d'écrit en colonne V !!!! Germany, Allemagne ou Deutschland ???
;o)))
Re,
En espérant qu'il n'y a pas une fois l'un, une fois l'autre et une fois le troisième....
Je fais cela assez souvent du redressement de bases d'adresses pour mon boulot (mais pas avec Excel). La seule solution vraiment performante, à mon avis, c'est d'avoir des tables de correspondances qui traitent les différentes modalités de fautes de saisies, d'appellations différentes d'une même ville, pays, rue, etc. , de supprimer tous les caractères accentués pour le traitement, de tout passer en majuscule, d'être patient...
Les américains ont un algorithme qui s'appelle SOUNDEX qui permet de rapprocher des noms à partir de leur lecture phonétique. J'ai vu une fois une implémentation de SOUNDEX sur Excel (je crois que c'est chez J. Walk) mais ça ne marche pas très bien sur des données francophones (sauf sur quelques points dont les consonnes doubles).
-- François L
-- François L
dans ce cas en colonne V ecrire le code puis le pays D - Allemagne ;o))) puis modifier la fonction et ajouter CP = Application.Substitute(CP, "D", "G")
Modeste a écrit :
Bonsour® Francois L avec ferveur ;o))) vous nous disiez :
PS pour Allemagne, c'est pas G - ?
dans la fonction perso fournie
ça dépend de ce qui il y a d'écrit en colonne V !!!!
Germany, Allemagne ou Deutschland ???
;o)))
Re,
En espérant qu'il n'y a pas une fois l'un, une fois l'autre et une fois
le troisième....
Je fais cela assez souvent du redressement de bases d'adresses pour mon
boulot (mais pas avec Excel). La seule solution vraiment performante, à
mon avis, c'est d'avoir des tables de correspondances qui traitent les
différentes modalités de fautes de saisies, d'appellations différentes
d'une même ville, pays, rue, etc. , de supprimer tous les caractères
accentués pour le traitement, de tout passer en majuscule, d'être patient...
Les américains ont un algorithme qui s'appelle SOUNDEX qui permet de
rapprocher des noms à partir de leur lecture phonétique. J'ai vu une
fois une implémentation de SOUNDEX sur Excel (je crois que c'est chez J.
Walk) mais ça ne marche pas très bien sur des données francophones (sauf
sur quelques points dont les consonnes doubles).
--
François L
--
François L
dans ce cas en colonne V ecrire le code puis le pays
D - Allemagne
;o)))
puis modifier la fonction
et ajouter
CP = Application.Substitute(CP, "D", "G")
Bonsour® Francois L avec ferveur ;o))) vous nous disiez :
PS pour Allemagne, c'est pas G - ?
dans la fonction perso fournie ça dépend de ce qui il y a d'écrit en colonne V !!!! Germany, Allemagne ou Deutschland ???
;o)))
Re,
En espérant qu'il n'y a pas une fois l'un, une fois l'autre et une fois le troisième....
Je fais cela assez souvent du redressement de bases d'adresses pour mon boulot (mais pas avec Excel). La seule solution vraiment performante, à mon avis, c'est d'avoir des tables de correspondances qui traitent les différentes modalités de fautes de saisies, d'appellations différentes d'une même ville, pays, rue, etc. , de supprimer tous les caractères accentués pour le traitement, de tout passer en majuscule, d'être patient...
Les américains ont un algorithme qui s'appelle SOUNDEX qui permet de rapprocher des noms à partir de leur lecture phonétique. J'ai vu une fois une implémentation de SOUNDEX sur Excel (je crois que c'est chez J. Walk) mais ça ne marche pas très bien sur des données francophones (sauf sur quelques points dont les consonnes doubles).
-- François L
-- François L
dans ce cas en colonne V ecrire le code puis le pays D - Allemagne ;o))) puis modifier la fonction et ajouter CP = Application.Substitute(CP, "D", "G")
rthompson
Bonjour
Et je peux te confirmer qu'il n'y RIEN d'organisé dans cette Base de données
Je n'ai jamais vu un foutoir pareil
Même dans des champs ou il fallait entrer soit 1, soit 2 je retrouve des X, des ? et même des ???? quand ce ne sont pas des 5
Il n'y avait, semble-t-il AUCUN controle sur les entrées
Et en ce qui concerne Allemagne, Germany ou Deutschland tu peux y ajouter Allemagne de l'Est, DeutschRepublik, Federal Germany et je suis certain qu'il y en a d'autres
A bientôt
PS, t'as une idée ou je dois mettre cette fonction?
Il semble que Modeste est parti manger ou zzzzzzzzzzzz
Merci
Rex
"Francois L" a écrit dans le message de news:
Modeste a écrit :
Bonsour® Francois L avec ferveur ;o))) vous nous disiez :
PS pour Allemagne, c'est pas G - ?
dans la fonction perso fournie ça dépend de ce qui il y a d'écrit en colonne V !!!! Germany, Allemagne ou Deutschland ???
;o)))
Re,
En espérant qu'il n'y a pas une fois l'un, une fois l'autre et une fois le troisième....
Je fais cela assez souvent du redressement de bases d'adresses pour mon boulot (mais pas avec Excel). La seule solution vraiment performante, à mon avis, c'est d'avoir des tables de correspondances qui traitent les différentes modalités de fautes de saisies, d'appellations différentes d'une même ville, pays, rue, etc. , de supprimer tous les caractères accentués pour le traitement, de tout passer en majuscule, d'être patient...
Les américains ont un algorithme qui s'appelle SOUNDEX qui permet de rapprocher des noms à partir de leur lecture phonétique. J'ai vu une fois une implémentation de SOUNDEX sur Excel (je crois que c'est chez J. Walk) mais ça ne marche pas très bien sur des données francophones (sauf sur quelques points dont les consonnes doubles).
-- François L
-- François L
dans ce cas en colonne V ecrire le code puis le pays D - Allemagne ;o))) puis modifier la fonction et ajouter CP = Application.Substitute(CP, "D", "G")
Bonjour
Et je peux te confirmer qu'il n'y RIEN d'organisé dans cette Base de données
Je n'ai jamais vu un foutoir pareil
Même dans des champs ou il fallait entrer soit 1, soit 2
je retrouve des X, des ? et même des ???? quand ce ne sont pas des 5
Il n'y avait, semble-t-il AUCUN controle sur les entrées
Et en ce qui concerne Allemagne, Germany ou Deutschland
tu peux y ajouter Allemagne de l'Est, DeutschRepublik, Federal Germany
et je suis certain qu'il y en a d'autres
A bientôt
PS, t'as une idée ou je dois mettre cette fonction?
Il semble que Modeste est parti manger ou zzzzzzzzzzzz
Merci
Rex
"Francois L" <gardiendephare@etbalises.fr.invalid> a écrit dans le message
de news: OmQI2UY7IHA.5596@TK2MSFTNGP02.phx.gbl...
Modeste a écrit :
Bonsour® Francois L avec ferveur ;o))) vous nous disiez :
PS pour Allemagne, c'est pas G - ?
dans la fonction perso fournie
ça dépend de ce qui il y a d'écrit en colonne V !!!!
Germany, Allemagne ou Deutschland ???
;o)))
Re,
En espérant qu'il n'y a pas une fois l'un, une fois l'autre et une fois le
troisième....
Je fais cela assez souvent du redressement de bases d'adresses pour mon
boulot (mais pas avec Excel). La seule solution vraiment performante, à
mon avis, c'est d'avoir des tables de correspondances qui traitent les
différentes modalités de fautes de saisies, d'appellations différentes
d'une même ville, pays, rue, etc. , de supprimer tous les caractères
accentués pour le traitement, de tout passer en majuscule, d'être
patient...
Les américains ont un algorithme qui s'appelle SOUNDEX qui permet de
rapprocher des noms à partir de leur lecture phonétique. J'ai vu une fois
une implémentation de SOUNDEX sur Excel (je crois que c'est chez J. Walk)
mais ça ne marche pas très bien sur des données francophones (sauf sur
quelques points dont les consonnes doubles).
--
François L
--
François L
dans ce cas en colonne V ecrire le code puis le pays D - Allemagne
;o)))
puis modifier la fonction
et ajouter CP = Application.Substitute(CP, "D", "G")
Et je peux te confirmer qu'il n'y RIEN d'organisé dans cette Base de données
Je n'ai jamais vu un foutoir pareil
Même dans des champs ou il fallait entrer soit 1, soit 2 je retrouve des X, des ? et même des ???? quand ce ne sont pas des 5
Il n'y avait, semble-t-il AUCUN controle sur les entrées
Et en ce qui concerne Allemagne, Germany ou Deutschland tu peux y ajouter Allemagne de l'Est, DeutschRepublik, Federal Germany et je suis certain qu'il y en a d'autres
A bientôt
PS, t'as une idée ou je dois mettre cette fonction?
Il semble que Modeste est parti manger ou zzzzzzzzzzzz
Merci
Rex
"Francois L" a écrit dans le message de news:
Modeste a écrit :
Bonsour® Francois L avec ferveur ;o))) vous nous disiez :
PS pour Allemagne, c'est pas G - ?
dans la fonction perso fournie ça dépend de ce qui il y a d'écrit en colonne V !!!! Germany, Allemagne ou Deutschland ???
;o)))
Re,
En espérant qu'il n'y a pas une fois l'un, une fois l'autre et une fois le troisième....
Je fais cela assez souvent du redressement de bases d'adresses pour mon boulot (mais pas avec Excel). La seule solution vraiment performante, à mon avis, c'est d'avoir des tables de correspondances qui traitent les différentes modalités de fautes de saisies, d'appellations différentes d'une même ville, pays, rue, etc. , de supprimer tous les caractères accentués pour le traitement, de tout passer en majuscule, d'être patient...
Les américains ont un algorithme qui s'appelle SOUNDEX qui permet de rapprocher des noms à partir de leur lecture phonétique. J'ai vu une fois une implémentation de SOUNDEX sur Excel (je crois que c'est chez J. Walk) mais ça ne marche pas très bien sur des données francophones (sauf sur quelques points dont les consonnes doubles).
-- François L
-- François L
dans ce cas en colonne V ecrire le code puis le pays D - Allemagne ;o))) puis modifier la fonction et ajouter CP = Application.Substitute(CP, "D", "G")