我在用GetObject得到一个Excel文件时,报错:属性的使用无效!请帮忙!!

Myself_fu 2005-01-24 04:36:00
代码:
Dim xlsobj1 As Excel.Application

Set xlsobj1 = CreateObject("Excel.Application")

xlsobj1 = GetObject(TxtPath1.Text)
^^^^^^^^^出错位置!!

xlsobj1.Quit

Set xlsobj1 = Nothing
...全文
156 2 打赏 收藏 转发到动态 举报
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
wwqna 2005-01-24
  • 打赏
  • 举报
回复
那恭喜楼上了。
Myself_fu 2005-01-24
  • 打赏
  • 举报
回复
找到原因了,把
Dim xlsobj1 As Excel.Application
改成
Dim xlsobj1 As Object
就可以了
^_^

7,765

社区成员

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

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