Print - sans pdf creator

[tf1]

Bonjour

Je souhaite savoir comment fait pour imprimer en PDF un fichier excel sans utiliser PDC créator ou autre seulement en utilisant le sauvegarde sous de excel...

Mais que le nom que prendra le fichier PDF créer serra celui définie en A1 et le lieu de l'enregistrement serra celui définie en A2

Sub Print_1()
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"C:\toto\cxcx.pdf", Quality:=xlQualityStandard, IncludeDocProperties:= _
True, IgnorePrintAreas:=False, OpenAfterPublish:=False

'NOM_PDF = ActiveSheet.Cells(1, 1).Value & Range("Feuil!A2")
'Destination = Range("Feuil!A1")

End Sub

Merci

 

[tf1]

Re : Print - sans pdf creator

est il possible de faire ca...

Merci

 

[tf1]

Re : Print - sans pdf creator

est il possible de faire ca...

Merci

 

[LABEHAUT]

Re : Print - sans pdf creator

bonjour,
sans probléme, moi j'utilise Bullzip, logiciel gratuit que tu peux telecharger sur 01.net, et la il crée une imprimante virtuelle pour imprimer tout en pdf

 

[tf1]

Re : Print - sans pdf creator

Merci de t'as réponse mais je ne souhaite pas d'imprimante virtuel....
que cela soit fait depuis excel ....

La macro créer permet de le faire mais je souhaite que le non du fichier soir gerer depuis une cellule

Merci

 

[tf1]

Re : Print - sans pdf creator

Y4a t4il une solution

 

[MJ13]

Re : Print - sans pdf creator

Bonjour Tf1,LABEHAUT

Normalement, tu peux modifier:

"C:\toto\cxcx.pdf"

par

Activesheet.cells(1,1).value

En ayant le chemin et nom du fichier dans la cellule A1 de la feuille active.

 

[ROGER2327]

Re : Print - sans pdf creator

Bonjour tf1.

Sub Print_1()
    ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _
        Filename:=Feuil1.[A2].Value & Feuil1.[A1].Value, _
        Quality:=xlQualityStandard, IncludeDocProperties:=True, _
        IgnorePrintAreas:=False, OpenAfterPublish:=False
End Sub

(Avec cxcx.pdf en Feuil1.[A1] et C:\toto\ en Feuil1.[A2].)​

ROGER2327
#6476

Vendredi 6 Pédale 140 (Vers Belges - fête Suprême Quarte)
10 Ventôse An CCXXI, 4,4995h - bêche
2013-W09-4T10:47:56Z


P.s. : Bonjour MJ13.