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

相关推荐
疋瓞5 小时前
excel实用问题:提取文字当中的数字进行运算
java·javascript·excel
小Tomkk5 小时前
数据分析师使用Kutools for Excel 插件
信息可视化·excel
mqwguardain15 小时前
Python分享10个Excel自动化脚本
python·自动化·excel
流形填表1 天前
Excel to form ?一键导入微软表单
excel
亭台1 天前
【Excel笔记_4】平均绝对偏差(MAD,Mean Absolute Deviation)的EXCEL公式表达
笔记·excel
亭台2 天前
【Excel笔记_5】 LET 函数中数据范围不连续的处理方法
笔记·excel
保卫大狮兄2 天前
excel里面的数据怎样批量地处理,把数据竖排便成横排?
excel
Y编程小白2 天前
AI智慧社区--Excel表的导入导出
spring boot·excel
XYX的Blog3 天前
Pandas基础07(Csv/Excel/Mysql数据的存储与读取)
mysql·excel·pandas
东京老树根4 天前
Excel 技巧23 - 在Excel中用切片器做出查询效果(★★★)
笔记·学习·excel