Kirana2014
Gebruiker
- Lid geworden
- 21 okt 2020
- Berichten
- 55
Beste,
Ik wil Raport opslaan in pdf op naam, afhankelijk van de informatie in de Claimnummer en combobox
Met deze macro's krijg ik de resultaten.
235645262.PDF in plaats van 23564526 BDN.PDF
Claimnummer = 23564526
City (combo box) :
ID Veld
1 DPS
2 BDN
3 JKT
Ik hoop dat je jullie kunt helpen met macro's.
Ik wil Raport opslaan in pdf op naam, afhankelijk van de informatie in de Claimnummer en combobox
Met deze macro's krijg ik de resultaten.
235645262.PDF in plaats van 23564526 BDN.PDF
Claimnummer = 23564526
City (combo box) :
ID Veld
1 DPS
2 BDN
3 JKT
Ik hoop dat je jullie kunt helpen met macro's.
Code:
Private Sub SAVE_To_PDF_Click()
Dim FileName As String
Dim FilePath As String
FileName = Me.ClaimNummer & Me.City
FilePath = "C:\MS ACCESS\" & FileName & ".PDF"
DoCmd.OutputTo acOutputReport, "Report", acFormatPDF, FilePath
MsgBox "Done", vbInformation, "Save Confirm"
End Sub
Laatst bewerkt:
