[VB] If -> worddoc openen met template

[Daggie]

Ik heb hetvolgende probleem waar ik redelijk lastig van aan het worden ben


Ik heb een form met combobox op, als ik 1 keuze maak in de combox moet op het einde van het programma een word-document worden aangemaakt, in dit word-document moet onmiddellijk een template geladen worden zodat de gebruiker enkel maar bepaalde waarden moet wijzigen

Het openen van word zal mij (hopelijk) wel lukken, maar hoe laat ik hem dat template onmiddellijk opendoen ? waar staat die link tussen VB en dat bestand ?

[Verwijderd]

Hoe wil je het doen ? Het kan nl op 2 manieren.
De makkelijkste is winword.exe aanroepen met als argument de te openen template.
De moeilijkste is om met vba een word object aan te maken en dan het desbetreffende template te openen.

Succes !

[Daggie]

met winword lijkt mij goed, het moet werken op pcs met windows98 tot windows 2000 en excell 97 ...

kan je een vb geven van hoe dit in zijn werk gaat ? of info waar ik info kan vinden (..)

[Verwijderd]

code:

Dim RetVal
RetVal = Shell("Microsoft Word ""path + naam template""")

Open Word en mits path goed getyped opent ie meteen de template.
Probeer eerst maar eens alleen Word te openen.
Dit staat ook in help van Access onder het commando "Shell"

[Tukk]

www.psc.com
www.google.com : http://www.google.nl/sear...document+visual+basic&lr=

http://support.microsoft....spx?scid=kb;en-us;q154456

[Daggie]

code:

   Set objWordApp = GetObject("", "word.application")
   objWordApp.Visible = True

word start mooi op, maar ik krijg het template niet geopend ...

[Verwijderd]

code:

objWordApp.Documents.Open "c:\blabla\template.dot"

[Daggie]

werkt perfect
bedankt allemaal