如何在vb中引用Excel时将Excel调到前台运行

zwq78 2001-08-10 12:22:40
这是在vb中将Excel表中数据导入到数据库中,先对文件进行检查,如有错,则将Excel表调到前台,并提示某sheet,某行有错:
Dim AppExcel As Object
Dim wBook As Workbook

If AppExcel Is Nothing Then
Set AppExcel = CreateObject("Excel.Application")
Else
Set AppExcel = GetObject(, "Excel.Application")
End If

Set wBook = Workbooks.Open(strFilePath)
errhandle:
?????
...全文
166 3 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
superzxf 2001-08-10
  • 打赏
  • 举报
回复
AppExcel.Visible=True
zwq78 2001-08-10
  • 打赏
  • 举报
回复
thanks for superzxf
lanren_me 2001-08-10
  • 打赏
  • 举报
回复
shell

7,785

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧