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

相关推荐
一晌小贪欢16 小时前
Python办公14:批量解压文件夹内的所有 ZIP/RAR 并自动分类
开发语言·python·excel·数据可视化·python办公
一入程序无退路17 小时前
Navicat导出Excel格式表名表结构
数据库·excel
louis.D.20 小时前
excel按开头字符筛选
excel
ms365copilot20 小时前
Copilot Excel真实数据实战
人工智能·excel·copilot
Nontee21 小时前
Excel 导出组件改造实录:从 Full GC 到声明式导出
jvm·excel
Metaphor69221 小时前
使用 Python 设置 Excel 文件属性
开发语言·python·excel
西门子918!1 天前
Office(Excel)常用记录1
经验分享·excel
reasonsummer2 天前
【办公类110-08】20260807园园通-“小班“户籍地址和居住地址补充完整+外省市所在“省市区”两个按钮手工填写(Python+EXCEL)
python·excel·园园通
CC数分2 天前
如何用Excel数据透视分析业务?3分钟出报表
数据分析·excel
ms365copilot2 天前
iPad Excel Copilot,适合打工人出勤做分析数据
excel·copilot·ipad