Excel宏VBA类模块的创建与调用

  • 1 类模块的介绍
  • 2 为什么要使用类模块
  • 3 如何创建类模块
  • 4 如何调用类模块
  • 5 代码

1 类模块的介绍


2 为什么要使用类模块


3 如何创建类模块

类模块的新建只需右键选择插入,类模块即可

新建一个Super类


4 如何调用类模块

调用类模块需要在sub过程,或者function函数过程中
1 定义变量
2 实例化对象
3 调用对象方法


当然 定义变量和实例化对象也可以一步完成


5 代码

SuperSheets

Sub Sdelete(str As String)
Dim sht As WorksheetFor Each sht In SheetsIf sht.Name = str ThenApplication.DisplayAlerts = Falsesht.DeleteApplication.DisplayAlerts = TrueEnd IfNext
End SubSub Sadd(str As String)
Dim sht, sht1 As WorksheetFor Each sht In SheetsIf sht.Name = str Thenk = k + 1End IfNextIf k = 0 ThenSet sht1 = Sheets.Addsht1.Name = strEnd IfEnd SubSub Add()Sheets.Add after:=Sheets(Sheets.Count)End SubProperty Get Scount()Scount = Sheets.Count 'Get只读属性
End Property
Sub demo()Dim a As New SuperSheets  '定义变量 并 生成对象实例,把引用赋给变量a.Add '调用实例方法End Sub

Excel宏(VBA)类模块的创建与调用相关推荐

  1. VBA 类模块理解和使用总结

    目 录 VBA 类模块理解和使用总结 一.类的概念 二.类的定义 三.类详细定义 关于封装 关于多态 关于异常 关于自定义事件 四.结论: VBA 类模块理解和使用总结 一.类的概念 记得有人总结,V ...

  2. Excel 2010 VBA 入门 137 动态创建窗体

    目录 题 码 VBComponents集合 VBComponent对象 题 如图所示,该表为某公司工资表与员工档案表,当查看工资表时,希望能够在双击员工姓名时,在员工档案表中查询该员工的基本信息,并临 ...

  3. Excel宏(VBA)密码破解

    最近在研究一个Excel宏,想查看VBA代码但是有密码,于是想着能不能移除密码.网上查找一番资料后进行了尝试. 一,准备工具 Excel Hex Editor Neo 二,开始实践 首先将.xlsm后 ...

  4. excel 2007 vba与宏完全剖析_Excel宏VBA小技巧系列 | 分段加合

    写在前面的话  知识产权算是一个盛产数据的行业.专利啊商标啊著作啊,都有著录项目.我们常说的专利分析.产业导航.企业导航.产业预警.竞争情报.技术综述.知识产权评议等等,常规操作之一就要先处理著录项目 ...

  5. VBA中窗体模块、标准模块和类模块的区别

    Office VBA 参考 VBA类模块完全教程(完结篇) VBA类模块完全教程(下篇) VBA类模块完全教程(中篇) VBA类模块完全教程(上篇) VBA中窗体模块.标准模块和类模块的区别

  6. python封装vba_VBA类模块封装

    VBA类模块封装 2018-09-26 "封装宏------------------------- Sub 表达式变公式() Dim g As New 功能库 g.公式变数值 Range(& ...

  7. excel宏的Java调用

    下载jacob-1.19.zip https://sourceforge.net/projects/jacob-project/ jacob-1.19-x64.dll放到C:\Windows\Syst ...

  8. Excel VBA(09)类模块和数据库操作

    类模块详解 一.类模块入门 vba 中的类模块的概念和其他面向对象的语言里面的类的概念是类似的,就是抽取共性进行封装以便能够重复使用 类模块的插入 类模块的相关语句如下 1.let:设置对象属性 2. ...

  9. Excel总VBA相关类模块

    VBA操作Excel类模块的综合运用: Public 条件 Private rngs Private n Dim cc Property Set 单元格(rng As Range) If rng &g ...

最新文章

  1. 不同Activity之间传递数据--Bundle对象和startActivityForResult方法的实现
  2. Qt Scene graph画线
  3. I Hate It HDU - 1754 (线段树)
  4. python命令行调试django代码_Django shell调试models输出的SQL语句方法
  5. React 错误Each child in an array or iterator should have a unique “key” prop
  6. 惋惜!42 岁安全研究员、DNS 漏洞发现者去世
  7. js 正则表达式详细基础教程
  8. 程序员深度学习!mysql客户端工具免费绿色版
  9. 悟空CRM(PHP版本)安装教程
  10. PackageManager的基本使用
  11. HTML 界面画图工具
  12. U盘启动制作 + xp镜像
  13. 车载吸尘器方案-无刷马达运用2
  14. 如何将网址放到桌面并修改桌面快捷方式的图标
  15. 为什么年轻人都喜欢互联网行业
  16. 【STL】rb_tree (multi)set (multi)map
  17. MinGW中的头文件路径
  18. GeneXus创建第一个项目
  19. 计算机考研之方向解读
  20. 虚幻引擎3 —— 内容制作工具以及技术支持

热门文章

  1. 服装系统mysql设计_服装销售系统数据库设计.ppt
  2. 来看看她赚了多少钱,随手拍了一个视频,19万播放量
  3. 黎曼流形学习的学习笔记(2):Neural Ordinary Differential Equations(来源:NIPS 2018 oral) (未完待续)
  4. 2.2.1 数据通信系统的模型
  5. 微信小程序 java springboot理发店美容店预约系统
  6. 06解决Anaconda3安装完成后在开始菜单找不到的问题
  7. 如何听节拍器_节拍器使用方法
  8. 杭州云栖·2050大会-团聚召集人手册
  9. java编程的一个猜数字有趣小游戏
  10. Buddy 内存管理机制(下)