以下是关键代码:
fileName="e:\a1.dwg"
Set excelBook = excelApp.Workbooks.Open("e:\test.xls")
Set excelSheet = excelBook.Worksheets("sheet1")
excelSheet.Activate
excelBook.Application.Visible = True
excelSheet.Range("a1", "a2").Select
excelBook.ActiveSheet.OLEObjects.Add(FileName:=fname, Link:=False, _
DisplayAsIcon:=False).Selec
运行后出现以下错误:运行时错误:'-2145320900 (8021003c)':
无法获取Document 对象
各位大哥,这是什么原因啊?我装的是AutoCad2005,以前装AutoCad2002时没有这个问题。
解决方案 »
- 如何连接远程的数据库?
- 高分,请各位高手帮忙看一看这是怎么回事?急,在线等候
- 如何通过程序获取读卡器所在的串口、驱动程序状态、启用和停用此设备
- 我是VB初学者,哪位能给我个初学的教程,或是你们初学时的经验呢。谢谢了
- 怎样在不把文件释放出来的情况下播放资源文件中的Mid音乐?最好有代码!谢谢!!
- 关于多个工程制作一个安装包的问题
- 快来下载 QQ神奇字符画 2008 核心源代码(VB 6.0)
- 我怎么打不开数据库提示没有对象可我已经引用了
- 大家快来买我的软件啊!我打败了SafeClean Utilities。比它多找出了1兆的垃圾文件(绝对垃圾),而且注册费比它的便宜^_^
- 一个简单的SQL
- 如何检查数据为空??
- 用VB控制,在EXCEL中粘贴 AutoCad 图形出错!
改成
fname="e:\a1.dwg"