| 共 129 篇文章 |
|
VBA|替换任意单元格内容。巧妙修改下面vba语句，可以替换任意单元格内容：Sub 名称()Range(替换区域).Replace what:=''''''''被替换的内容'''''''', replacement:=''''''''替换后的内容''''''''End Sub. 阅699 转15 评0 公众公开 18-10-07 13:54 |
excel教学技巧：一键清除单元格名称。在对单元格名称设置与应用教学演示完成之后，如何将已定义好的单元格名称一键删除，让学生进行同步训练。所以，需要制作一键清除已定义好的单元格名称，来提高工作效率。以实现一键删除事先已定义好的单元格名称。Dim syname As Name.实例见：单元格名称的定义与管理.xlsm，请到QQ群下载试用。 阅308 转5 评0 公众公开 18-08-27 19:27 |
来吧，悄悄的给Excel装一盏聚光灯。今天和大家分享的VBA小代码功能主题是“聚光灯”。所谓聚光灯，可以简单理解成通过对工作表的行列填充颜色，突出显示被选中的单元格，仿佛该单元格被聚光灯照亮似的。3、该代码会取消单元格原有设置的填充色，但不取消【条件格式】以及【表】功能设置的单元格填充色……关于第3点，回复关键词聚光灯，可以获... 阅246 转11 评0 公众公开 18-07-09 21:01 |
VBA 一键删除数据表中的空行（2018_3）在处理Excel数据时有时候难免会遇到数据中有一些空行需要删除，当非连续的空行较多时，一行一行选中再删除的方法显然不可以取。Row ''''''''获取第一个非空行的行号。Count - 1 ''''''''获取最后一个非空行的行号。For j = Erow To 1 St... 阅776 转28 评0 公众公开 18-03-28 23:01 |
VBA常用小代码102：批量合并相同值单元格。诸君好，我们今天分享的VBA小代码内容是批量合并相同值的单列单元格。Set Rng = Intersect(Rng.Rng.2，由于merge合并后的单元格区域只保留右上角首个单元格的值，因此该段代码遍历单元格区域的顺序是从后向前，而不是从前向后，后者是新人常出错之处。3，当然也可以采用从前向后的遍历顺序，先将Rng装... 阅266 转11 评0 公众公开 18-03-21 20:37 |
VBA常用小代码005：汇总各分表数据到总表。今天和大家分享的是VBA常用小代码系列的第5篇：一键汇总各分表数据到总表。照例举个栗子，如下图，一个工作簿，包含多个工作表，现在需要将各个分表的数据汇总到总表中……Dim Sht As Worksheet, Rng As Range, k&, Trow&\''''''''如果表格名称不等于当前表... 阅242 转12 评0 公众公开 18-03-13 22:58 |
一键批量更改工作表名称~看我小眼神，这就用到了我们之前说的VBA常用小代码系列001，一键生成工作表目录不是？当然，那期的代码是批量提取工作表名称并建立超链接，我们这里不需要建立超链接，代码可以简化如下：当然，我们也可以把两段代码合并成一段代码，也就是省略把工作表名称提取到A列后再用函数更名的步骤，直接通过VBA编程进行更名，但... 阅2064 转27 评0 公众公开 18-03-10 23:41 |
分类归档-将工作簿移动到对应的文件夹。要求：将文件夹1-1.xlsx、文件夹1-1.xlsx移动到文件夹1，依次类推。Dim MyFold As Object, MyFile As Object.''''''''循环当前路径文件夹下的所有文件。TargetFolder = ipath &''''''''\'''''''' ... 阅107 转11 评0 公众公开 18-03-08 23:26 |
VBA常用小代码：对工作表按名称快速排序。比如说，有一个工作薄，有十几张工作表，现在要重新设置工作表排放顺序，能不能快速处理哩？第1步，将工作簿现有的工作表名称提取到表格的A列。第2步，对A列的工作表名称排序。利用EXCEL自带的排序功能，升序也好，降序也罢，甚至自定义排序，都可以很快捷的完成对A列工作表名称排序的操作。Dim Sht As... 阅260 转7 评0 公众公开 18-03-08 11:21 |
动态添加和删除VBA代码过程。VBA代码删除代码，是自相残杀吗？但是有时也需要用代码去产生（或者删除）代码，例如：用代码在工作表中动态添加ActiveX控件按钮，并添加按钮的Click事件代码。代码中先使用OLEObjects.Add方法在工作表中添加一个按钮，由于按钮的名称会自动进行顺次编号，为了区别事件代码的正确，因此使用objBtn.Name获取按钮的名... 阅750 转10 评0 公众公开 18-03-07 08:06 |
