Discussion :

[eric-R66]

Bonjour,
nouveau en vba word j'ai quelques petits soucis de mise en place d'un code
depuis un formulaire vba word, je parviens bien à changer mes signets par les mots intégrés dans les différentes textbox.
je parviens également à enregistrer en pdf dans un dossier choisi. Mais le truc c'est que cela enregistre aussi tout le doc word hors ce n'est pas l'objectif je ne veux que le doc en pdf

le code est le suivant:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Sub FileSave()
Dim nfichier As String, nfichier2 As String, intpos As Byte
Application.Dialogs(wdDialogFileSaveAs).Show
nfichier = ActiveDocument.Name
 
intpos = InStrRev(nfichier, ".")
 
nfichier = Left(nfichier, intpos - 1)
nfichier2 = nfichier & ".pdf"
 
ActiveDocument.ExportAsFixedFormat outputFileName:=ActiveDocument.Path & "/" & nfichier2, _
exportFormat:=wdExportFormatPDF
 
End Sub

merci pour votre aide
Eric

[hyperion13]

Salut
Ajouter cette méthode à la fin de votre code.