Excel et VB2005

Signaler
Messages postés
11
Date d'inscription
lundi 20 février 2006
Statut
Membre
Dernière intervention
24 mars 2010
-
Messages postés
69
Date d'inscription
jeudi 27 septembre 2007
Statut
Membre
Dernière intervention
14 décembre 2007
-
Bonjour a tous
je m'éssai sur 2005 depuis quelques jours et j'ai un souci.
je souhaite ouvrir un fichier excel pour faire des modifs dedans donc j'ai cherché sur le net pour trouver la méthode que voici:

        Dim xlApp As Microsoft.Office.Interop.Excel.Application
        Dim xlBook As Microsoft.Office.Interop.Excel.Workbook
        xlApp = CreateObject("Excel.Application")
        xlBook = xlApp.Workbooks.Open("C:\Documents_and_Settings\Matthieu\Bureau\suivi_déploiement\suivi_déploiement\Plannings.xls")

probleme: il me met:

Ancien format ou bibliothèque de types non valide. (Exception de HRESULT : 0x80028018 (TYPE_E_INVDATAREAD))

j'ai donc éssayé:

Dim xlApp As Excel.Application
        Dim xlBook As Excel.Workbook
        xlApp = CreateObject("Excel.Application")
        xlBook = xlApp.Workbooks.Open("C:\Documents_and_Settings\Matthieu\Bureau\suivi_déploiement\suivi_déploiement\Plannings.xls")

ce qui me donne:

Membre introuvable. (Exception de HRESULT : 0x80020003 (DISP_E_MEMBERNOTFOUND))

quelqu'un connait il la raison du probleme et surtout la solution.

merci d'avance

6 réponses

Messages postés
164
Date d'inscription
samedi 11 décembre 2004
Statut
Membre
Dernière intervention
14 août 2013
3
Bonjour,
Je ne sais pas du tout si ça résoud le problème, mais as-tu fait en haut de la form :
:Imports Microsoft.Office.Interop
A +
Messages postés
69
Date d'inscription
jeudi 27 septembre 2007
Statut
Membre
Dernière intervention
14 décembre 2007

Je sais que pour ouvrir un fichier excel avec la méthode que tu donnes (perso, j'ai utilisé la 2° que tu cites), j'ai dû au préalable aller dans projets - Références et cocher excel sinon ça ne marchait pas.

Mais je ne me souviens plus des messages que ça me renvoyait.

Peut-être est il possible d'automatiser cette action par du code (cf. message de Tovin ?), si c'est le cas merci de me le dire.

La haine aveugle n'est pas sourde
Messages postés
11
Date d'inscription
lundi 20 février 2006
Statut
Membre
Dernière intervention
24 mars 2010

merci les mecs
je vais regarder ca a tete reposé pour voir si ca marche
je vous tiendrais au courant
Messages postés
11
Date d'inscription
lundi 20 février 2006
Statut
Membre
Dernière intervention
24 mars 2010

salut les mecs
bon je viens de vérifier et j'ai bien mis excel dans les références.
j'ai tout de meme éssayé de faire l'import comme conseiller mais ca ne change rien.
je ne comprend vraiment rien la.
Messages postés
39
Date d'inscription
mardi 9 octobre 2007
Statut
Membre
Dernière intervention
17 octobre 2008

bonjour
essaie ca ca devrait passé :

Workbooks.Open "C:\Documents and Settings\xx\bureau\new2"
Messages postés
69
Date d'inscription
jeudi 27 septembre 2007
Statut
Membre
Dernière intervention
14 décembre 2007

Bizarre ton truc.
J'ai essayé de trouver une soluce sur google, et je me suis aperçu que je ne suis pas compétent pour t'aider.

Je te refile quelques liens qui semblent pointer le problème et proposent un truc. C'est peu-être à tester.

http://forum.hardware.fr/hfr/Programmation/VB-VBA-VBS/vb-lancer-resolu-sujet_103077_1.htm
ou
http://forums.microsoft.com/MSDN-FR/ShowPost.aspx?PostID=1114704&SiteID=12
ou encore
http://groups.google.com/group/microsoft.public.windows.powershell/browse_thread/thread/b0ec54bd2bf4ab3c/b7114ad7807565eb?lnk=st&q=TYPE_E_INVDATAREAD+powershell&rnum=6#b7114ad7807565eb

Pas mieux, désolé.

La haine aveugle n'est pas sourde