Problem: save as pdf in the same folder

[ericnguyen]

Hi all,

I am trying to save my Sheets PDF in the same folder with my excel file.
However... i have error 1004

Dim strName As String
strName = ActiveWorkbook.Worksheets("input").Cells(3, 2).Value & ".pdf"
Dim strPath As String
strPath = ActiveWorkbook.Path & Application.PathSeparator

MsgBox strPath & strName

Sheets(Array("T1", "T2", "T3")).Select

ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _
filename:=strPath & strName, _
Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas _
:=False, OpenAfterPublish:=True


I'm not sure why i have the error.

Please help me

[kersplash]

Where do you get the error?

Maybe attach your sample workbook.

Go Advanced -> Manage Attachments -> Upload

[ericnguyen]

Hi,

I used a window computer...and it worked

I guess the problem is the MACBOOK... maybe the code for macbook is a bit different

[kersplash]

I guess the problem is the MACBOOK...

Unsurprising.