Warning: file_get_contents(/data/phpspider/zhask/data//catemap/5/excel/28.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
从powerpoint演示文稿(VBA、powerpoint)打开Excel文档_Excel_Vba_Powerpoint - Fatal编程技术网

从powerpoint演示文稿(VBA、powerpoint)打开Excel文档

从powerpoint演示文稿(VBA、powerpoint)打开Excel文档,excel,vba,powerpoint,Excel,Vba,Powerpoint,我想在演示过程中使用ActiveX按钮打开同一目录中的现有excel文档。代码 Workbook.Open "Dokumention.xlsx" 不工作。您需要先设置对象 Dim xExcelApp As Excel.Application Set xExcelApp = CreateObject("Excel.Application") xExcelApp.Visible = True Set wb = xExcelApp.Workbooks.Open

我想在演示过程中使用ActiveX按钮打开同一目录中的现有excel文档。代码

Workbook.Open "Dokumention.xlsx"

不工作。

您需要先设置对象

Dim xExcelApp As Excel.Application
Set xExcelApp = CreateObject("Excel.Application")
xExcelApp.Visible = True
Set wb = xExcelApp.Workbooks.Open("SOMEPATH\Dokumention.xlsx")
在运行它之前,需要启用引用MS Excel 16.0对象库

Workbooks.Open文件名:=“SOMEPATH\dokumotion.xlsx”
Workbooks.Open我仍然收到一个运行时错误424,备注是需要一个对象。如果您只想通过单击按钮打开Excel文档,VBA就太过分了。添加到John Coleman的备注中:只需创建一个指向该文件的超链接。在创建超链接之前,请确保文件与PPTX位于同一文件夹中。如果您将文件移动到另一个位置/计算机,只要将它们放在同一个文件夹中,链接就更有可能仍然有效。