VBA for saving excel worksheet into .pdf document

Hi,

I was using the VBA

Sub Savepdf()

Application.ScreenUpdating = False
Dim fName As String
With ActiveSheet
    fName = .Range("E4").Value
    .ExportAsFixedFormat Type:=xlTypePDF, FileName:= _
            fName & ".pdf", Quality:=xlQualityStandard, _
            IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=False
End With
Application.ScreenUpdating = True
End Sub

but now it seems it is not responding/nor giving any result. Please let me know what could be the reason.

Regards,
Seemanth

Hi, seemanthv,

welcome to ExcelForun. Please have a look at our Forum Rules, especially Rule #3 and wrap your procedure with code-tags.

Ciao,
Holger

Hi, seemanthv,

Your post does not comply with Rule 3 of our Forum RULES. Use code tags around code.

Posting code between [CODE] [/CODE] tags makes your code much easier to read and copy for testing, it also maintains VBA formatting.

Highlight your code and click the # icon at the top of your post window. More information about these and other tags can be found here



(This thread should receive no further responses until this moderation request is fulfilled, as per Forum Rule 7)

Ciao,
Holger