分类： VBA

VBA实现删除任意工作表

• VBA • 11 条评论 • •9,798 次查阅

好几天没写关于VBA之类的东西了，放松也够了，今天在家休息就来写写代码吧。 平时大家删除工作簿里的工作表都是选中该工作表，然后在菜单中选择删除，但是我们本着折腾的理念，今天就来写段宏吧！ 上菜：   Sub 删除工作表()    ‘    ‘ 删除工作表 Macro    ‘ 宏由 Kael.Z 录制，时间: 2011/5

VBA记录区域内的修改信息

• VBA • 2 条评论 • •4,721 次查阅

前天写了一篇关于excel画图的文章，其实实质就是记录单元格的修改并标记。 但是你会说了，我不想整个表的区域修改信息都被标记，只想指定某个区域内标记之。 这个不是没办法，分享个代码尝试之：   Private Sub Worksheet_SelectionChange(ByVal Target As Range)    Dim sourcerange As Range  &nb

谁说Excel不能画图?我教你！

• VBA • 1 条评论 • •5,090 次查阅

晚上闲着无聊，打开Excel折腾起来。 本来我的思路设计一个VBA，为了实现标记（加底纹）修改过的单元格以便区分。 这其中就得利用change事件来实现了。 代码很简单的，实质的就一句话：   Private Sub Worksheet_SelectionChange(ByVal Target As Range)    Target.Interior.ColorIndex = 7 &nb

VBA激活表时自动排序

• VBA • 6 条评论 • •6,707 次查阅

今天给大家分享个excel表激活后自动排序的方法。 名称 长 宽 高 A 102 124 21 Z 106 128 25 X 105 127 24 D 103 125 22 C 104 126 23 如何实现将上图自动排序呢？名称所在单元格为A1，实现代码如下：     Private Sub Worksheet_Activate()    Range("A2:A6").Sort key1:=Range(&

小解单元格函数

• VBA • 6 条评论 • •6,758 次查阅

VBA中单元格函数有Cells、ActiveCell、Range、Areas。    Cells(row,column)代表单个单元格，其中row为行号，column为列号。如可以用Cells(1,1)、Cells(10,4)来引用"A1"、"D10" 单元格。ActiveCell代表活动工作表的活动单元格，或指定工作表的活动单元格。    Range代表工作表中的某一单元格、某一行、某一列、某一

加载更多