Excel bestand openen naar aanleiding van inhoud field

[CRUZ2]

Beste experts,

Ik ben een word template aan het maken met fields.
Nu wil ik dat wanneer er een Value in een field staat deze de juiste excel bestand opent.
Kan iemand mij helpen deze waarde in een macro te krijgen.

Ik kan in de macro wel definieren welke excel bestand er geopend moet worden
Maar kan niet de field definieren en de ingevulde value hiervan gebruiken value.

Code die ik gebruik:

' This procedure is a brief sample showing
' how to automate Excel.
' Remember to set a reference to the most current available
' Microsoft Excel object library.
'Declare object variables.
Dim appXl As Excel.Application
Dim wrkFile As Workbooks
'Set object variables.
Set appXl = New Excel.Application
Set wrkFile = appXl.Workbooks
'Open a file.
wrkFile.Open "C:\Users\nico.\Documents\" & .FormFields("type").Value & ".xls"
'Display Excel.
appXl.Visible = True
MsgBox "At this point Excel is open and displays a document." & Chr$(13) & _
"The following statements will close the document and then close Excel."
'Close the file.
wrkFile.Close
'Quit Excel.
appXl.Quit
'Close the object references.
Set wrkFile = Nothing
Set appXl = Nothing
End Sub

In dit stukje moet de field value komen:
wrkFile.Open "C:\Users\nico.\Documents\" & .FormFields("type").Value & ".xls"



Alvast bedankt,

 

[OctaFish]

Je kunt bijvoorbeeld een ASK veld in je document zetten; dit veld heeft een Bookmark naam, die je dus Type noemt. Iets anders mag uiteraard ook alleen moet je dan je verwijzing aanpassen. Een Formfield kan ook een veld zijn dat je invoegt met de Formulieren werkbalk. Ook een Formfield heeft een naam, die dus gelijk moet zijn.