在excel表格裡,計算一個sheet表使用的行數,這個功能的應用還是非常的廣泛的.

在VBA程式設計裡,透過計算行數,然後使用for next迴圈的方式來進行資料的計算是一個非常常用的解決問題的思路.現在根據以圖片為例來羅列幾個計算表格已經使用行數的計算方法.

方法一:

arr=sheets("資料表").range("a1")

.currentregion.value

r=ubound(arr)

方法說明:先把整個資料表有數值的部分裝入資料之中,使用ubound(arr)來計算陣列的行數,即可以計算出已經使用的最後一行的行數.這個路線是"曲線救國"的方法.

方法二:

with sheets("資料表")

r=

.cells(.rows.count,"c").end(3).row

end with

方法說明:使用

.rows.count

函式直接計算工作表裡已經使用的行數,此處計算行數使用的是C列的已經有資料的行數的標準.

方法三:

with sheets("資料表")

.range("c65536").end(xlup).row

end with

方法說明:

end.row

從單元格C65536往上找有資料的最下一行的行數.即計算出已經使用過的行數.

以上三種方法均可以計算出指定工作表的已經使用過的行數.