Sub test()
Set oExcel = GetObject(, "ExcelApplication")
Set oWb = oExcelWorkbooksOpen("D:\testxls") '写你自己的Excel路径
MsgBox oWbSheets("Sheet1")Range("C5") '取"Sheet1"工作表C5单元格的值
oExcelQuit '退出Excel
End Sub
按 Alt+F11 打开VBE窗口,通过菜单选择“插入”-“模块”,输入以上代码。
这里采用的是后置绑定方法,无需事先加载Excel对象引用库。
前置绑定方法参见:>
如果在此过程中希望Excel窗口不可见,可在调用open方法打开Excel之前设置visible属性:
oExcelVisible = False
首先,建立一个excel表格,里面随便输入一些内容。
然后再新建一个word文档,在需要插入表格的地方,选择菜单:插入(I)-->对象(O)-->出现对象对话框后,选择第二页由文件创建(F)-->文件名(N)的右边有浏览(B)可以从浏览找到的excel文件,如果这里点确定,直接excel文件里的内容就加到word里了,不过,这样不会实时更新。
注意,右边还有个复选框链接到文件(K),如果这里√的话,就可以到预期的效果了,excel文件更新后,word文档里的内容也一起变动了。
1、当整个表格来源于Excel工作表时,首先在Excel工作表中选中需要Word文档中引用的数据区域 ,并执行复制 *** 作。
2、然后运行Word,依次单击“编辑”→“选择性粘贴”菜单命令,打开“选择性粘贴”对话框。
3、在“形式”列表中选中“Microsoft Office Excel工作表 对象”选项,并单击“确定”按钮。通过这种方式引用的Excel数据可以使用Excel编辑数据
如何在word中直接引用excel表格
首先,建立一个excel表格,里面随便输入一些内容。
然后再新建一个word文档,在需要插入表格的地方,选择菜单:插入(I)-->对象(O)-->出现对象对话,选择第二页由文件创建(F)-->文件名(N)的右边有浏览(B)可以从浏览找到的excel文件,如果这里点确定,直excel文件里的内容就加到word里了,不过,这样不会实时更新。
注意,右边个复选框链接到文件(K),如果这里√的话,就可以到预期的效果了,excel文件更新后,word文档里的内容也一起变动了。
如何让word文件名引用excel数据?
使用WORD的邮件合并功能,可以满足你的要求。
使用不太难,第一步选择数据源文件,第二步将要合并的区域播入WORD文档中,第三步合并,在工具菜单里,有详细的说明文件
以上就是关于word宏中打开excel文件并取单元格的值全部的内容,包括:word宏中打开excel文件并取单元格的值、Word文档怎样引用Excel数据、如何在word文档中引用excel表格中的数据等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)