Bonjour,
Je bute sur une difficulté que je n'arrive pas à surpasser.
J'ai développé sous Excel 2000 un petit utilitaire qui réalise des calculs à partir
de table de référence. Rien de bien compliqué.
Ensuite je transfère les résultats qui sont sous forme de tableaux formatés (3 exactement) dans un document word
différents en fonction du nombre de lignes des tableaux. J'utilise des commandes DDE. Tout fonctionne à merveille depuis 2001.
Je viens de passer sur Office 2010 et les macro fonctionnent toujours mais lors du transfert
entre Excel et word, toutes les sommes ####,## € deviennent $ #,###.##.
Vous comprenez mon inquiétude !!!
J'ai essayer sur plusieurs machines, idem; j'ai vérifier les paramétres linguistiques de Windows, les paramètres d'Excel et de Word.
Tout semble correct, ne reste plus que l'échange en DDE entre Excel et Word.
Voici ce que j'ai comme code qui fonctionne en 2000 (les déclarations de variables étant réalisées en "Public" )
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7 Set wrd = CreateObject("Word.Application") wrd.Visible = True Set wrdDoc = wrd.Documents.Open("C:\Mes Documents\Devis.doc") numcanal=Application.DDEInitiate(app:="WinWord", topic:="C:\Mes Documents\Devis.doc" Application.DDEPoke numcanal, "cPrestation" "ExcelPrestation" (signet dans word et plage nommée dans excel) Application.DDEPoke numcanal, "ZoneD1", "ExcelDZcopie" Application.DDETerminate numcanal
Est ce que quelqu'un peut me mettre sur la piste d'une solution. Dernière info,
une fois le document word généré, il est diffusé mais jamais sauvegardé. C'est un autre
document à chaque fois en fonction de la constitution des tableaux.
Merci de votre aide
Cdt
Partager