Bonjour,

Je souhaite, en VBA, récuperer une ou plusieurs valeurs dans un fichier Excel, ouvert ou non, à partir de Word .

Merci

GuyRev

Salut,

cherche dans le moteur de recherche le code pour piloter l'application excel, tu as tout ce dont tu as besoins.
(le fichier excel, visible ou non, doit être ouvert)

@++

---

Salut,

cherche dans le moteur de recherche le code pour piloter l'application excel, tu as tout ce dont tu as besoins.
(le fichier excel, visible ou non, doit être ouvert)

@++

---

Bonjour Mortalino,

J'ai suivi ton conseil mais je n'ai pas trouvé ce que je cherchai.
Voilà ce que je voulai:

Sub test()
Dim xlapp As Object, reponse
Set xlapp = CreateObject("Excel.application")
xlapp.Workbooks.Open "c:\Essai.xls"
reponse = xlapp.ActiveWorkbook.Sheets("Feuil1").Range("a1").Value
MsgBox reponse
xlapp.Quit
Set xlapp = Nothing
End Sub

Le fichier en question n'a pas besoin d'être ouvert.

Merci pour ta réponse

GuyRev

Impossible de lire une donnée d'un classeur sans l'ouvrir :


Sub test()
    Dim xlapp As Object, reponse As String
    Set xlapp = CreateObject("Excel.application")

xlapp.Visible = False
xlapp.Workbooks.Open "c:\Essai.xls"
reponse = xlapp.ActiveWorkbook.Sheets("Feuil1").Range("a1").Value

xlapp.Visible = True
xlapp.Quit
Set xlapp = Nothing

    MsgBox reponse
End Sub
~Mortalino~

@++

---

Effectivement je me suis mal exprimé:

Le fichier en question n'a pas besoin d'être ouvert avant le lançement de la procédure.

Sts

GuyRev