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

相关推荐
大佬,救命!!!9 小时前
etp中未运行用例顺序的定位及补齐脚本自动化生成
python·学习笔记·excel·自动化脚本·用例整理清洗
专职9 小时前
cursor中与vim插件冲突时的配置
编辑器·vim·excel
木易:_/11 小时前
【001】EXCEL办公技巧:隔行提取_excel
excel
木易:_/12 小时前
【002】EXCEL办公技巧:替换文本“=”快速提取_excel
excel
Java面试题总结12 小时前
Python 入门(四)- Openpyxl 操作 Excel 教程
开发语言·python·excel
chatexcel13 小时前
ChatExcel AI工具测试报告:从 AI Excel、数据分析到 AI PPT 的完整闭环
人工智能·数据分析·excel
babe小鑫13 小时前
想学Excel函数,学数据分析的价值分析
数据挖掘·数据分析·excel
闲云一鹤1 天前
Python 入门(四)- Openpyxl 操作 Excel 教程
python·excel
城数派2 天前
2025年我国乡镇的平均高程数据(Excel\Shp格式)
数据库·arcgis·信息可视化·数据分析·excel
葡萄城技术团队2 天前
Excel 中 VSTACK 与 HSTACK 函数:纵向与横向合并数据的实用指南
excel