VSTO中如何使用Area区域?

作者：绿色风分类：时间：2022-08-18 浏览：175

楼主
wise

Q:VSTO中如何使用Area区域?
A:若一个Range中存在多个不连续区域时，其中每一个不连续区域被叫做区域。如果Range中存在多个不连续区域，可调用Area属性来访问Areas集合中每一个区域。而Areas集合中具有Area.Count 和Area.Item属性。通过以下VSTO代码，可以学习Area：

Private Sub ThisWorkbook_Startup() Handles Me.Startup
Dim rng As Excel.Range
'定义一个单元格对象
rng = Globals.ThisWorkbook.Sheets("Sheet1").range("A1:B3,D1:D4,F1:F10")
'赋予该区域分别为A1:B3、D1:D4、F1:F10等三个不连续单元格区域
MsgBox(String.Format("存在{0}个区域", rng.Areas.Count))
'显示该定义区域中存在多少个区域
Dim MyArea As Excel.Range
'定义一个单元格对象
For Each MyArea In rng.Areas
MsgBox(String.Format("区域地址是{0}", MyArea.Address(ReferenceStyle:=Excel.XlReferenceStyle.xlA1)))
'遍历显示每个区域的地址
Next
End Sub

2楼
亡者天下

这个不错，学习一下

免责声明

有感于原ExcelTip.Net留存知识的价值及部分知识具有的时间限定性因素，经与ExcelTip.Net站长Apolloh商议并征得其同意，现将原属ExcelTip.Net的知识帖采集资料于本站点进行展示，供有需要的人士查询使用，也慰缅曾经的论坛时代。所示各个帖子的原作者如对版权有异议，可与本人沟通提出，或于本站点留言，我们会尽快处理。在此，感谢ExcelTip.Net站长Apolloh的支持，感谢本站点所有人**绿色风（QQ:79664738)**的支持与奉献，特此鸣谢！
------本人网名**KevinChengCW（QQ:1210618015)**原ExcelTip.Net总版主之一

评论列表