Excel 宏录制与VBA编程 ——VBA编程技巧篇一 (Union方法、Resize方法、Cells方法、UseSelect方法、With用法)

Uniom方法

     使用Union方法可以将多个非连续区域连接起来成为一个区域,从而可以实现对多个非连续区域一起进行操作。

Resize方法

     使用Range对象的Resize属性调整指定区域的大小,并返回调整大小后的单元格区域。

Cells方法

     Cells属性返回一个Range对象。

UseSelect方法

     UseSelect过程使用UsedRange属性选择工作表上已使用单元格组成的区域,包括空单元格。

With用法

     VBA 中,With 结构用于组合同一个对象的多个属性和方法,避免重复写同一个对象名,提高编程和运行效率。

     With 结构由 With 和 End With 两个语句构成,对象的属性和方法都写在两者之间。

语法如下:

     With 对象

          .属性 = 数据

          .方法

          '其他属性和方法

     End With

     现在看一个实际的例子,需要将工作簿中 Sheet1 工作表设置新名称,然后设置标签颜色为黑色,最后隐藏工作表。

cpp 复制代码
/* 如果不用 With 结构,可以看到,每个语句都重复写 Worksheets("工作表名称") 部分。*/
Sub MyCode()
	Worksheets("Sheet1").Name = "新名称"
	Worksheets("新名称").Tab.ThemeColor = xlThemeColorLight1
	Worksheets("新名称").Visible = xlSheetHidden
End Sub


/*使用 With 结构,可以避免重复写同一个对象名,代码如下:*/
Sub MyCode()
	With Worksheets("Sheet1")
		.Name = "新名称"
		.Tab.ThemeColor = xlThemeColorLight1
		.Visible = xlSheetHidden
	End With
End Sub

关注

笔者 - jxd

相关推荐
Access开发易登软件14 小时前
Access 和 SQLite,根本不在一个赛道上
java·jvm·数据库·sqlite·excel·vba·access开发
biuyyyxxx1 天前
Excel常见异常
excel
猫猫不是喵喵.1 天前
关于解析Excel中的日期出现是数字序列的问题
excel
asdzx671 天前
Python TXT 转 Excel (自动识别分隔符)
python·excel
也要大步向前呀1 天前
excel(1)将多行内容合并到一行里
excel
Non-existent9871 天前
海拔批量查询 + 批量 KML 生成工具-WPS 插件 TableGIS 新功能
javascript·c++·excel·wps
Metaphor6922 天前
使用 Python 在 Excel 文件中查找并替换
python·excel
xiaomin-Michael2 天前
EXCEL pivot table
excel
包子源2 天前
PDF 转 Word/Excel 全链路实战:Next.js + 阿里云文档智能
pdf·word·excel
Java知识技术分享2 天前
excel动态表头实现+异步使用
java·spring·excel