Comment faire pour ignorer une lettre?

Le
rthompson
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
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses Page 1 / 2
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
Francois L
Le #16401131
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








rthompson
Le #16401121
Bonjour

Et j'avance



Voici ce que j'ai fais

=VALUE(RIGHT(AK3;FIND(" ";AK3)*3))

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" 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
Le #16401321
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" 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
Le #16401301
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
Le #16401461
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
Le #16401731
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
Le #16401711
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"
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
Le #16401701
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" 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
Le #16401861
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")





rthompson
Le #16401841
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" 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")






Publicité
Poster une réponse
Anonyme