Discussion :

[surumeika]

Bonjour.
Je possède une table tbllisteactes, comportant différents champs, dontune clé primaire noenregistrement.
A partir d'un sous-formulaire (mode continu) frmlisteactes, j'accède à un frmactes pour chaque enregistrement.
Sur ce formulaire, j'ai créé un bouton me permettant d'enregistrer le rapport rptacte, généré à partir de ce formulaire, en PDF, précisemment là où je veux.

Mon code fonctionne bien:

Private Sub PDF_Click()
Dim strEtat As String
On Error Resume Next
strEtat = "rptacte"
'Aperçu de l'acte
DoCmd.OpenReport strEtat, acViewPreview, , "[noenregistrement]=" & Me![noenregistrement]
'Conversion de l'acte en PDF
DoCmd.OutputTo acOutputReport, "rptacte", acFormatPDF, "C:\Users\secint3\Documents\actesadmin\sauvegardeactes\CAno " & Forms![frmlisteactes].noCA & "\CA " & Forms![frmlisteactes].noCA & "acte" & Me.noenregistrement & ".pdf"

'affichage du budget s'il s'agit d'un voyage
If Me.nomfrm = "frm05" Then
'Aperçu du budget
DoCmd.OpenReport "frm05c", acViewPreview, , "[noenregistrement]=" & Me![noenregistrement]
'Conversion du budget en PDF
DoCmd.OutputTo acOutputReport, "frm05c", acFormatPDF, "C:\Users\secint3\Documents\actesadmin\budgetprevisionnelCA" & Forms![frmlisteactes].noCA & "acte" & Me.noenregistrement & ".pdf"
End If
End Sub

Mais comme j'aime compliquer les choses, j'aimerais enregistrer ce pdf dans un champ pièce jointe d'une table tblActesPDF.
En effet, à chaque fin d'année, je désire archiver l'ensemble des Conseils d'administration et des actes inhérents. J'ai créé les macros pour çà, sans problème, vers une autre base, comme je l'ai vu dans les tutoriels.
Mais je n'ai pas envie d'archiver toutes les tables nécessaires pour la création d'un acte (36...) et juste archiver le pdf.
Peut-on donc enregistrer un pdf dans un champ pièce jointe automatiquement?
Et est-ce conseillé? Y aurait-il une autre méthode?

[titi95]

Bonjour

Un lien intéressant :
http://warin.developpez.com/access/piecejointe/#LI

Nota : si tu as beaucoup de fichiers à stocker, Pièce jointe n'est pas la bonne solution car ta base va prendre une taille important.
Dans ce cas, il vaut mieux ne stocker dans une table que des liens vers un répertoire dédié ou, encore mieux, sans liens. (si besoin je t’expliquerai)

titi95

[surumeika]

Bonjour.
Je pense qu'effectivement, passer par un champ pièce jointe serait trop lourd.
Étant donné que j'ai déjà une sauvegarde des actes dans un répertoire dédié mis en place, il serait plus simple d'enregistrer le lien dans un champ de la table contenant les données des actes.
L'emplacement de cette sauvegarde étant généré automatiquement, il faudrait que suite à l'enregistrement en PDF, ce lien soit enregistré dans la table.
Comment faire çà en VBA?

[surumeika]

J'ai trouvé toute seule.
Après avoir rajouté un champ mémo lienActesPDF dans ma table, j'ai simplement rajouté cette bête ligne de code:

'enregistrement du lien dans la table
lienActesPDF = "C:\Users\secint3\Documents\actesadmin\sauvegardeactes\CAno " & Forms![frmlisteactes].noCA & "\CA " & Forms![frmlisteactes].noCA & "acte" & Me.noenregistrement & ".pdf"

çà fonctionne.

Il suffisait juste de me mettre sur la bonne voie! Merci beaucoup.