Bonsoir

j'ai un code qui fonctionnait très bien en vba et je le remet en VB pour faire une application isolée
Je bute sur une déclaration

voici mon code
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
 
Function WordSave(wordDoc As Word.Document) As Boolean
        Dim strFilename As String
        Dim date_file As Date
        Dim temp As String
 
        date_file = Date.Today
        temp = "_" & date_file.ToString("ddmmyyhhmmss")
        WordSave = False
        On Error Resume Next
 
        'wordDoc.Application.ActiveDocument.SaveAs(strFilename)
        strFilename = Chemin_Sauvegarde_ATR & pn_Actif & "_" & product_sn & temp & ".pdf"
 
 
        Call wordDoc.ExportAsFixedFormat(strFilename, wordDoc.wdExportFormatPDF, False)
        If Err.Number <> 0 Then
            MsgBox("Impossible de sauver " + strFilename) : Exit Function
        End If
        ' ouverture du fichier pdf
        lance_Shell(strFilename)
 
        On Error GoTo 0
        WordSave = True
    End Function


j'ai la superbe erreur
Informations supplémentaires : Le membre public 'wdExportFormatPDF' du type 'DocumentClass' est introuvable.
Il ne connait pas wdExportFormatPDF ...
J'avais eu la même avec Replace:=wdReplaceAll le wdreplaceAll etait inconnu que j'ai resolu en ne le mettant plus...
Mais la pas possible donc ma question est comment je peux spécifier le format de l'export depuis VB ?