Lie une document Word avec un document Excel

Question

Salut,

Je suis actuellement en train de rediger un rapport WORD ou j'ai besoin d'utiliser des valeurs venant d'un document EXCEL. A titre d'exemple:

" The target segment contains 38,400 unique IDs, "

La valeur 38,400 est issu d'un fichier excel situe dans la colonne A2 par exemple...

Puis-je creer un code specific pour aller chercher la valeur ??

Merci

zwyx · Answer

Bonjour,
J'ai écrit ces lignes vite fait, sans les précautions d'usage. Qui sait, si on ne fait pas attention, on pourrait faire planter Office ! 

Dim oApplicationWord As Object
Dim strValeur As String

Set oApplicationExcel = CreateObject("Excel.Application")

oApplicationExcel.Documents.Open Filename :="C:\Documents and Settings\Mon_tableau.xls"

oApplicationExcel.Visible = False

strValeur = oApplicationExcel.ActiveDocument.Sheet("la bonne feuille de calcul").Range("A2").Value

oApplicationExcel.Documents.Close

oApplicationExcel.Quit

Bon courage.

cs_Guizmo84 · Answer

Ca marche pas a la ligne 
oApplicationExcel.Documents.Open Filename :=
"C:\Documents and Settings\Mon_tableau.xls"

g un message d'erreur

PCPT · Answer

salut,

remplace 


Dim oApplicationWord As Object

  par 


Dim oApplicationExcelAs Object



enlève l'espace avant le :=

après, à toi aussi de faire quelques tests

et préciser le message d'erreur çà peut aider aussi! 

<hr size="2" width="100%" />

cs_Guizmo84 · Answer

Mon message d'erreur est le numero 438,
Object doesn't support this property or method.

Lie une document Word avec un document Excel

4 réponses

Votre réponse

Discussions similaires