Der er naturligvis også mulighed for at du er i en åben Access database, og herfra åbner dit Worddokument. Kræver en refrence til Word:
Private Sub Kommandoknap17_Click() 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 & "DOKUMENTNAVN" & ext If WordObj Is Nothing Then Set WordObj = GetObject("", "Word.Application") End If WordObj.Visible = True AppActivate "Microsoft Word" WordObj.Documents.Open docname End Sub
Dette dokument kan så være i forbindelse med Access via en brevfletning.
Next record i dit Word-brev finder du ved at benytte venstre / højre pilene i værktøjslinien "Brevfletning".
Men du omtalte tidligere, at du vil have kriterier indsat. Det forstår jeg på den måde, at du kun vil se en enkelt post. Så undersøg først om der er mere end een post i forespørgslen.
Din sidste kommentar har jeg svært ved at svare på, da jeg stadig har en fejl i mit word-program, så jeg ikke kan starte Word uden fejl.
Jeg kan ikke give et eksakt svar, da jeg stadig har fejl i mit Word-program.
Men er du sikke på, at word kun viser een post? Har du prøvet at flette til printer og se om den kun skriver en eller alle poster ud.
Hvis du brevfletter til vil du jo kun se eet brev af gangen, men har naturligvis mulighed for at skifte til næste post med navigationspilene (eller hvad det nu hedder i word).
Tak for point. M.h.t. makroer i word er jeg på bar bund. Mit kendskab til word er yderst begrænset. Beklager.
Synes godt om
Ny brugerNybegynder
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.