PDF mit Access Datenbank verbinden und ausfüllen | Connect and fill PDF data fields with Access DB
ฝัง
- เผยแพร่เมื่อ 5 ส.ค. 2023
- Ihr habt ein PDF mit Datenfeldern, die ihr gerne mit Inhalten aus einer Datenbank befüllen würdet? Dann schaut euch diesen work-around an. Das Leben kann manchmal auch einfach sein ;-).
Hier noch die kleine Prozedur zum Speichern der einzelnen PDF:
Private Sub cmd_Drucken_Click()
Dim r As Recordset: Set r = CurrentDb.OpenRecordset("SELECT * from Kontakt", dbOpenDynaset, dbSeeChanges)
Dim Dateiname, Pfad As String: Pfad = "C:\Daten\Texte\"
'Me.Application.FollowHyperlink Pfad
With r
While .EOF = False
Dateiname = !id & " - " & !nachname & ".pdf"
DoCmd.OpenReport "repKindergeldantrag1", acViewPreview, , "[ID] =" & !id
DoCmd.OutputTo acOutputReport, "repKindergeldantrag1", acFormatPDF, Pfad & Dateiname
DoCmd.Close acReport, "repKindergeldantrag1"
.MoveNext
Wend
End With
End Sub
Gutes Video, ich kann aus eigener Erfahrung sagen das so etwas das Leben Enorm erleichtert.
Schön Grüße😗
Danke. Ein gutes und nützliches Vidio .Alles ist sehr zugänglich und verständlich.👍
Erst mal danke für dein Video.
Wenn ich die Ränder auf 0 mm setze und OK klicke, erscheint wieder das grüne Kästchen und die Ränder sind alle wieder da.
Gibts dafür einen Grund?
Ich hab statt jpg eine png Datei genommen, liegt es vielleicht daran?
Hat sich erledigt. Ich hatte vergessen den Hintergrund kleiner zu machen. 😂