Avatar billede moba Nybegynder
14. juli 2003 - 13:09 Der er 1 løsning

problemer med brevflet m.m

Hej
Jeg bruger access' brevfletfunktion, og i den forbindelse trækker jeg på data fra min access db. Jeg åbner dokumentet fra en makro med funktionen shell ("winword.exe S:\database\rappor~1\Starthold\Starthold-indbydelse.doc", 1)
brevet trækker på en forespørgsel hvor kriterierne (bla. dato) er angivet gennem en formular ( [forms]![test]![dato])
Probmelet består i, at ved kørsel af makroen fra formularen "test" åbnes brevet automatisk, men jeg bliver bedt om, manuelt at indtast "dato", fordi access ikke kan finde formularen test. Det skal bemærkes, at jeg fra samme makro også kører nogle rapporter (på sammen forespørgsel) som virker fint. Endvidere kan jeg oplyse at access åbnes igen, og der er denne nyåbnede version som spørger efter dato. Hvis jeg manulet indtaster dato virker wordbrevet fint!
Undskyld for den lidt lange teskt. Håber på hjælp.
Morten
Avatar billede mugs Novice
14. juli 2003 - 17:13 #1
Prøv denne kode til at åbne dit brev:

Dim WordObj As Word.Application
Dim WordDoc As Word.Document
Dim docname As String
Const dir As String = "D:\VBA\XP\Brevflet\"
Const ext As String = ".doc"
docname = dir & "dennekunde" & ext
On Error Resume Next
Set WordObj = GetObject(, "Word.Application")
Err.Clear
On Error GoTo err_open
If WordObj Is Nothing Then
Set WordObj = GetObject("", "Word.Application")
End If
WordObj.Visible = True
AppActivate "Microsoft Word"
WordObj.Documents.Open docname
Exit Sub
err_open:
MsgBox "fejlkode: " & Err.Number

Du skal naturligvis rette stien samt feltnavnet.
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Dyk ned i databasernes verden på et af vores praksisnære Access-kurser

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester