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

相关推荐
Ada大侦探1 天前
新手小白学习数据分析03----Excel 报表之大厂周报(2026最新版实操,包教包会!)
学习·数据分析·excel
软件富二代2 天前
— 批量转换Word题库到Excel的小工具
电脑·word·excel·排版·软件
曦夜日长2 天前
Linux系统篇,开发工具(二):vim的使用与配置
linux·服务器·vim·excel
金玉满堂@bj2 天前
pytest+uiautomation+allure+Excel 数据驱动桌面自动化
自动化·excel·pytest
99乘法口诀万物皆可变3 天前
BMS HIL 自动化测试框架方案(基于 CANoe + C# + Excel)
开发语言·c#·excel
清山博客3 天前
Python调整EXCEL内容高度
excel
anlog3 天前
excel计算今天的日期加上n天后的日期
excel·日期计算·今天日期
sduwcgg3 天前
Zotero插入的文献添加交叉引用
vba
chatexcel3 天前
AI知识库教程:基于ChatExcel实现规则文档、Excel数据与业务分析联动
人工智能·excel
Yana.nice3 天前
Excel中以当前列的数值作为查找条件,查找匹配的行
excel