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

相关推荐
Non-existent9876 分钟前
海拔批量查询 + 批量 KML 生成工具-WPS 插件 TableGIS 新功能
javascript·c++·excel·wps
Metaphor69220 小时前
使用 Python 在 Excel 文件中查找并替换
python·excel
xiaomin-Michael20 小时前
EXCEL pivot table
excel
包子源21 小时前
PDF 转 Word/Excel 全链路实战:Next.js + 阿里云文档智能
pdf·word·excel
Java知识技术分享1 天前
excel动态表头实现+异步使用
java·spring·excel
tedcloud1231 天前
academic-research-skills部署教程:构建AI辅助科研环境
服务器·人工智能·word·excel·dreamweaver
wtsolutions2 天前
Sheet-to-Doc Excel Add-in Released, Install Directly from Microsoft AppSource
microsoft·excel
开开心心就好2 天前
完美兼容Office格式的免费办公套件
windows·均值算法·计算机外设·word·excel·csdn开发云·图搜索算法
未来之窗软件服务2 天前
Excel 物流货运记账表模板【万象EXCEL(二十七)】—东方仙盟
excel·仙盟创梦ide·东方仙盟·万象excel