how to save selected cell to pdf with certain file name, in specific folder.

[KurtyK]

Hi guys,

I am trying to figure out this macro and can't seem to make it save correctly. I am trying to save this selection to pdf and then make it save the filename as "O'shirts Estimate (value of cell 4f and the current date).
It only saves the file as this

O'shirts Estimate & WST Screen Print Auto Invoice.pdf

It should be: O'shirts Estimate Julie 7/8/14.pdf


This is what I have so far:

Sub SavePDF()
'
' SavePDF Macro
'


'
ActiveWindow.SmallScroll Down:=-24
Range("A1:F26").Select
ChDir "Macintosh HD:Users:KurtKunzler:Desktop:Desktop:O'shirts:"
Range("A1:F26").Select
ActiveWorkbook.SaveAs Filename:= _
"Macintosh HD:Users:KurtKunzler:Desktop:Desktop:O'shirts:Estimates:O'shirts Estimate & WST.Cells(4, F).Text & Format(Now, m-dd-yy).pdf" _
, FileFormat:=xlPDF, PublishOption:=xlSelection
End Sub


Can anyone help me?

 

[pbornemeier]

I don't have a Mac, so I can't be sure, but in windows, if it is not a variable, you need to put double quotes around the F in the cell address. They are also needed around the template in the format statement.
Without an Option Explicit statement, F would be taken as a variable and being undeclared have no value. I get an error when I try to run that part of the code (Run-time error 1004: Application-defined or object-defined error).

"Macintosh HD:Users:KurtKunzler:Desktop:Desktop:O'shirts:Estimates:O'shirts Estimate & WST.Cells(4, "F").Text & Format(Now, "m-dd-yy").pdf" _
, FileFormat:=xlPDF, PublishOption:=xlSelection

Try putting

Debug.Print WST.Cells(4, F).Address

in the code and see what shows in the immediate window.

The 'Option Explicit' statement is very useful. You can include it automatically in the VBE by selecting Tools | Options | Editor | Require Variable Declaration