軟體:EXCEL 想用VBA把Sheet1的資料帶入Sheet2 每分鐘紀錄資料並持續往下一行紀錄，
大大們幫忙，要如何加入每分鐘的語法?謝謝~
版本:2007
Sub TEST()
For i = 1 To 1000
x = i
Sheets("Sheet1").Select
Range("A2:J2").Select
Selection.Copy
Sheets("Sheet2").Select
Range("a" & (i)).Select
ActiveSheet.Paste
Next
End Sub

定時上可以application.ontime持續往下一列的話，可以range.end或range.find來判斷最後一筆有值的儲存格，如要取得列號的話row；如是儲存格的偏移則以offset

s大，我貼文前有試過ontime函數，但會顯示無法執行巨集，可以請您再說明細節嗎？謝謝您或是有範例可以參考嗎？謝謝

如出現無法執行巨集的話，檢查ontime在指定Procedure參數字串上，是否也有該程序sub範例上可google excel vba application.ontime 可參考

好，我試試看，非常謝謝s大!