如果你想快速知道使用了工作表中的多少區(qū)域,就可以使用UsedRange屬性,不過,該屬性屬于Worksheet對(duì)象,然而它返回的結(jié)果是一個(gè)Range對(duì)象,代表工作表中已使用的單元格區(qū)域。
下面是UsedRange屬性的語(yǔ)法: Worksheet對(duì)象.UsedRange 注意,UsedRange屬性是工作表對(duì)象的屬性,因此應(yīng)使用代表工作表對(duì)象的代碼限定。在《Excel VBA解讀(7):看看Excel的那些常用對(duì)象(續(xù)1)》中介紹了Worksheet對(duì)象及其表示方法。
例如,下面的代碼: ActiveSheet.UsedRange.Select 下圖所示為在不同工作表中運(yùn)行后的效果:
可以看出,UsedRange屬性返回由所使用的單元格組成的方形區(qū)域。該區(qū)域內(nèi)包含未使用的空單元格。
現(xiàn)在我們?cè)谏蠄D所示的<示例工作表1>中設(shè)置單元格A4的格式為“加粗”(選擇單元格A4,單擊功能區(qū)“字體”選項(xiàng)卡中的加粗按鈕)。然后,再運(yùn)行上面的代碼: ActiveSheet.UsedRange.Select 下圖為運(yùn)行代碼后的效果: 所選擇的區(qū)域向下擴(kuò)展了一行,因?yàn)閷?duì)單元格A4運(yùn)用格式后,Excel認(rèn)為該單元格已經(jīng)被使用,所以該單元格所在的區(qū)域行也加入到了已使用的單元格區(qū)域中。 有興趣的朋友可以將UsedRange屬性與Range對(duì)象的CurrentRegion屬性相比較,有利于更深入地理解這兩個(gè)屬性。
仍以上圖所示的<示例工作表1>為例,下面的代碼: ActiveSheet.UsedRange.Count 返回?cái)?shù)值12,表示當(dāng)前工作表中已使用了12個(gè)單元格。 ActiveSheet.UsedRange.Row 返回?cái)?shù)值1,表示當(dāng)前工作表中已使用的區(qū)域開始于第1行。 ActiveSheet.UsedRange.Rows.Count 返回?cái)?shù)值4,表示當(dāng)前工作表中已使用的區(qū)域占有4行。
下面的代碼選擇當(dāng)前已使用區(qū)域的第2行: ActiveSheet.UsedRange.Rows(2).Select 運(yùn)行代碼后的結(jié)果如下圖所示:
--------------------------------------
如果您有更好的示例愿意分享,請(qǐng)給我郵件:xhdsxfjy@163.com 通過下列方式可以更快地了解完美Excel更新:
關(guān)注《完美Excel》微信公眾賬號(hào): |
|