軟體:Office 365
=====================程式碼=====================
Sub tesyt()
For i = 1 To 100
sheet1.Cells(i, A) = sheet2.Cells(3, D)
Next
Application.OnTime Now + TimeValue("00:00:03"), "tesyt" 'Counter
End Sub
=========================================================
我想做的功能
我想將Sheet2 D3位置的數字
每三秒放入Sheet1 A Column 放一百個
我哪裡做錯了? Orz