※ 引述《appledavid (新三寶:香蕉 鹿茸 太陽餅)》之銘言：
: 軟體: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
S大的建議程式我改正了
不過要執行時跑出 "無法執行巨集, 該巨集可能無法使用, 或者已停用所有巨集"
何解？
謝謝

是否是巨集安全性，因為沒有365可以測試，桌面版(2013)是在這裡，http://goo.gl/jBFjw6