ActiveWorkbook.SaveAs将文件另存为“文件”格式，未另存为pdf

Question

在特定时间启用了此宏，但是将其保存为“文件”格式。该文件本身已更改其名称，但是可以在excel中打开。另外，它没有另存为pdf。目的地是：C：\ Users \ User \ Desktop \ macro save

Sub Macro1()
'
' Macro1 Macro

ActiveWorkbook.SaveAs Filename:=Range("F6").Text, _
                      FileFormat:=xlOpenXMLWorkbookMacroEnabled, _
                      CreateBackup:=False



ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _
                                Filename:=Range("f6").Text, _
                                FileFormat:=xlpdf, _
                                Quality:=xlQualityStandard, _
                                IncludeDocProperties:=True, _
                                IgnorePrintAreas:=False, _
                                OpenAfterPublish:=False

End Sub

之前效果很好，所以我对更改内容感到困惑