excel请教关于未打开的非本工作簿的表的数据怎么读取。vba

来源：百度知道 编辑：UC知道 时间：2024/07/04 11:40:19
Set eo = ThisWorkbook.Worksheets("Efforts Output to ATC") eo是本表的数据
Set ci = Workbooks("1.xls").Worksheets("CI%&Exchange Rate Input") ci是为1.xls工作簿下的工作表，且该工作簿没有打开，请教应该怎么写。。谢谢！！！

先把没打开表的数据，临时引用到本表单元格
Range("A1") = "='" & ThisWorkbook.Path & "\[1.xls]CI%&Exchange Rate Input'!r3c3"

再读取本表单元格数据
data=range("A1").value

清除本表临时引用
range("A1").clearcontents

方法一
RANGE("A1").FORMULAARRAY="='D:\文件\[报表.xls]Sheet1'!$d$3"
方法二
RANGE("A1")=ExecuteExcel4Macro("'D:\文件\[[报表.xls]Sheet1'!r3c3")