print PDF and save pdf with cell information

[STEEL010]

Hi there,

can anyone help I'm stock here with a VBA problem (I think )

see code below, what I want to do is that Cell H2 what contains =now() to be saved as file name.
but its not working, is this the correct way or is there another way???

ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, FileName:= _
"C:\user\documents" & Range("H2").Value = Now & "_" & "Pakbon" & ".pdf" _
, Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas _
:=False, OpenAfterPublish:=True
End Sub

Greetings,
STEEL010

 

[STEEL010]

I have tried this format but it says not the name but its save under the name FALSE.pdf

" & Range("H2").Value = Format(Now() = "yymmdd.hhmm") & "_" & "Pakbon" & ".pdf" _

please help

 

[John_w]

Try:

    ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
        "C:\user\documents\" & Replace(Replace(Range("H2").Value, "/", "_"), ":", "_") & "_Pakbon.pdf", _
        Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=True

Please use CODE tags - click the # icon in the message editor.

 

[STEEL010]

Fantastic!!! it works, you're the best

 

[bhandari]

helped alot