时间戳

首页 > 解决方案 > 当我安装了 Office 2013 时，如何从 Office 365 中抑制 Excel？

excel - 当我安装了 Office 2013 时，如何从 Office 365 中抑制 Excel？

问题描述

我们使用 Office 2013 而不是 Office 365。从代码启动 excel 时，我会看到 Office 365 登录对话框等。这会停止我的代码。

是否可以从代码启动 Excel Office 2013？

Dim xlWorkBook As Excel.Workbook = Nothing

xlApp = New Excel.Application

标签： excelvba

解决方案

您的代码缺少SetxlApp 的声明以及Dim已Option Explicit激活的声明。当您将工作簿变暗时，您无需将其声明为无……除非您给它一个对象，否则它将什么都不是。

更新：我更改了代码以检查安装的 Excel 版本，只有在 Excel 2013 时才继续

Sub test()

Dim xlApp As Excel.Application
Dim xlWorkBook As Excel.Workbook


Application.DisplayAlerts = False 'Turn off notifications

Set xlApp = New Excel.Application
'Only continue w/ code if it is version 15 (2013) else close app again
If xlApp.Version = 15 Then
    'Do stuff...
Else
    xlApp.Quit
    Set xlApp = Nothing
End If

Application.DisplayAlerts = True

End Sub

推荐阅读