从access导出数据到一个excel表格中,excel建立时,sheet的名字是sheet1,然后从该excel表格中再把数据导入access中,用代码访问sheet1可以成功导入,但是在excel中把sheet1改名为sheet2,在代码中访问sheet2,出现提示:数据库引擎找不到对象sheet2.如果用sheet1访问却可以成功,好像对sheet的改名没有生效,不知到是怎么回事?
调试欢乐多
exApp.Visible = False
Set exwbook = exApp.Workbooks.Open(dirname & filename & ".xls")
'循环验证 Sheet 表单的命名
For Each sheet In exwbook.Sheets
If UCase(sheet.Name) = UCase("tow.sheet") Then
End If
Next