首頁 辦公利器Excel文書處理Excel VBA 【Excel VBA】 判斷最後一列與最後一欄

【Excel VBA】 判斷最後一列與最後一欄

by PartyLin
已發布 最後更新日期 0 評論
Cells(ActiveSheet.Rows.Count, 1).End(xlUp).Row 
'依照第一欄最後一筆資料判斷為第幾列
Cells(1,ActiveSheet.Columns.Count).End(xltoleft).column
'判斷最後一欄為第幾欄

隱藏列也可判斷最後一列

xRow = Sheets("工作表1").Columns(1).Find(What:="*", LookIn:=xlFormulas, SearchDirection:=xlPrevious).Row
'SearchDirection:=2 1為最上一筆相同資料 2為最下一筆相同資料
'.Columns(1) =第1個欄位

發表留言

本網站放置cookies,務求為您提供最佳的網上瀏覽體驗。 同意 閱讀更多

%d 位部落客按了讚: