Macro To Save As PDF

Hi all,

First Post.

I want to save an excel document as a PDF based on a cell reference.

The cell reference is B14 and this is

ChDir "U:\Jam\Harris\Quotations"
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"U:\Jam\Harris\Quotations\&Text(B14).pdf", Quality:=xlQualityStandard, _
IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:= _
False

That was the closest i could get when typing it out.

Any help would be great!

You could try the setting the value in B14 to U:\Jam\Harris\Quotations\ i.e. no quotation marks just the name string and then use a line like this in VBA.

Please Login or Register  to view this content.

Alf