Office中国论坛/Access中国论坛

标题: 如何将ACCESS查询数据导入到一个Excli不同的工作表？ [打印本页]

作者: ylj26518 时间: 2013-9-24 16:46
标题: 如何将ACCESS查询数据导入到一个Excli不同的工作表？
Fil = "b.xls"
Path = CurrentProject.Path
Luj = Path & "\" & Fil
Set Myxl = GetObject(Luj, "excel.sheet")
Myxl.Application.Visible = False
Myxl.Parent.windows(1).Visible = True
"excel.sheet"是电子表格的第一个表，默认是导入到第一个工作表中，假如还有其它表，要导入数据，这个地方怎么写代码？

作者: djt 时间: 2013-9-25 10:02
Myxl.worksheets(strSheetName).activate

作者: ylj26518 时间: 2013-9-25 20:31
谢谢！加这句代码问题解决了

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)