sauvegarder au format PDF et nommer avec la date du document

E

Eric 45

XLDnaute Occasionnel

• 27 Novembre 2016

• #2

Bonjour à tous
Bonjour la fifine

Je n'ai pas testé mais peux tu essayer :

Code:

"C:\Users\pascal\Dropbox\Documents Pascal\Pointages \année 2016\Bon de délégation\BON DE DELEGATION du " & [B10 ] & ".pdf" _.....

A te lire
Eric

 

Vote positif 0 Vote négatif

L

la fifine

XLDnaute Occasionnel

• 27 Novembre 2016

• #3

bonjour et merci pour ton aide
le syntaxe n'est pas bonne
moi j'avais essayé
& range("b10").value.pdf
mais ça marche pas

 

Vote positif 0 Vote négatif

Dranreb

XLDnaute Barbatruc

• 27 Novembre 2016

• #4

Bonjour.
C'est plutôt la votre qui n'est surement pas bonne
Au pire : … & Range("B10").Value & ".pdf" _
Sans doute mieux : … & Format(Range("B10").Value,"dd-mm-yyyy") & ".pdf" _
Ou : … & Format([B10].Value,"dd-mm-yyyy") & ".pdf" _

 

Vote positif 0 Vote négatif

L

la fifine

XLDnaute Occasionnel

• 27 Novembre 2016

• #5

bonjour
je n'avais aucune doute sur le fait que la mienne n'était pas bonne
je viens d'essayer les deux versions que vous m'avez donné et j'ai "erreur de syntaxe" et tout le code se met en rouge
doit manquer une ( ou un " quelque part

 

Vote positif 0 Vote négatif

Dranreb

XLDnaute Barbatruc

• 27 Novembre 2016

• #6

Il ne manque rien dans les parties qu'on vous indique, les syntaxes sont correctes.
Ça doit donc être dans une autre partie de votre instruction que ça ne va pas.

 

Vote positif 0 Vote négatif

Chris401

XLDnaute Accro

• 27 Novembre 2016

• #7

Bonjour
Si l'enregistrement doit se faire dans le même dossier que le fichier BON DE DELEGATION, essaye :

VB:

Sub EnregistreSousPDF()

With ActiveSheet
Rep = ThisWorkbook.Path
nom = "BON DE DELEGATION du"
LaDate = Format(.[B10].Value, "dd-mm-yyyy")

.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
   Rep & "\" & nom & "-" & LaDate & ".pdf"
   
End With
End Sub

 

Vote positif 0 Vote négatif

L

la fifine

XLDnaute Occasionnel

• 27 Novembre 2016

• #8

merci Chris ça fonctionne parfaitement
je vais rajouter une ligne pour l'inserer dans le dossier que je veux et c'est fini

 

Vote positif 0 Vote négatif