Menu

Création de d'1 doc PDF à partir de feuilles Excel [Résolu/Fermé]

- - Dernière réponse : Patrice33740
Messages postés
7722
Date d'inscription
dimanche 13 juin 2010
Statut
Membre
Dernière intervention
23 avril 2019
- 11 févr. 2014 à 15:27
Bonjour,
Quelqu'un aura t-il la gentillesse de m'expliquer comment résoudre ce problème: une macro dont le code présenté ci-après, pour créer un doc PDF à partir de feuilles excel coince à chaque fois sans comprendre la cause de l'erreur!
Merci d'avance
Private Sub ImprimerPDF_Click()
adresse = Range("J2").Value
nom = Range("J3").Value
mois = Range("J4").Value

Sheets(Array("page01", "page02", "page03", "page04", "page05", "page06", "page07", _
"page08", "page09", "page10", "page11", "page12", "page13", "page14", "page15", _
"page16", "page17")).Select
Sheets("page01").Activate
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
adresse + "\" + nom + "_" + mois + ".pdf" _
, Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas _
:=False, OpenAfterPublish:=False

MsgBox ("document PDF imprimé à l'adresse suivante : " + adresse)

Sheets("Accueil").Select
End Sub


Afficher la suite 

1 réponse

Messages postés
7722
Date d'inscription
dimanche 13 juin 2010
Statut
Membre
Dernière intervention
23 avril 2019
1684
0
Merci
Remplace les + par &
Merci infiniment, problème résolu, vous êtes très gentil !!!
Cordialement-Mounir
Patrice33740
Messages postés
7722
Date d'inscription
dimanche 13 juin 2010
Statut
Membre
Dernière intervention
23 avril 2019
1684 -
De rien, au plaisir de te relire sur le Forum

Cordialement
PATRICE