Compatibilité Office 10 & 11 [VBA] - VB/VBA/VBS - Programmation
Marsh Posté le 02-03-2006 à 21:54:52
Bonjour,
Pour ajouter une référence excel à word, tout au moins sur 97 le fichier à charger est excelX.OLB et non pas excel.exe.
Je propose le code qui va charger toutes les références possibles à partir d'office 97 et ne conserver que la première qui est bonne.
Dim i As Integer
Dim x As Object
Set x = ThisDocument.VBProject.References
For i = 8 To 11
On Error Resume Next
x.AddFromFile Application.Path & Application.PathSeparator & "EXCEL" & Trim(Str(i)) & ".OLB"
Next i
Cela fonctionne en word 97. A voir si le nom de fichier n'est pas modifié sur excel 2003
Bon courage
Epena
Marsh Posté le 06-03-2006 à 10:23:22
Merci beaucoup pour ta réponse !
Je vais tester ta solution !
Marsh Posté le 27-03-2006 à 16:39:31
Lorsque j'exécute ce code, il me met cette erreur :
"L'accès programmatique à visual basic project n'est pas approuvé !"
à la ligne "Set x = ThisDocument.VBProject.References" !!!!
Problème de droits ???
Je trouve rien sur le net qui puisse m'aider sur cette erreur !
Marsh Posté le 27-03-2006 à 16:51:24
C'est bon j'ai trouvé :
http://support.microsoft.com/kb/282830/EN-US/
Marsh Posté le 02-03-2006 à 10:07:41
Bonjour,
voilà mon souci !
J'aimerais depuis un fichier Word, générer et traiter des données dans un fichier Excel via du code VBA...
J'arrive à le gérer parfaitement sur mon poste muni d'Office 11 (Word et Excel 2003)...
--> pour cela j'ai dû ajouter la référence "Microsoft Excel 11.0 Object Library" qui renvoie à l'exécutable d'Excel (c:\program files\microsoft office\office11\excel.exe)...
Le problème est que ce fichier Word doit être installé sur certains postes munis d'Office 11, et certains autres munis d'Office 10 (Word et Excel 2000) !
L'appel de la référence va planter sur les postes munis d'Excel 2000 !!
Comment faire pour rendre mon code VBA compatible avec les 2 versions d'Excel ???
D'avance merci pour vos réponses...