Fichier word et excel

mell01 Messages postés 72 Date d'inscription lundi 6 juin 2005 Statut Membre Dernière intervention 15 mai 2006 - 19 juil. 2005 à 09:42
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!

3 réponses

cs_dan80 Messages postés 101 Date d'inscription mardi 3 mai 2005 Statut Membre Dernière intervention 19 avril 2006
19 juil. 2005 à 10:44
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
0
mell01 Messages postés 72 Date d'inscription lundi 6 juin 2005 Statut Membre Dernière intervention 15 mai 2006
19 juil. 2005 à 11:00
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?
0
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
as tu ajouté la reference a word dans tes references ?
0