詢問利用VBA的For迴圈帶入資料到儲存格內的寫法
- 帖子
- 20
- 主題
- 5
- 精華
- 0
- 積分
- 25
- 點名
- 0
- 作業系統
- W7
- 軟體版本
- 2013
- 閱讀權限
- 10
- 註冊時間
- 2015-7-24
- 最後登錄
- 2015-11-20
|
詢問利用VBA的For迴圈帶入資料到儲存格內的寫法
想詢問像這樣讓D列的資料由VBA帶入的話
若要使用for迴圈 自動寫入要怎麼寫呢....
因資料並沒有這麼少...
[D1].Formula = "1"
[D2].Formula = "2"
[D3].Formula = "3"
[D4].Formula = "4"
[D5].Formula = "5" |
|
|
|
|
|
|
|
- 帖子
- 471
- 主題
- 121
- 精華
- 0
- 積分
- 579
- 點名
- 0
- 作業系統
- WIN10
- 軟體版本
- OFFICE2019
- 閱讀權限
- 50
- 性別
- 男
- 註冊時間
- 2015-4-16
- 最後登錄
- 2023-1-17
|
2#
發表於 2015-9-3 17:51
| 只看該作者
本帖最後由 starry1314 於 2015-9-3 17:54 編輯
回復 1# toromru
Sub 依序填入()
For i = 1 To 830
Range("D" & i + 1) = i + 1
Next
End Sub |
|
|
|
|
|
|
|
- 帖子
- 20
- 主題
- 5
- 精華
- 0
- 積分
- 25
- 點名
- 0
- 作業系統
- W7
- 軟體版本
- 2013
- 閱讀權限
- 10
- 註冊時間
- 2015-7-24
- 最後登錄
- 2015-11-20
|
3#
發表於 2015-9-3 18:36
| 只看該作者
本帖最後由 toromru 於 2015-9-3 18:39 編輯
回復 2# starry1314
您好
主要是 從這語法 如何改? [D1].Formula = "1"
是改成?
For i = 1 To 830
["D" & i + 1].Formula = i
Next
執行後 警示 此處需要物件!!! |
|
|
|
|
|
|
|
- 帖子
- 20
- 主題
- 5
- 精華
- 0
- 積分
- 25
- 點名
- 0
- 作業系統
- W7
- 軟體版本
- 2013
- 閱讀權限
- 10
- 註冊時間
- 2015-7-24
- 最後登錄
- 2015-11-20
|
4#
發表於 2015-9-3 18:45
| 只看該作者
回復 2# starry1314
Sorry
我已知道 怎寫了 非常感謝你的語法~
可以使用唷!! |
|
|
|
|
|
|
|
