Fichier word et excel

Messages postés
72
Date d'inscription
lundi 6 juin 2005
Statut
Membre
Dernière intervention
15 mai 2006
- - Dernière réponse : cs_dan80
Messages postés
101
Date d'inscription
mardi 3 mai 2005
Statut
Membre
Dernière intervention
19 avril 2006
- 19 juil. 2005 à 12:13
bonjour,


je travaille actuellement avec des fichiers exel et word dans mon appli vb,je lance ces deux application et ouvre dans chacune d'elle un fichier d'extention correspondante... mais cela ne marche pas pour word(excel pa de pb),je ne comprend pas j 'ai une erreur qui dit que l'objet ne supporte pas la methode quand je passe sur mon doc.Workbooks.Open (chemin)
'fin voilà mon code si qql à plus d'idée:


If ext = "doc" Then
Set doc = CreateObject("Word.application")
doc.DisplayAlerts = False
doc.Visible = True
doc.Workbooks.Open (chemin)
With doc
MsgBox .Range("A1").Value
End With
doc.quit
Set doc = Nothing
End If

merci d'avance!
Afficher la suite 

3 réponses

Messages postés
101
Date d'inscription
mardi 3 mai 2005
Statut
Membre
Dernière intervention
19 avril 2006
0
Merci
a mon avis tu dois également déclaré ton document:

dim doc as word.document
dim app as word.application
set app=createobject("Word.application")
...
app.open(chemin)

teste ca tu verra bien
Messages postés
72
Date d'inscription
lundi 6 juin 2005
Statut
Membre
Dernière intervention
15 mai 2006
0
Merci
encore un échec...merci qd m

j'ai une erreur "user-defined type net defined" sur
dim doc as word.document
peut être qu'il faut ajouter une référence que je n'est pas?
Messages postés
101
Date d'inscription
mardi 3 mai 2005
Statut
Membre
Dernière intervention
19 avril 2006
0
Merci
as tu ajouté la reference a word dans tes references ?