Compile error: Syntax error

Sub Email()

Dim OutlookApp As Object
Dim OutlookMail As Object
Dim FileFullPath As String

FileFullPath = ThisWorkbook.Path & "\" & Sheets("DataInput").Range("C13").Value & " " & "-" & " " & Sheets("DatInput").Range("C30).Value & ".pdf"


Sheets("Master").ExportAsFixedFormat _
Type:=xlTypePDF, _
Filename:= _
FileFullPath, _
Quality:=xlQualityStandard, _
IncludeDocProperties:=True, _
IgnorePrintAreas:=False, _
OpenAfterPublish:=False


Hi, the above is part of my codings for an excel sheet to be converted to pdf file, i have been getting errors such as Syntax error, Subscript out of range, on this part of the code, any idea what went wrong? when i took this part out,

FileFullPath = ThisWorkbook.Path & "\" & Sheets("DataInput").Range("C13").Value & " " & "-" & " " & Sheets("DatInput").Range("C30).Value & ".pdf"


Sheets("FixedPayer").ExportAsFixedFormat _
Type:=xlTypePDF, _
Filename:= _
FileFullPath, _
Quality:=xlQualityStandard, _
IncludeDocProperties:=True, _
IgnorePrintAreas:=False, _
OpenAfterPublish:=False


It worked fine.


Thank you!

Hi Sixthsense,

I took out this part,

FileFullPath = ThisWorkbook.Path & "\" & Sheets("DataInput").Range("C13").Value & " " & "-" & " " & Sheets("DatInput").Range("C30).Value & ".pdf"


Sheets("FixedPayer").ExportAsFixedFormat _
Type:=xlTypePDF, _
Filename:= _
FileFullPath, _
Quality:=xlQualityStandard, _
IncludeDocProperties:=True, _
IgnorePrintAreas:=False, _
OpenAfterPublish:=False


After I took out this part of the code, there was no error, so I guessed this part is the error?

Yeap, as in when I leave the code there, my other codes worked fine, as in codes which are not shown here. So I am just wondering what is wrong with this part of my codes? Do you have any idea?

Hi Sixthsense,

I am still getting error after replacing the line, this time round is Run-time error '9': Subscript out of range.

Thanks.

The line you asked me to use to replace the old line

Yeap it does exist in my workbook

Ya,I saw that and I corrected it, still having the same error. The following code was highlighted with the arrow pointing at the last line,

Sheets("FixedPayer").ExportAsFixedFormat _
Type:=xlTypePDF, _
Filename:= _
FileFullPath, _
Quality:=xlQualityStandard, _
IncludeDocProperties:=True, _
IgnorePrintAreas:=False, _
OpenAfterPublish:=False

Yeap it is.

Sorry, but how do i attach a sample workbook? Am still quite new in this. Haha

Sixthsense >> oh you mean attach my file here? I need some time to tidy up

Hi romperstomper >> Hmmm but my sheet is the exact same name, is there a way to verify that?

Yeap, the message is True. Now I am also having this error, "Document not saved. The document may be open, or an error may have been encountered when saving." And "Run-time error '1004': Application-defined or object defined error"

Anyone can help?

Here you go.

screenshot.png

This screenshot can?

ss.png

Nope, this is Windows 7.

Delete all data from the excel FixedPayer excel sheet is it? Leave the code alone? I have a button on the FixedPayer sheet to execute the code.

Okay done, I am using Microsoft Excel 2007.

NDS.xls

I see it is available on my side.

saveas.png

Ah, could it be any settings I have to make or something?

Hi snb,

I tried and the result is false. Any idea why?

Hi quekbc, yes you are right! The inputs in the cell C13 and C30 had invalid symbols in the file name, I had "/" in my filename. I have since changed the name and managed to resolve it.

Thanks a lot for your help and the rest who responded to my questions!