Faire du RNVP en VBA

[myDearFriend!]

Ci-joint le fichier... (modification de dernière minute !)

Cordialement, [file name=mDF_NormalisationRNVP_20050626050747.zip size=27457]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/mDF_NormalisationRNVP_20050626050747.zip[/file]

[Staple1600]

Bonjour

Le classeur de myDearFriend me conforte dans l'idée de privilégier VBA.

J'ai essayer de transformer le classeur en XLA
Ca ne fonctionne pas
(sans doute parce que j'y ai intégré la feuille Correspondances)

Je parle de XLA parce que je voudrais que la 'macro RNVP' soit disponible dans Excel
pour tout classeur.

Voila comment je vois les choses
On a un fichier Excel à traiter

1) On l'ouvre
2) On vérifie le dégré de conformité du classeur (visuellement)
3) On se place sur la feuille à traiter
4) ici reprise du code de myDearFriend (copie de la feuille)
5) traitement RNVP

Il y a petit souci avec les abréviations:
MONSIEUR ALAIN LEBATIMENT => M ALAIN LEBAT

J'ai pensé scinder la macro plusieurs sous-routine
Une sous-routine qui abrége la colonne des noms (qui n'abrége pas les noms propres)
(on seléctionne la première cellule de colonne noms -> puis lancement macro)
Une sous-routine qui abrège les noms de voie et autres.
(on seléctionne la première cellule de colonne adresse -> puis lancement macro)

Merci de votre aide
Je m'en retourne convertir en XLA

[Staple1600]

Précisions


j'étais parti sur l'idée d'inclure dans le code la liste des abréviations en me basant sur :
http://www.mvps.org/dmcritchie/excel/join.htm .../code/join.htm

Sub Abbreviation()
Application.ScreenUpdating = False
Application.Calculation = xlCalculationManual
Selection.Replace What:='MONSIEUR', Replacement:='M', _
LookAt:=xlPart, SearchOrder ........, MatchCase=False
.....
n ligne du même type pour chaque terme à abréger
......
End Sub

Je ne sais pas trop comment faire un tableau (avec l'idée de myDeraFriend) directement dans un module VBA.

Mais ca doit pouvoir se faire.

Bon week à tous

[Staple1600]

message édité

(version du fichier obsolète)

[Staple1600]

Bonjour

• A défaut d'Excel, quelqu'un connait-il un logiciel freeware ou libre
de manipulation de chaines de caractères?
• Pour ce qui est d'excel, je n'arrive pas à modifier le code de
myDearFriend pour éviter d'avoir à utiliser la feuille Correspondance.

J'ai pensé transformer le classeur avec les macros et la feuille
de correspondance en xlt, mais cela alourdit le traitement du fichier.

Je m'oriente donc vers:
• 1) export du fichier à traiter en csv ou txt
• 2) ouverture du classeur avec macros et correspondance (RNVP)
• 3) import du fichier csv ou txt
• 4) copie des données dans RNVP
• 5) sélection cellules puis lancement macros

[cyraile]

Bonjour,

Le sujet date - mais quelqu'un a t il reussi a faire quelque chose ?

Je dois faire la même chose aujourd'hui.

Merci.

[Staple1600]

Bonjour


Les différents fichiers présents dans le fil ne te suffisent pas?

Quel est ton besoin exactement ?



PS: j'ai arrêté de développer plus avant ce projet car je ne suis plus chez l'employeur pour qui cet outil (et ce fil) furent créés.