ExcelHome用VBA将指定的工作表移动到新工作簿中
本文为《别怕，Excel VBA其实很简单（第3版）》随书问题参考答案 要将工作表移动到新工作簿中，可以参照上一节将工作表复制到新工作簿中的思路，只要将前面示例中过程中的Copy方法改为Move方法即可，如： Sub ShtToWb() W...
ExcelHome极速拆分工作簿
昨天老板让我们部门把这个表格按投保月拆分到每个工作表，今天又让我们将这个工作表以投保月的维度，将每个月份的数据拆分到单独的工作簿，这活要是交给我们部门实习生小丽做，那她就又要犯愁了。 数据处理有疑问，表哥表姐伸援手，遇到棘手的问题，总有经验...
Excel/WPS数据处理利器 - Excel易用宝使用攻略
Excel易用宝（英文名称Excel Easy Tools）是由ExcelHome开发的一款Excel/WPS功能扩展工具软件，以提升Excel/WPS的操作效率为宗旨。
判断A1单元格是否为空单元格
可以使用下面的过程来解决本例的问题： Sub 判断A1单元格是否为空单元格() If Range("A1").Value = "" Then MsgBox "没有输入内容" Else MsgBox "已输入内容" End Sub 本文为：《...
极速拆分工作表
有这样一份往年的销售数据明细表，现在老板让我们以H链投保月字段，将这个明细表拆分成12个工作表。 我们部门实习生小丽又使出了复制粘贴大法，将H列字段做筛选，然后再复制新建工作表，到目标工作表中粘贴。 还好一年才12个月，要是换一个拆分纬度，...
使用对象变量和With语句简化对象的引用
本文为《别怕，Excel VBA其实很简单（第3版）》随书问题参考答案 Sub 设置单元格() Dim rng As Range Set rng = ThisWorkbook.Worksheets(1).Range("A1") With r...
将指定文件夹中所有工作簿里的数据合并到同一工作表中
本文为《别怕，Excel VBA其实很简单（第3版）》随书问题参考答案 如果要合并数据的工作簿保存在代码所在目录下，名为“我的文件”的文件夹中，要合并这些文件中第一张工作表的数据，可以用下面的过程： Sub 合并多工作簿第一张表的数据() ...
通过GetOpenFilename方法获得文件名
本文为《别怕，Excel VBA其实很简单（第3版）》随书问题参考答案 如果想通过GetOpenFilename方法获得一个或多个扩展名为“Txt”或“Mp3”的文件名称，并将获得的名称写入A列中，可以将过程写为： Sub 获取文件名() ...
用VBA合并多表数据时，合并区域列数不定怎么办
本文为《别怕，Excel VBA其实很简单（第3版）》随书问题参考答案 要解决本例中的问题，可以将过程改写为： Sub 合并多表数据() Dim EndRow As Long, DataArr As Variant, ToRng As Ra...
用IF语句为单元格中的成绩评定等次
本文为：《别怕，Excel VBA其实很简单（第3版）》随书问题参考答案 要解决本例的问题，可以使用下面的过程： Sub 为成绩评定等次() If Range("B2").Value >= 0 Then If Range("B2").Val...
Range对象的Select方法和Activate方法的区别
本文为《别怕，Excel VBA其实很简单（第3版）》随书问题参考答案 通过操作可以发现，用Select方法和Activate方法执行选中或激活单元格之间的区别： 选中由多个单元格组成的区域后，再使用Activate方法激活该区域里的一个单...
年终总结写了吗？给你一个按年、月、季度汇总数据的妙招
大家日常工作中经常会遇到按年、月汇总的问题吧，今天老祝就和小伙伴们一起就看看哪种方法最简单。 先来看基础的数据表格，包括日期、销售区域和销售数量等几百条数据： 领导说：按年来汇总一下销售数量吧： 我去，F3单元格输入公式，拉拉拉： =SUM...
工作表名称规则
Excel易用宝，拆分、合并工作表工作簿好帮手！ Excel易用宝可以帮助我们对于各种工作场景数据做拆分、合并工作表工作簿的处理，点点鼠标就能搞定繁琐的拆分与合并工作。的小伙伴在使用Excel易用宝拆分、合并工作表工作簿时不得要领，会出现无...
在Excel中制作一个简易的电子时钟
本文为《别怕，Excel VBA其实很简单（第3版）》随书问题参考答案 在ThisWorkbook模块中写入下面的过程： Private Sub Workbook_Open() Call OnTime方法 End Sub Private S...
利用Workbook对象的Open事件修改工作表界面
本文为《别怕，Excel VBA其实很简单（第3版）》随书问题参考答案 在ThisWorkbook模块中写入下面的代码，关闭并保存对工作簿的修改，重新打开工作簿，即可看到代码执行的效果。 Private Sub Workbook_Open(...
VBA中选择性粘贴的参数说明
本文为《别怕，Excel VBA其实很简单（第3版）》随书问题参考答案 要执行选择性粘贴，可以用Range对象的PasteSpecial方法，其各个参数及用途如下：
用VBA将单元格的格式复制粘贴到另一个区域中
本文为《别怕，Excel VBA其实很简单（第3版）》随书问题参考答案 要将A1:E10的格式，粘贴到以H1为左上角的单元格区域中，可以使用下面的过程。 Sub 选择性粘贴格式() Range("A1:E10").Copy Range("H...
高亮显示活动单元格所在行和列
本文为《别怕，Excel VBA其实很简单（第3版）》随书问题参考答案 Private Sub Worksheet_SelectionChange(ByVal Target As Range) '清除工作表中所有单元格的底纹颜色 Cells...
求三维数组包含的元素个数
本文为：《别怕，Excel VBA其实很简单（第3版）》随书问题参考答案 下面是解决本例问题的参考过程： Sub 求三维数组的元素个数() '=====以下代码用于声明三维数组并给三维数组赋值 Dim arr(1 To 3, 1 To 5,...
将第1张表中的A1:E10复制到第2张工作表中
本文为：《别怕，Excel VBA其实很简单（第3版）》随书问题参考答案 要解决这个复制单元格的问题，可以用下面两个过程中的其中之一： Sub 复制单元格1() Worksheets(1).Range("A1:E10").Copy Work...
将第1张表中已使用的区域复制到第2张工作表中
本文为《别怕，Excel VBA其实很简单（第3版）》随书问题参考答案 如果在活动工作簿的第 1 张工作表中，保存了行、列数不确定的数据，现要将这些数据复制到第 2 张工作表中（目标区域的最左上角单元格为A1），可以用下面的过程： Sub ...
