---
# System prepended metadata

title: 儲存格處理
tags: [儲存格]

---

## Range.End 函數

下面的程式碼取得第1欄的最後一列
```vb=
Dim end_row As Long
end_row = Cells(Rows.Count, 1).End(xlUp).Row
```


