宏在打印PDF代码时停止

我们使用一台机器运行

VBA

宏。
上周，我们将机器改为运行Windows7的虚拟“服务器”：我将使用“服务器”一词，因为它更像一台虚拟pc

除了一行代码外，一切都运行顺利：

Excel.ActiveSheet.ExportAsFixedFormat _
    Type:=xlTypePDF, _
    FileName:=FilePath_pdf & FileName_pdf, _
    Quality:=xlQualityStandard, _
    IncludeDocProperties:=True, _
    IgnorePrintAreas:=False, _
    From:=1, _
    To:=2, _
    OpenAfterPublish:=False

不幸的是，错误消息不是描述性的，如果我进入调试模式并点击

F8

，它就会运行ok

它以网络登录而不是我的网络登录的凭据运行。
此登录名与我们以前在非虚拟excel框中使用的登录名相同

是否有一些软件需要我仔细检查是否安装在新机箱上？

---

是否有其他方法可以将此文件的内容移动到

pdf

文件中？

[第三方注意：这不是问题的答案]

错误处理的示例：

Public Sub Boo(ByVal Calendar As Variant)
On Error GoTo ErrHandler

  Dim sProcedureName As String: sProcedureName = "Boo"

  'Code here

ExitProcedure:
  On Error Resume Next
  'Final termination here
  Exit Sub

ErrHandler:
  Debug.Print "Error """ & Err.Description & """ in " & sProcedureName
  GoTo ExitProcedure:
  Resume 'used for debugging, never hit in run time

End Sub

---

非描述性错误是什么？您在该“服务器”上进入调试模式？它是否在您的凭据下运行？哪个Excel版本？@rene-我添加了更多细节：XL-2010；使用我们在上一个框中使用的网络登录凭据运行。我已经重新安排了作业，一旦错误被复制，我将粘贴到错误消息中（不幸的是，不容易复制，因为如果我一步一步地完成代码，它会执行ok）。您是否考虑添加错误处理，因此错误会打印到即时输出中？@Juliusz-不，不考虑。这容易实现吗？我是否只需在语句之前添加

on error resume next

，然后在语句之后添加

debug.print err.message

？