XL 2010 Macro VBA Excel (Doublon,SansAccents,Maj,Min,Nompropre,Espaces superflus)

patricktoulon · 7 Mai 2020

re
a mince Bonjour Thierry je l'ai mis a jour avec la fonction eriiiic aussi

eriiic · 6 Mai 2020

Le "Benchmark" à l'heure actuelle !

Ah oui mais si tu rajoutes des pays absent de ma liste sans compléter les données forcément ça m'ajoute des erreurs
Avec une MAJ je repasse à 4 également :

VB:

    ' Plans de num pays    Grèce,Mayotte,Andorre,Monaco
    Const codeInt As String = "30,262,376,377"
    Const lNumInt As String = "10,6,6,8" ' nombre de chiffres plan de num du pays

J'augmente le level alors
ajoute le 00377939393931
Ce n° est une anomalie que ma fonction ressort (en fait le laisse inchangé ou le vide au choix), toi tu le valides et le formates.
C'était pour assurer le marketing de ma fonction

Et pour rassurer Virginie, ôter les (0) n'est pas le plus dur

_Thierry · 6 Mai 2020

Virginie17d à dit:
Si Malheureusement, c'est un doc Excel vierge qu'il remplisse

Ben c'est ça qu'il faut créer tout d'abord, un classeur Excel de pilotage à la saisie préformatté pour que tout soit conforme...

@+Thierry

Virginie17d · 6 Mai 2020

_Thierry à dit:
Ben c'est ça qu'il faut créer tout d'abord, un classeur Excel de pilotage à la saisie préformaté pour que tout soit conforme...

@+Thierry

Mais c'est que tu as des idées intelligentes , je vais me pencher sur la question... Régler le pb à la source, je le sais pourtant, mais j'avais dans l'idée de leur envoyer un colis piéger mais je me suis dis que j'avais des enfants à élever

Es ce qu'en attendant ont peut l'adapter à ma Macro que je puisse déjà travailler avec cela.

_Thierry · 6 Mai 2020

Bonsoir Eric

eriiiic à dit:
Ah oui mais si tu rajoutes des pays absents de ma liste sans compléter les données

Oui alors tiens un KDO :

VB:

Const codeInt As String = "1,7,20,27,30,31,32,33,34,36,39,40,41,43,44,45,46,47,48,49,51,52,53,54,55,56,56,57,58,60,61,61,61,62,63,64,65,66,81,82,84,86,90,91,92,93,94,95,98,212,213,216,218,220,221,222,223,224,225,226,227,228,229,230,231,232,233,234,235,236,237,238,240,241,242,243,244,245,246,246,247,248,249,250,251,253,254,255,255,256,257,260,261,262,262,263,264,265,266,267,268,269,291,297,298,299,345,350,351,352,353,354,355,356,358,359,370,371,372,373,374,375,376,377,378,380,381,382,385,386,387,389,420,421,423,500,500,501,502,503,504,505,506,507,509,537,590,591,593,594,595,595,596,596,597,598,599,599,670,670,672,672,673,674,675,676,677,678,679,680,681,682,683,685,686,687,688,689,690,691,692,850,852,853,855,856,880,886,960,961,962,963,964,965,966,967,968,970,971,972,973,974,975,976,977,992,993,994,995,996,998,1242,1246,1264,1268,1268,1284,1340,1441,1473,1649,1664,1670,1671,1684,1767,1787,1808,1808,1809,1868,1869,1876,7840,7 7
"

@+Thierry

_Thierry · 6 Mai 2020

Virginie17d à dit:
Es ce qu'en attendant ont peut l'adapter à ma Macro que je puisse déjà travailler avec cela.

On y travaille, STP envoie le Dernier des Derniers Classeurs XLSM à jour...

@+Thierry

eriiic · 6 Mai 2020

Oui alors tiens un KDO

Tu n'as pas bien regardé mon code, ce n'est pas suffisant.
Il me faut aussi les données du plan de numérotation du pays. Que plus d'erreurs de saisie soient détectables.
Par exemple dans la liste il y a le 596345667, l'utilisateur se trompe et met un 6 de plus : 5963456667
Moi il est en anomalie, toi tu le mets à Internationl Lib French Antilles

Virginie17d · 6 Mai 2020

_Thierry à dit:
On y travaille, STP envoie le Dernier des Derniers Classeurs XLSM à jour...

Le dernier est en PJ

Virginie17d · 6 Mai 2020

eriiiic à dit:
Tu n'as pas bien regardé mon code, ce n'est pas suffisant.
Il me faut aussi les données du plan de numérotation du pays. Que plus d'erreurs de saisie soient détectables.
Par exemple dans la liste il y a le 596345667, l'utilisateur se trompe et met un 6 de plus : 5963456667
Moi il est en anomalie, toi tu le mets à Internationl Lib French Antilles

Numéro de téléphone — Wikipédia

fr.wikipedia.org

Tu veux que je te mette ces infos sous forme de tableau pour compléter vos codes ?

eriiic · 7 Mai 2020

Pour ma fonction il faut limiter aux pays réellement présents dans ta base.
J'ai trouvé cette liste wiki mais elle est très incomplète.
Pour trouver la Grèce (que Thierry a insidieusement ajouté ) j'ai dû aller sur le site du routard...
Tu as tant de destinations que ça ? Si oui il faudra mieux prévoir un tableau sur feuille.
Reste à voir si on arrive à récupérer le plan de num de tous les pays qui t'intéressent, et surtout si pousser le contrôle à ce niveau vaut vraiment le coup de faire ces recherches. C'est quand même aux utilisateurs d'être attentifs et appliqués dans leurs saisies.
La fiabilité est cruciale ou ils arrivent toujours à se débrouiller en cas d'ano ?

_Thierry · 7 Mai 2020

Re Bonsoir Eric

eriiiic à dit:
Tu n'as pas bien regardé mon code, ce n'est pas suffisant.
Il me faut aussi les données du plan de numérotation du pays

Si si bien sûr que j'ai vu ta seconde constante :

VB:

    Const codeInt As String = "30,262,376,377"
    Const lNumInt As String = "10,6,6,8" ' nombre de chiffres plan de num du pays

Et c'était pour ça le KDO "empoisonné" LoL car pour que ca "matche" entre les deux Arrays, il ne faut pas qu'il te manque un seul item entre les deux... Alors bon courage pour trouver le "National Number Length" pour chaque pays...

Et en prime selon les pays c'est variable :

Source : https://en.wikipedia.org/wiki/Telephone_numbers_in_Europe
Et hors EU c'est encore plus bordélique.... Sans parler des pays qui n'ont pas de Plan de Num...
Ce qui est sûr, c'est ingérable en constante, il faudra une table...

Non, c'est sans fin dans l'état, ce qui est déjà sûr c'est qu'il faudra une table, et du coup il me vient une idée @Virginie17d est-ce que tu récupères l'adresse du client avec le Code ISO de son pays ? Ou c'est encore écrit à main levée style "Phrance" ou "Maunaquo" ? (mort de rire)

En tout cas on s'ennuie pas avec toi Miss !

Buenas Noches (Code 34 , Lenght 9)
@+Thierry

laurent950 · 7 Mai 2020

Bonjour Eric,
Tu savais qu'il y a une norme pour les numéros de téléphone ? Le Formatage a une Norme : E.164

_Thierry · 7 Mai 2020

Salut @laurent950 Oui je l'ai vue passer cette norme E.164
Ca tombe juste pour le Luxembourg par rapport à mon tableau du post #445

Je vous le dis on va finir par faire la IA (or AI) pour Virginie !!!

@+Thierry

Virginie17d · 7 Mai 2020

eriiiic à dit:
Pour ma fonction il faut limiter aux pays réellement présents dans ta base.
J'ai trouvé cette liste wiki mais elle est très incomplète.
Pour trouver la Grèce (que Thierry a insidieusement ajouté ) j'ai dû aller sur le site du routard...
Tu as tant de destinations que ça ? Si oui il faudra mieux prévoir un tableau sur feuille.
Reste à voir si on arrive à récupérer le plan de num de tous les pays qui t'intéressent, et surtout si pousser le contrôle à ce niveau vaut vraiment le coup de faire ces recherches. C'est quand même aux utilisateurs d'être attentifs et appliqués dans leurs saisies.
La fiabilité est cruciale ou ils arrivent toujours à se débrouiller en cas d'ano ?

Non pour mon utilisation ce n'est pas nécessaire, je les ajouterais si nécessaire au fur et a mesure, mais la majeur partie des cas sont des numéros Français ou limitrophes.

eriiic · 7 Mai 2020

Et en prime selon les pays c'est variable

mais en france aussi on a des numéros courts à 2, 3, 4 ou 6 chiffres.
Tu penses les contrôler ? Je ne pense pas qu'il y en ait dans sa base
Honnêtement j'avais plus ajouté ça pour le sport mais c'est impossible, sans une débauche d'énergie et de temps, d'être complet (et inutile je pense).

Tu savais qu'il y a une norme pour les numéros de téléphone ?

Ah mais tout est bien carré et défini pour chaque pays, sinon on serait encore au manuel.
En fait mon boulot pendant plus de 30 ans c'était la maintenance d'autocom ft, alors je me sens assez à l'aise sur le sujet ;-) Et là c'était 0 erreur tolérée, ça se voyait tout de suite avec les réclamations.

Virginie17d · 7 Mai 2020

_Thierry à dit:
Non, c'est sans fin dans l'état, ce qui est déjà sûr c'est qu'il faudra une table, et du coup il me vient une idée @Virginie17d est-ce que tu récupères l'adresse du client avec le Code ISO de son pays ? Ou c'est encore écrit à main levée style "Phrance" ou "Maunaquo" ? (mort de rire)

Lol arrête je culpabilise, en plus c'est vous qui êtes comme des gamins la veille de Nöel, moi j'ai déjà validé une version qui est suffisant à mon besoin. Et non c'est de la saisie manuelle par les clients, donc autant dire que j'en vois des belles.

XL 2010 Macro VBA Excel (Doublon,SansAccents,Maj,Min,Nompropre,Espaces superflus)

Virginie17d

XLDnaute Occasionnel

Pièces jointes

patricktoulon

eriiic

XLDnaute Barbatruc

_Thierry

XLDnaute Barbatruc

Virginie17d

XLDnaute Occasionnel

_Thierry

XLDnaute Barbatruc

_Thierry

XLDnaute Barbatruc

eriiic

XLDnaute Barbatruc

Virginie17d

XLDnaute Occasionnel

Pièces jointes

Virginie17d

XLDnaute Occasionnel

Numéro de téléphone — Wikipédia

eriiic

XLDnaute Barbatruc

_Thierry

XLDnaute Barbatruc

laurent950

XLDnaute Barbatruc

_Thierry

XLDnaute Barbatruc

Virginie17d

XLDnaute Occasionnel

eriiic

XLDnaute Barbatruc

Virginie17d

XLDnaute Occasionnel

Discussions similaires