在幻灯片放映期间 Excel 未激活答案

【问题标题】：During a slideshow Excel does not activate在幻灯片放映期间 Excel 未激活
【发布时间】：2013-01-16 03:47:41
【问题描述】：

您好，我使用的是 Office 2007，我在 ppt 中创建了一个宏，用于打开 xlsm 文件，但在幻灯片放映期间，如果我从命令按钮开始，它会打开 excel 应用程序和文件，但不会激活它。这是我的代码：

Dim appExcel as object
Const ExcelObject = "Excel.Application"
Set appExcel = CreateObject(ExcelObject)
appExcel.Visible = True
appExcel.File.Open:="path name"
appExcel.Workbooks("workbookname").Activate

所以它继续激活没有错误，幻灯片仍然处于活动状态而不是 excel 文件。

我尝试发送 alt+tab 键，但幻灯片仍处于活动状态。我的问题有什么解决办法吗？

【问题讨论】：

你想达到什么目的？为什么要在 PPT 幻灯片放映中间显示 Excel 文件？
因为 20 个用户将使用它，并且在他们打开它后，excel 必须执行一些用户特定的操作，如果在他们的电脑中没有标记宏，那么打开的工作簿事件将不起作用

标签： excel powerpoint vba

【解决方案1】：

Dim appExcel as object
Const ExcelObject = "Excel.Application"
Set appExcel = CreateObject(ExcelObject)
With appExcel
    .Visible = True
    .File.Open:="path name"
    .Workbooks("workbookname").Activate
    AppActivate .Caption '<<<<<<<
End With

【讨论】：