1. 利用Do Loop,判斷儲存格是否為空白,找出最後一列. r = 1. Do. If ActiveWorkbook.Sheets(1).Cells(r,1) = " " then. Exit Do. End If. r = r + 1.
確定! 回上一頁