Comment affecté une valeur de cellule excel dans un signé word

mathiasttb Messages postés 1 Date d'inscription lundi 1 mars 2004 Statut Membre Dernière intervention 1 mars 2004 - 1 mars 2004 à 18:59
cs_irradie Messages postés 3 Date d'inscription mardi 27 avril 2004 Statut Membre Dernière intervention 1 juillet 2004 - 28 avril 2004 à 17:46
J'ai besoin d'automatisé une série de valeur dans un rapport word provenant d'un classeur excel.

1 réponse

cs_irradie Messages postés 3 Date d'inscription mardi 27 avril 2004 Statut Membre Dernière intervention 1 juillet 2004
28 avril 2004 à 17:46
Set xl = CreateObject("Excel.sheet")
'Création d'un fichier excel
Set classeur = xl.Application.Workbooks.Open("c:\dossier.xls")
'Le fichier excel ouvrira le fichier passé en paramétre

Set feuille = classeur.Worksheets(1)

tnom1.Caption = feuille.Cells(1, 4).Value
'ca recupere la valeur de la cellule a l intersection de la ligne 1 et de la colonne 4
0