Private Sub Workbook_Open()    Dim fso As Scripting.FileSystemObject    Dim root_path$root_path = "D:\工资单"'如果 D 盘中不存在文件夹 “工资单”,就创建If Not fso.FolderExists(root_path) Thenfso.CreateFolder root_pathEnd If
End Sub

执行上述代码时会报错

报错原因:
缺少对象。在定义的时候出错了

解决办法:
1、Dim fso As New Scripting.FileSystemObject
通过这种方法定义时,使用的时候会有自动提示,但是需要先引用 “Microsoft Scripting Runtime”。
“工具 —> 引用” 选项卡下

2、通过 Set fso = CreateObject(“scripting.filesystemobject”) 定义。但是,这种定义方式,在使用时没有智能提示

Private Sub Workbook_Open()    Dim fso As ObjectSet fso = CreateObject("scripting.filesystemobject")Dim root_path$root_path = "D:\工资单"'如果 D 盘中不存在文件夹 “工资单”,就创建If Not fso.FolderExists(root_path) Thenfso.CreateFolder root_pathEnd If
End Sub

vba 创建带有自动提示的 FileSystemObject 对象,报错:对象变量或 With 变量未设置相关推荐

  1. Oracle导入TYPE对象报错ORA-02304

    Oracle导入TYPE对象报错ORA-02304 Type是我们经常使用的数据库对象结构.我们在实际中,可以单独定义type类型,之后在PL/SQL代码或者数据表中使用. 在一个偶然的机会让笔者发现 ...

  2. 创建Vue脚手架并启动出现的报错及解决(总冠军版)

    一.赛前准备 准备工作与启动react脚手架不能说相同只能说一摸一样,具体可见 创建react项目并启动出现的报错及解决. 二.正式比赛(勇士总冠军今天!!) 1.全局安装: npm install ...

  3. Unity当GameObject.Find(““)获取不到对象报错时

    Unity当GameObject.Find("")获取不到对象报错时 有时候Hierarchy明明有我们需要获取的对象,但当他不启用时,我们用GameObject.Find(&qu ...

  4. spring boot ajax 415,解决@RequestBody接收json对象报错415的问题

    @RequestBody接收json对象报错415 前端请求: $.ajax({ url: basePath() + "/index/login.do", type : " ...

  5. java找不到对象报错_java找不到对象报错

    java找不到对象报错 [2021-02-04 02:18:22]  简介: php去除nbsp的方法:首先创建一个PHP代码示例文件:然后通过"preg_replace("/(\ ...

  6. tensorflow的Dataset对象报错ValueError: GraphDef cannot be larger than 2GB

    Dataset对象报错ValueError: GraphDef cannot be larger than 2GB或Cannot create a tensor proto whose content ...

  7. VirtualBox创建虚拟电脑、执行Genymotion模拟器报错

    当安装完Genynition关于Android应用的调试模拟器之后,在Genymotion执行的平台virtualBox:VirtualBox创建虚拟电脑.执行Genymotion模拟器报错: 错误卖 ...

  8. vue3脚手架创建项目,然后再去安装scss报错解决方式

    今天用 vuecli3 创建vue3项目 发现然后引入scss报错,看到网上很多的解决办法,都还是错误, 最后终于知道是哪里错误了,废话不多说,看下图 报错肯定是因为scss和node版本不一样 我的 ...

  9. ts报错“对象可能为“未定义”

    ts报错"对象可能为"未定义" interface Tree {id: numberlabel: stringchildren?: Tree[] } const addD ...

最新文章

  1. textview 垂直居中_在Textview左边或右边添加图标 ,换行不错位
  2. Tex2Word vs Word2Tex
  3. uniCloud云函数——微信小程序登录凭证校验[code2Session](即:使用 code 换取 openid 和 session_key 等信息)解决方案
  4. Mongodb在Linux下的安装和启动和配置
  5. 土豚mysql_树莓派LNMP配置
  6. python的setting怎么找_python代码中使用settings
  7. Python 语言使用中遇到的问题汇总
  8. 关于上兴远程监控的使用
  9. 八爪鱼取消Ajax加载数据,谁知道八爪鱼采集器设置了循环翻页采集怎么才采集十几个数据就停下不动了...
  10. 十月百度,阿里巴巴,迅雷搜狗最新面试五十三题(持续更新中10.16)
  11. 服务链路追踪类型和区别
  12. 默默学Sharding-Sphere(一)
  13. 中国剩余定理(孙子定理)
  14. 避免卷入办公室政治-开发就是这么坑!
  15. USB ncm虚拟网卡
  16. python for x in range(0,10) 例如使用python打印9*9乘法表
  17. jack 服务常见错误解决方法
  18. ramdisk“snmptraps”已满。因此,无法写入文件
  19. 解决 torchtext 无法下载 glove
  20. 网页设计作业 开心网旅游(11页) web前端期末大作业 html+css+javascript网页设计实例

热门文章

  1. idea如何配置jdk
  2. 英语总结—2017年3月
  3. 使用element-ui,一键复制粘贴实现上传功能
  4. 基于51单片机电子秤(程序+仿真+原理图)
  5. 程序员五六年能存100万,你说你焦虑个啥!!!
  6. windows继承PHP开发平台,windows平台下php开发平台的配置
  7. 单例模式:静态内部类实现的单例模式是懒加载且线程安全的
  8. Datawhale第13期组队学习笔记Task3
  9. 「地表最强」C++核心编程(五)类和对象--对象初始化和清理
  10. excel制定工作计划公式