在 Windows7 32 位中创建并运行的 vba 脚本在 Windows10 64 位中不起作用

Question

我使用 VBA 创建了一个帐单格式。它在 Windows 7 32 位系统中运行良好，但在 Windows 10 64 位系统中不起作用。

我收到了错误

运行时错误“1004”
文档未保存。文档可能已打开，或者保存时可能遇到错误。

这是我的 VB 代码：

Private Sub PDFBills()

    Dim flnm As String
    This.Range("E2:O50").Select
    flnm = "E:\BKTRADERS\TRADERBILLS\Bills_2019_20\BKT_19-20_" & ActiveSheet.Range("I8").Value & ".PDF"

    If Dir(flnm) <> "" Then

        Ans = MsgBox("File already exists.  Overwrite?", vbQuestion + vbYesNo, "Overwrite?")
        If Ans = vbNo Then Exit Sub
    End If
    If IsFileOpen(flnm) Then
        MsgBox "File already IN USE / OPEN!"
    Else

        **Selection.ExportAsFixedFormat Type:=xlTypePDF, filename:=flnm, Quality:= _
        xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, _
        OpenAfterPublish:=False**

    End If
    Application.DisplayAlerts = True
End Sub