fkjj.net
当前位置:首页 >> .CurrEntrEgion >>

.CurrEntrEgion

currentRegion 属性返回Range对象,该对象代表当前的区域。当前区域是一个边缘是任意空行和空列组合成的范围。只读。 说明 该属性对于很多操作是很有用的。例如:自动将选定区扩展到包含整个当前区域,如AutoFormat方法。 该属性不能用于被保护...

Sub test()Dim arr, brr, ar, br, d As Object, r%, l%, n%, crr(1 To 5000, 1 To 27)arr = Sheet1.Range("a1").CurrentRegion'...

单元格区域("A4").CurrentRegion.Sort关键字1:=单元格区域("A4"),Order1:=xlAscending,Key2:=单元格区域(_ "B4"),Order2:=xlAscending,Key3:=单元格区域("C4"),Order3:=xlAscending,_ 标题:=xlGuess,OrderCustom:=1,区分大小写:=False,方向:=_ x...

获得("数据统计表")中A1单元格向右及向下连续有数据单元格的总行数 其间不能有空行或数据在横向或纵向有间断

Sub fj() Application.ScreenUpdating = False '关闭屏幕刷新 Sheets(3).Range("2:" & Sheets(3).[a1].CurrentRegion.Rows.Count).ClearContents '...

区域对象没有UsedRange Dim Rng As Range Set Rng = Worksheets(1).Range("a1") Rng.CurrentRegion.Select 'rng所在的一个连续的数据区域 Sheet1....

Sub Macro1()Dim arr, brr, crr, d As Object, i&, j&Set d = CreateObject("scripting.dictionary")arr = Sheet1.Range("a1").CurrentRegion...

arr = Sheets("data1").Range("A1").CurrentRegion 改为 arr = Sheets("data1").usedrange

Excel中用VBA判断行数的方法: 1、VBA中可以用CurrentRegion.Rows.Count属性获得连续的数据区域的行数。 2、'选择A2单元格周围连续有数据的区域,并将其...

Sub 保存() Dim arr, brr, d, i& '定义 数组arr, 数组 brr, d 对象, i 为长整形 Set d = CreateObject("scripting.dictionary") ' d 赋值...

网站首页 | 网站地图
All rights reserved Powered by www.fkjj.net
copyright ©right 2010-2021。
内容来自网络,如有侵犯请联系客服。zhit325@qq.com