Сохранить excel как pdf, имя файла как значение переменной

Question

Im пытается сохранить выбор в pdf, все работает отлично, за исключением того, что я не могу сохранить файл с определенным именем, я хочу, чтобы имя отображалось как Sub и дата и время ... это работает отлично, за исключением, когда я пытаюсь поставить дату и время сегодня ... это мой код

Sub guardar_pdf() 
' 
' Macro7 Macro 
' 

' 
    Range("A1:Q4").Select 


    With ActiveSheet.PageSetup 

     .Orientation = xlLandscape 
     .Zoom = 60 
     .PrintGridlines = True 
    End With 

    Dim fe As String 
    fe = now 

    With Selection 

    .ExportAsFixedFormat Type:=xlTypePDF, Filename:= _ 
      "C:\Users\Diego\Dropbox\informes\informe"&fe, Quality:=xlQualityStandard, _ 
      IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=True 
End With 



End Sub 

Answer 1

Там есть пара способов, вы можете исправить это.

fe = Format(Now, "yyyymmdd_hhmmss") 

Или игнорировать это и просто сделать это

"C:\Users\Diego\Dropbox\informes\informe" & Format(Now, "yyyymmdd_hhmmss")