[VB] Acces > Word samenvoegprobleem

[Verwijderd]

Hi,

Ik heb een applicatie waarbij acces een word document opent, en daarmee gegevens uit de acces tabel samenvoegd. (open sjabloon>voeg gegevens in>sla onder een andere naam op)

Dit gaat op onderstaande eenvoudige manier:

code:

WordObject:
'maak object aan om word te openen
    Set wrdobj = CreateObject("Word.Application")   'Activeer het programma Word
    wrdobj.Visible = True   'Toon de word-applicatie
     wrdobj.Documents.Open (strSourcebestand)  'Open het bestand
     wrdobj.Activate   'Activeer Word met het geopende bestand
     wrdobj.Application.ActiveDocument.SaveAs (strBestandsnaam) 'Sla het bestand op

' etc etc

Dit werkte altijd PER-FECT, tot ik word 2003 installeerde... die geeft namelijk onderstaande melding:



Aangezien het openen en onder een filename vanuit MS ACCESS geinitieerd wordt, geef deze er dan dus de brui aan, omdat word de boel ophoudt....

Weet iemand hoe ik die melding uit kan zetten?

[ Voor 43% gewijzigd door Verwijderd op 23-02-2005 00:45 ]

[Xanion]

Ik zou eens kijken onder Tools - Macro - Security
Waarschijnlijk staat die op een hoog level en accepteert Word daarom geen SQL-statements.

[CodeCaster]

Anders de code

code:

SendKeys "J"

gebruiken

[Verwijderd]

nog nooit gezien. mss met

code:

application.DisplayAlerts=wdAlertsNone

de sendkeys zal alleen werken als je dit voor het openen van het document doet (en dus voor de melding verschijnt).

[Verwijderd]

Ik zou eens kijken onder Tools - Macro - Security
Waarschijnlijk staat die op een hoog level en accepteert Word daarom geen SQL-statements.

Dit is het niet, ik heb wat dat betreft alles al gedaan, zelfs een cetrificaat aangemaakt etc etc...

Ik zal de code

code:

 application.DisplayAlerts=wdAlertsNone

eens uitproberen!

Thanx.

[ Voor 16% gewijzigd door Verwijderd op 23-02-2005 16:26 ]

[Verwijderd]

Jammer... dit werkt niet.

Hij onderdrukt welliswaar de melding, maar volgens mij gaat ie dan maar vast uit van antwoord "nee". Want het samenvoegen wordt niks...

[Reut]

>>>>>>>>>>>OPLOSSING<<<<<<<<<<<

[ Voor 24% gewijzigd door Reut op 28-02-2005 13:09 ]

[Verwijderd]

van het ms kb : "Setting DisplayAlerts=none through VBA suppresses the prompt when the file is opened by using VBA, but uses the NO option to open the document and no data is attached to the mail merge main document". dit is niet de standaard actie, normaal gesproken zorgt deze instelling ervoor dat dergelijke dialoogvensters automatisch bevestigd worden, maar goed, het KB bevat een oplossing.