Office中国论坛/Access中国论坛
标题:
ACCESS 调用EXCEL问题
[打印本页]
作者:
myszh
时间:
2007-2-16 16:55
标题:
ACCESS 调用EXCEL问题
我引用了 别人的程序
Dim oapp As Excel.Application, oappwork As Excel.Workbook, oappwork_Sheet1 As Excel.Worksheet '引用EXCEL 10.0
Set oapp = CreateObject("Excel.Application")
oapp.Visible = True
Set oappwork = oapp.Workbooks.Open(XX) '打开指定EXCEL文件
Set oappwork_Sheet1 = oappwork.Worksheets("Sheet2")
是指定工作表明为 Sheet2的
我要现在想改成 默认第一张工作表
不管其表名[em04][em04]
作者:
sgrshh29
时间:
2007-2-16 18:22
什么叫默认的?是不是第一个sheet?如果是的话,就这样:
Dim oapp As object
Set oapp = CreateObject("Excel.Application")
oapp.Visible = True
oappwork = oapp.Workbooks.Open(XX)
oapp.Sheets(1).Select
注:一般excel打开时,默认的sheet是上次关闭文件时显示的那个sheet。
[此贴子已经被作者于2007-2-16 10:25:42编辑过]
作者:
cheungws
时间:
2007-9-22 20:07
how to do it, pls help thanks!!
欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)
Powered by Discuz! X3.3