excel宏教程_EXCEL — 实用的VBA

2024-05-13 12:00:43

虽说现在VBA真的是毫无排面，但只要会启用「宏」，收藏几个复制粘贴就能用的代码，作为一名办公室民工，总有用得上的时候。

所以这里记录几个之前工作中高频使用的小小小脚本。

下面提到的工作簿，即单个的 .xlsx 或 .xls 文件，工作表就是文件里的 sheet 。

1、自定义函数

自定义一个 Countcolor() 函数，统计区域内指定颜色的单元格个数。

无情，知乎的代码块提供了几十种语言，就是没有VB……

Function

函数说明：

比如在单元格输入 =countcolor(B2:F16,B8)，会返回区域 (B2:F16) 内与 B8 单元格颜色相同的单元格数。

2、合并工作簿

依次打开某个文件夹下的 EXCEl 工作簿，将每一个工作簿下所有 Sheets 复制到当前的工作簿中。

Sub

3、合并工作表

新建一个空白的 sheet，把工作簿下所有 Sheet 里的数据按顺序逐行复制到这个新建的空白表格中。

比如2019年上证指数的行情数据，按季度分在了4张工作表里，这里希望把它们合在一个表格里：

复制以下代码：

Sub

保存后，执行「宏」，效果应该是这样的：

4、分组后拆分到工作表

把一个表格里的数据，按某一列分组，每一组的数据复制到一张新的工作表中。

比如：继续前面的2019年上证指数行情数据，在第一列新增「月份」字段，现在希望每个月的行情数据单独放在一张 Sheet 里。

复制以下代码：

Sub

保存后，执行「宏」，效果应该是这样的：

5、工作表保存为工作簿

把 EXCEL 文件里每一张 Sheet 单独保存为一个工作簿。

比如：继续使用前面的行情数据，把每个月的行情保存为单独的一个 EXCEL 文件。

复制以下代码：

Sub

保存后，执行「宏」，我们在同样的文件路径下会发现一个新的文件夹「Index」：

打完，收工。

excel宏教程_EXCEL — 实用的VBA相关推荐

excel宏计算机,excel宏教程_电脑基础知识_IT计算机_专业资料.doc
excel宏教程_电脑基础知识_IT计算机_专业资料 Excel宏教程一.?? 选中单个单元格 Range("").Select ? 例:Range("C9" ...
excel宏教程_利用Excel和Power BI,打造自己的BI数据模型
文/大脸猫8年汽车行业数据分析经验,擅长跨行业快速理解业务并搭建模型,利用Power BI,Python等工具实现业务及报表自动化,相比技术更关注如何落实实际业务场景的解决方案. 相信很多人使用Pow ...
excel宏根据表格自动计算机,使用VBA从Excel电子表格自动执行Internet Explorer会话 | MOS86...
它与Windows集成后,可以使用任何支持它的应用程序(例如Word,Outlook或Excel)中的Visual Basic for Applications(VBA)脚本,以多种令人惊讶的方式控制 ...
excel使用教程_Excel 有多强大？你用 Excel 做的最酷的事情是什么？
你以为Excel就只能拿来做普通的图表展示数据么?分享 9 个Excel非常强大,非常炫酷的效果给大家,希望对大家有帮助~ 01. Excel特制的仪表盘除了用来展示基础的数据之外,Excel还可以 ...
Excel宏(VBA)类模块的创建与调用
Excel宏VBA类模块的创建与调用 1 类模块的介绍 2 为什么要使用类模块 3 如何创建类模块 4 如何调用类模块 5 代码 1 类模块的介绍 2 为什么要使用类模块 3 如何创建类模块类模块的 ...
Excel宏(VBA)密码破解
最近在研究一个Excel宏,想查看VBA代码但是有密码,于是想着能不能移除密码.网上查找一番资料后进行了尝试. 一,准备工具 Excel Hex Editor Neo 二,开始实践首先将.xlsm后 ...
计算机中的乘法函数公式,教程方法;excel乘法函数_excel乘法公式电脑技巧-琪琪词资源网...
琪琪词资源网-教程方法;excel乘法函数_excel乘法公式电脑技巧,以下是给大家带来的教程方法;excel乘法函数_excel乘法公式,大家可以了解一下哦! excel乘法函数 Excel中经常会 ...
【VBA(一)：For循环】【Excel中宏的使用+手工书写VBA代码+使用For循环+小结及练习】
文章目录 Excel中宏的使用录制宏优缺点录制相对引用的宏案例手工书写VBA代码新建模块使用For循环案例小结及练习定义宏 VBA(ALT+F11) 相关概念定位制作工资条 ...
java excel多选_excel宏选择多行
我有excel宏来选择要剪切并粘贴到下一张纸的行 . 现在我想一次选择多行来剪切并粘贴到下一张工作表,然后返回上一张工作表以删除已剪切的空白行 . 我对单行剪切和粘贴的代码如下: Sub CutPas ...

最新文章

热门文章