|
設(shè)置工作表滾動區(qū)域
1.ScrollArea屬性
使用工作表的ScrollArea屬性來控制顯示的單元格位置，其語法格式如下：
工作表.ScrollArea="單元格區(qū)域"
該屬性將以A1樣式的區(qū)域引用形式返回或設(shè)置允許滾動的區(qū)域。用戶不能選定滾動區(qū)域之外的單元格。將該屬性設(shè)置為空字符串（"")后，將允許對整張工作表內(nèi)所有單元格的選定。
2.ScrollColumn屬性
ScrollColumn屬性設(shè)置指定窗格或窗口最左邊的列號。如果指定窗口處于拆分狀態(tài)，Window對象的ScrollColumn屬性表示左上方的窗格。如果某些窗格處于凍結(jié)狀態(tài)，則Window對象的ScrollColumn屬性將不包括被凍結(jié)的區(qū)域。
End屬性
單元格區(qū)域的End屬性返回一個Range對象，該對象代表包含源區(qū)域的尾端的單元格。相當(dāng)于在Excel中按Ctrl+↑、Ctrl+↓、Ctrl+←、或Ctrl+→。其語法格式為：
expression.End(Direction)
其中,expression表示一個Range對象。Direction設(shè)置所要移動的方向，可設(shè)置為四個常量之一：xlDown(向下）、xlToRight(向右）、xlToLeft(向左）和xlUp(向上）。例如，選定包含單元格B4的區(qū)域中B列頂端的單元格的代碼為：
Range("B4").End(xlUp).Select
常使用該屬性來獲取表格中有效數(shù)據(jù)區(qū)域的最大行數(shù)，代碼如下：
.[B1048576].End(xlUp).Row
注意：在Excel2007中，工作表最多有10 48576行，如果使用上面的代碼，將只能在Excel2007中才能正確運(yùn)行。以前版本中運(yùn)行，需使用“B65536”。
Names集合對象
在Excel中，可使用行列號來引用單元格，也可使用“插入”│“名稱”命令來對單元格區(qū)域進(jìn)行命名，然后在公式或VBA代碼中使用名稱來引用相關(guān)單元格。
每個Name對象代表一個單元格區(qū)域上的定義名。Names集合是應(yīng)用程序或工作簿中所有Name（名稱）對象的集合。
可用Add方法創(chuàng)建名稱并將其添加到集合中。下面的語句創(chuàng)建一個新名稱，指向工作表Sheet1上單元格區(qū)域A1:C20。
Names.Add Name:="test",RefersTo:="=sheet1!$a$1:$c$20"
RefersTo參數(shù)必須以A1樣式表示法指定，包括必要時使用的美元符號（＄）。例如，如果在工作表Sheet1上選定了單元格A10，然后又將RefersTo參數(shù)指定為“＝Sheet1!A1:B1”并定義了一個名稱，那么該名稱實(shí)際上指向單元格區(qū)域A10:B10（因?yàn)樵搮?shù)指定的是相對引用）。若要指定絕對引用，應(yīng)當(dāng)用“＝Sheet1!$A$1:$b$a”。
|
|
|
