Stuck while exporting worksheet to pdf ( with some complicated steps )

[m93evans]

Hi,

im having some issues exporting a worksheet to a PDF.

Where i want to use the following ranges in the filepath / filename of my new PDF

Dim Filename1 As String
Dim Filename2 As String
Dim Month As String
Dim Year As String


Filename1 = Range("A20")
Filename2 = Range("A7")
Month = Range("B20")
Year = Range("C20")

Dim Path As String
Path = "C:\Users\Myself\Desktop\Test01\Year\Month"

Currently i'm getting a runtime error in my save function, using:
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _
filename:="C:Path & Filename1 & Filename2 &.pdf"



I've tried lots of different ways to do this but nothing seems to be working.
any help welcome.

 

[Fluff]

Hi & welcome to MrExcel
How about

filename:=Path & "\" & Filename1 & Filename2 & ".pdf"

 

[m93evans]

Thanks for that, Made the above amendment, nearly published pdf, then same run time error. "1004" document may be open, or an error may have been encountered while saving."

 

[Fluff]

Do all the folders exist?
Do your filenames contain any illegal characters?
Does a file with that name already exist?

 

[m93evans]

Got it, Had missed string manipulation in the filepath.
it now reads.

Dim Path As String
Path = "C:\Users\matt.evans\Desktop\BookingTest" & Year & "" & Month & ""

and now works.