Just nu i M3-nätverket
Gå till innehåll

Spara rapport som pdf


Tolla

Rekommendera Poster

  • 2 veckor senare...
Jag löste frågan själv så här:

Jag tar gärna emot synpunkter

 

Dim Spellista As String, BefSpellista As String, Tabell, FileName As String, FilePath As String

DoCmd.RunCommand acCmdSaveRecord

Me.Requery

Spellista = Me!SpellistaNamn

Tabell = Me.SpellistaNamn

FileName = Spellista & ".pdf"

FilePath = "C:\RecordSet\Spellistor\"

DoCmd.OpenReport "SpellistaRpt", acViewReport

 

Reports!SpellistaRpt.RecordSource = Tabell

Reports!SpellistaRpt!SpellistaNamn = Me.SpellistaNamn

DoCmd.OutputTo acOutputReport, "SpellistaRpt", acFormatPDF, FilePath & FileName, True

DoCmd.Close acReport, "SpellistaRpt"

 

Länk till kommentar
Dela på andra webbplatser

Arkiverat

Det här ämnet är nu arkiverat och är stängt för ytterligare svar.

×
×
  • Skapa nytt...