aide pour ouvrir une page word
bonjour
en cherchant sur le web anglosaxon, j'ai trouvé un petit code fort sympa.
il necessite par contre de mettre "microsoft word" dans nos préférence sur excel pour fonctionner.
toutefois, la, je ne le comprend pas trop, et le peu que je veu adapter me laisse perplexe.
Code:
1 2 3 4 5 6
| Dim wrdApp As Word.Application
Dim wrdDoc As Word.Document
Set wrdApp = CreateObject("Word.Application")
wrdApp.Visible = True
Set wrdDoc = wrdApp.Documents.Open(path) |
ensuite, on nous demande de mettre dans la fonction "document_open()" :
Code:
Selection.GoTo what:=wdGoToPage, Which:=wdGoToNext, Name:=page
j'ai changé le B-A-BA sur ce code. open(path) pour MON fichier, et Name:=page au lieu de Name:="5" dans l'exemple
le but de ce petit bout de code est visiblement d'ouvrir un document word a une page determiné. c'est exactement ce que je cherche, avec deux variables seulement (path et page)
mon soucis (très bete, certe) est le suivant :
j'ai une seule fonction (open_file(path, page)) dans laquelle je dois tout mettre
j'ai donc mis ma déclaration de variable et l'instruction "open(path)" dans cette fonction.
mais que faire du code de document_open ? j'aimerais ne pas le mettre dans cette fonction (document_open) mais bien dans la mienne (open_file())
cependant, dans l'etat, ca ne fonctionne pas.
comment retoucher l'instruction selection.goto what:= (...) pour l'adapter a ce cas d'emploi ?
cordialement.