XL 2010 Extraire du texte d'une zone de texte (Text Box)

sylvanu

XLDnaute Barbatruc

Supporter XLD

• 27 Février 2020

• #46

Là, je suis largué !!! Chez moi, ça marche.
Je n'y comprends plus rien.
Ce n'est pas un problème de temps d’accès. Ni de version XL ( je suis en XL2007)
Ce n'est pas un problème de nom de TextBox, ce n'est pas un problème de syntaxe.



En désespoir de cause, pouvez vous dézipper ce fichier et lancer la V10.
Puis regardez le fichier TONNAY CHARENTE, SVP.

Chez moi tout est ok.

 

Pièces jointes

• Oderoaldes.zip

  650.7 KB · Affichages: 2

Vote positif 0 Vote négatif

O

oderoaldes

XLDnaute Junior

• 27 Février 2020

• #47

Malheureusement le résultat est le même.
J'ai essayé sur un autre poste en Excel 2010 c'est la même chose que sur mon poste en 2013.
Je défragmente ce soir, on verra à moins que vous ayez une autre idée.
Merci en tous cas de votre aide

 

Pièces jointes

• RécupèreAdressesClients (V10).xlsm

  33.4 KB · Affichages: 2

Vote positif 0 Vote négatif

sylvanu

XLDnaute Barbatruc

Supporter XLD

• 27 Février 2020

• #48

Comme les temps sont nuls, c'est que les fichiers s'ouvrent en moins de 1 seconde.
Mais ceci dit une défragmentation est toujours utile. cependant si vous êtes sous Win10, il devrait l'effectuer en permanence.
Ce qui est bluffant, c'est que certains passent et pas d'autres. J'ai regardés les fichiers ce sont les mêmes.

On verra après défragmentation. Je vais continué à chercher.
A demain.

 

Vote positif 0 Vote négatif

O

oderoaldes

XLDnaute Junior

• 27 Février 2020

• #49

Je suis sur Windows 7 pro, cela peut il avoir un impact ?
Merci

 

Vote positif 0 Vote négatif

sylvanu

XLDnaute Barbatruc

Supporter XLD

• 27 Février 2020

• #50

Franchement aucune idée. C'est trop pointu.
La défragmentation sur Win7Pro s'effectue normalement toutes les semaines, donc je ne sais pas si ça aura un impact;
Je regarde de mon coté, je vais rajouté quelques sécurités pour une V11.
Je vous envoie ça ce soir pour pouvoir tester avec un PC tout propre.

 

Vote positif 0 Vote négatif

O

oderoaldes

XLDnaute Junior

• 27 Février 2020

• #51

Super Merci

 

Vote positif 0 Vote négatif

sylvanu

XLDnaute Barbatruc

Supporter XLD

• 27 Février 2020

• #52

La voila la V11.
Je n'ai rien trouvé.
J'ai rajouté quelques re confirmations de fichiers et sheet. Mais à mon avis ne sert pas à grand chose.
Par contre j'enregistre tous les shapes trouvés ainsi que le chemin complet du fichier.
Au moins si on sera sur des noms de shapes qu'il trouve, cela fera peut être une piste.

 

Pièces jointes

• RécupèreAdressesClients (V11).xlsm

  36 KB · Affichages: 2

Vote positif 0 Vote négatif

O

oderoaldes

XLDnaute Junior

• 27 Février 2020

• #53

Merci pour la V11 voila le résultat.
J'ai rajouté 3 fichiers dont 1 avec un avoir pour voir et il remonte et le même en changeant la zone de texte 5 par 7, mais ça n'a pas l'air de faire grand chose.
On défragmente et on essaie demain.

 

Pièces jointes

• RécupèreAdressesClients (V11).xlsm

  34.9 KB · Affichages: 4

Vote positif 0 Vote négatif

sylvanu

XLDnaute Barbatruc

Supporter XLD

• 27 Février 2020

• #54

Il y a des trucs intéressant : Des ZoneTexte 7 et des TextBox 7. Ce qui n'était pas prévu.
Je vais pouvaoir enfin sortir une V12 pour demain !

 

Vote positif 0 Vote négatif

O

oderoaldes

XLDnaute Junior

• 27 Février 2020

• #55

si ça pouvait être ça ce serait cool, j'attends la V12 avec impatience.
Bonne soirée et encore merci

 

Vote positif 0 Vote négatif

sylvanu

XLDnaute Barbatruc

Supporter XLD

• 27 Février 2020

• #56

Bonsoir/Bonjour,

La V12 promise.
Je cherche les ZoneTexte et les TextBox, le tout avec et sans espace.
Je regarde les adresses sur trois ou quatre lignes. Les codes postaux à droite ou à gauche.
Plus quelques petites modifs de sécurisation.
J'ai laissé l'instrumentation, je préfère rester prudent.

Je suis curieux de voir le résultat car j'arrive au bout de mon imagination.
( le coup des ZoneTexte ou TextBox était pas mal. )

 

Pièces jointes

• RécupèreAdressesClients (V12).xlsm

  40.6 KB · Affichages: 2

Vote positif 0 Vote négatif

O

oderoaldes

XLDnaute Junior

• 28 Février 2020

• #57

Bonjour,
Désolé de vous avoir fait attendre mais je pense que votre persévérance et compétences ont payé.
Ci-joint le résultat avec 10 fichiers ajoutés.

il y a une petite erreur sur

AVOIR N°8235

FACTURE N°405

AVOIR N°7781

ou l'adresse 2 passe en ville, mais ça je peux facilement le retraiter une fois extrait.
Je vais faire quelques sondage supplémentaires mais ça m'a l'air vraiment parfait.

La colonne O ne correspond pas au lien de la G mais je pense que c'est normal.

Je dois m'absenter à partir de 11:00, mais cela va pouvoir me permettre d'avancer
Encore un immense merci pour votre aide.

 

Pièces jointes

• RécupèreAdressesClients (V12).xlsm

  39 KB · Affichages: 5

Vote positif 0 Vote négatif

sylvanu

XLDnaute Barbatruc

Supporter XLD

• 28 Février 2020

• #58

Bonjour Ça fait plaisir.

Je viens de m'apercevoir qu'à la fin je trie la zone bleue par ordre alphabétique de la société, mais que je ne trie pas la zone blanche qui est juste une zone de test appelée à disparaitre. Donc effectivement c'est normal ce décalage de fichier. Mais ça n'a aucune importance.
Trois questions :
1- Qu'entendez vous par petite erreur sur les N° de facture ? Ils sont faux, ils ne correspondent pas aux fichier ?
2- J'ai vu des villes nommées BP, TSA et CS. J'ai peur qu'on ait des ville du type "60123 ALBI BP12345".
Ce qui évidemment va me poser problème car les 5 chiffres du code postal ... sont des deux cotés.
Pouvez vous me donner la ligne Ville des fichiers Décatlon, Jardiland et Sarlat pour comprendre.
3- Dans les fichiers, pour les villes, peux t-on avoir :
a- CodePostal VILLE
b- VILLE CodePostal
c- Pas de CODEPOSTAL ( par exemple le N° de département seul)
Si le cas "a" est toujours le cas, alors c'est une erreur facile à rectifier, puisque le code postal est toujours à gauche.

Je pense avoir trouvé le bug. Ca va pas être facile à résoudre. On peut avoir :

Nom Société	Nom Société
Adresse	Adresse
BP 12345	CodePost Ville
CodePost Ville

et je me base sur la présence de 5 chiffres pour détecter la Ville qui peut être en 3eme ou 4eme ligne.
Dans la 1ere colonne, quand je trouve 12345 je le considère que un CodPost, donc j'extrais la ville, d'où les BP, TSA,CS.
Je vais faire une version pour détecter ces 3 mots et ignorer la ligne en tant que ville.

 

Vote positif 0 Vote négatif

sylvanu

XLDnaute Barbatruc

Supporter XLD

• 28 Février 2020

• #59

Re,
Voici une V14 ( non, non pas de V13 )
Le bug des CP TSA et BP ( bugs lignes 3,9,10 et 19 de votre fichier) est corrigé.
Si une ligne comporte un de ces trois mots, même s'il y a 5 chiffres, elle n'est pas considéré comme une Ville. ( Si une ville s'appelle TSA alors problème ... mais ça m'étonnerait.

 

Pièces jointes

• RécupèreAdressesClients (V14).xlsm

  41.6 KB · Affichages: 6

Vote positif 0 Vote négatif

O

oderoaldes

XLDnaute Junior

• 28 Février 2020

• #60

Bonsoir,
Désolé je suis encore en déplacement jusqu'à ce soir tard avec juste un IPad, je teste la V14 demain.
Encore merci pour tout et bravo pour ces macros documentées et explicatives qui aident bien à progresser. Bonne soirée

 

Vote positif 0 Vote négatif