Discussion :

[PFG60]

Bonjour à tous,

Voici mon problème.
J'ai créé une macro Word 2016 qui a pour but d'enregistrer un document en format PDF ayant pour nom le contenu d'un champ de formulaire avec d'autres caractéristiques. Le fichier PDF doit ensuite être enregistré dans un dossier que nous nommerons pour l'occasion "TOTO" présent sur le bureau.
Si le dossier n'existe pas, il faut le créer. C'est déjà un premier problème pour moi.
Viens ensuite le nommage du fichier. Voici la forme souhaitée : "ASP - yymmdd - text_champ_formulaire.pdf".
Le problème étant que le contenu du champ de formulaire nommé ORGANISME n'est pas pris en compte. Cela donne une erreur de méthode d’exécution : "Le membre de la collection requis n'existe pas". Hein ? Comment ? De quoi que tu causes ?

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
 
    Sub Enregistrement()
 
    ActiveDocument.Unprotect Password:=""
 
    Dim Nom As String
 
    Nom = ActiveDocument.FormFields("ORGANISME").Result
    ChangeFileOpenDirectory "C:\Users\PFG60\Desktop\TOTO"
    ActiveDocument.SaveAs FileName:="ASP - " & Format(Date, "yymmdd") & "-ATS-" & Format(Time, "hhmmss") & " - " & Nom & ".pdf"
 
    ActiveDocument.Protect Type:=wdAllowOnlyFormFields, Password:=""
 
    'ActiveDocument.Close
 
    End Sub

Avez-vous une idée de comment résoudre ces deux problèmes ?

[Sepia]

Salut PFG60,

As-tu avancé sur ton problème et as-tu toujours besoin d'aide sur le sujet ?

@+
Sepia

[Sepia]

Salut PFG60,

Si le dossier n'existe pas, il faut le créer. C'est déjà un premier problème pour moi.

Pour savoir si un répertoire existe, tu peux utiliser la fonction Dir.
Pour créer un répertoire, tu peux utiliser la fonction mkdir.

Viens ensuite le nommage du fichier. Voici la forme souhaitée : "ASP - yymmdd - text_champ_formulaire.pdf".
Le problème étant que le contenu du champ de formulaire nommé ORGANISME n'est pas pris en compte. Cela donne une erreur de méthode d’exécution : "Le membre de la collection requis n'existe pas". Hein ? Comment ? De quoi que tu causes ?

Pour cette partie, décris un peu plus ton cas. Ici j'ai l'impression que ton champ ne porte pas le même nom que celui que tu as créé ou que tu n'utilises pas la bonne liste de champs mais à cette distance c'est trop difficile de voir. D'où plus de description ou de copies d'écran.

@+
Sepia