vba Worksheets("Sheet1").Activate ActiveCell.CurrentRegion 然后，我们可以通过`.CurrentRegion`来调整范围，比如选定从标题行下方开始到表格最后一行，最后一列的子区域：vba Set tbl = ActiveCell.CurrentRegion tbl.Offset(1, 0).Resize(tbl.Rows.Count - 1, tbl.Columns.Count).Select 这样，你就可...
---Activate none Cells rowIndex, columnIndex Application.Goto reference, scroll Offset rowOffset, columnOffset Range cell1cell1, cell2Resize rowSize, columnSize Select none Sheets index (or sheetName) Workbooks index (or bookName) End direction CurrentRegion none 本文中的示例使用下表中的属性。 a...
Sub CurrentRegionTest2() Dim rng As Range '声明对象变量 '将当前单元格区域赋值给变量 Set rng =Range("B1").CurrentRegion '选择当前单元格区域除第1行以外的区域 rng.Offset(1, 0).Resize(rng.Rows.Count - 1,rng.Columns.Count).Select End Sub 运行代码后,将选择当前区域中除标题行以外的单元格区域,...
currentRegion 属性返回Range对象，该对象代表当前的区域。当前区域是一个边缘是任意空行和空列组合成的范围。只读。说明 该属性对于很多操作是很有用的。例如：自动将选定区扩展到包含整个当前区域，如AutoFormat方法。该属性不能用于被保护的工作表。VBA示例 本示例选定工作表 Sheet1 上的当前区域。Workshee...
Resize能基于选中单元格调整range区域大小,选中current range中除标题行以外的单元格区域 Setrng=Range('B1').CurrentRegionrng.Offset(1,0).Resize(rng.Rows.Count-1, rng.Columns.Count).Select 4-4 常用Region CurrentRegion属性和UsedRange属性能够让我们“立刻获得”大片单元格区域。
currentRegion 属性返回Range对象，该对象代表当前的区域。当前区域是一个边缘是任意空行和空列组合成的范围。说明：该属性对于很多操作是很有用的。例如：自动将选定区扩展到包含整个当前区域，如AutoFormat方法。该属性不能用于被保护的工作表。使用CurrentRegion属性相当于在Excel工作表中选择菜单“编辑—定位...
Resize(行,列)方法用于缩放单元格区域 UsedRange属性返回工作表中已使用的单元格围成的矩形区域,且包括其中的空单元格 CurrentRegion属性返回当前区域以空行和空列组合为边界的区域,CurrentRegion区域小于等于UsedRange返回的区域 End属性:返回一个 Range 对象,它表示包含源范围的区域末尾的单元格。 相当于按 End+向上键(...
地址:https://docs.microsoft.com/zh-cn/office/vba/api/overview/excel/object-model 二、Application对象(Excel顶层对象) 1、ScreenUpdating属性 是否控制屏幕更新,False表示关闭屏幕更新,True表示打开屏幕更新 设置ScreenUpdating=False 关闭屏幕更新,将看不到程序的执行过程,可以加快程序的执行速度,让程序显得更直观,专...
1、定义一个Range对象。Dim rng As Range 2、引用Range对象 ，假设我们定义了一个工作表对象ws。Set rng = ws.Range("A1:B2")Set rng = ws.Range("C1")Set rng = ws.Range(ws.Cells(1, 1), ws.Cells(3, 3)).Set rng = ws.UsedRangeSet rng = ws.Range("A1").CurrentRegion 3、批注：Set ...
Set currentRegion = rng.CurrentRegion ' 迭代当前区域的每一行并执行操作 Dim row As Range For Each row In currentRegion.Rows ' 在这里对每一行执行操作 Debug.Print row.Row ' 打印每一行的行号 Next row End Sub 2、使用Resize方法调整当前区域的大小 你可以使用 Range 对象的 Resize 方法来调整Range.Curre...