請問一下大神這個語法如何修正有附檔案 - Office不分區

[發問] 請問一下大神這個語法如何修正有附檔案

1^# 跳轉到 »

發表於 2018-4-14 19:56 | 顯示全部帖子

回復 1# spensers
原：
r = Range("A1").End(xlDown).Row + 1

改成底下的試試看：
r = Cells(Cells.Rows.Count, 1).End(xlUp).Row + 1

靜思自在 : 【停滯不前，終無所得】人都迷於尋找奇蹟，因而停滯不前；縱使時間再多、路再長，也了無用處，終無所得。