分享成果,随喜真能量。大家好,今日内容仍是和大家分享VBA编程中常用的简单“积木”过程代码,NO.133-NO.135,内容是:EXCEL工作表的隐藏、在工作表中一次插入多行表格的方法等内容。
VBA过程代码133:EXCEL工作表的隐藏
Sub mynz()
For Each sh In ThisWorkbook.Sheets
If sh.Name <> "空白" Then
sh.Visible = xlSheetVeryHidden
End If
Next
代码的解析说明:上述过程使用For Each...Next语句遍历工作簿中所有的工作表,将除“空白”表以外的所有工作表的Visible属性设置为xlSheetVeryHidden,使之隐藏。
Visible属性设置为xlSheetVeryHidden后工作表不能通过“格式”→“工作表”→“取消隐藏”菜单来显示隐藏的工作表。
VBA过程代码134:如何在工作表中一次插入多行表格的方法
Sub mynz()
Dim i As Integer
For i = 1 To 3
Sheets("22").Rows(3).Insert
Next
End Sub
代码的解析说明:上述过程使用Insert方法在第2行和第3行之间插入三行空行。
VBA过程代码135:如何在工作表中一次插入多行表格的方法2
Sub mynz()
Sheets("22").Range("A3").EntireRow.Resize(3). Insert
End Sub
代码的解析说明:上述过程使用Insert方法在第2行和第3行之间插入三行空行。
越简单的事物往往越容易理解,简单的过程组合起来就是一个复杂的过程,我们要先认真掌握这些简单的过程,才能在可以为我们复杂的工程服务。
下面是我根据自己20多年的VBA实际利用经验,编写的四部教程,这些是较大块的“积木”,可以独立的完成某些或者某类系统的过程,欢迎有需要的朋友联络(WeChat:NZ9668)分享。利用这些可以提高自己的编程效率。这些教程供有志于提高自己能力的朋友选择。
- 第一套《VBA代码解决方案》PDF教程,是VBA中各个知识点的讲解,覆盖了绝大多数的知识点,是初学及中级以下人员必备的资料。
- 第二套《VBA数据库解决方案》PDF教程。数据库是数据处理的利器,对于中级人员应该掌握这个内容了。
- 第三套《VBA数组与字典解决方案》PDF教程,讲解VBA的精华----字典,是我们打开思路,提高代码水平的必备资料。
- 第四套《VBA代码解决方案》视频教程。目前正在录制,现在推出“每天20分钟,半年精进VBA”活动,越早参与,回馈越多。现在第一册48讲内容已经录制完成。录制到第二册82讲的课程,第二级阶段的优惠期即将结束。