Foxtable(狐表)用户栏目专家坐堂 → [求助]VBA代码执行出错


  共有2091人关注过本帖树形打印复制链接

主题:[求助]VBA代码执行出错

帅哥哟,离线,有人找我吗?
pursat88
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:37 积分:1089 威望:0 精华:0 注册:2017/1/4 8:55:00
[求助]VBA代码执行出错  发帖心情 Post By:2021/1/7 16:41:00 [只看该作者]

执行代码是:
Dim App As New MSExcel.Application
Dim Wb As MSExcel.Workbook = App.WorkBooks.Add
Wb.WorkSheets(1).name = "hhh"
Wb.WorkSheets(1).range("A1").Value = "hhh123"
Wb.SaveAs("d:\123.xls")
App.Quit
出现错误
图片点击可在新窗口打开查看

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106680 积分:542589 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/1/7 17:04:00 [只看该作者]

卸载重新安装一下office,需要安装完整版的,最好是32位版本。不能安装精简版、绿色版的。一般Ghost系统自带的都是精简版

 回到顶部