close
1.首先按ALT+F11開啟VBA視窗。
2.點取「插入 > 模組」指令,開啟一個空白模組頁面。
3.輸入下列程式:
Sub FILL()
v = 0
For Each c In [a1:j10]
c.Value = v
v = v + 1
Next
End Sub
文章標籤
全站熱搜
1.首先按ALT+F11開啟VBA視窗。
2.點取「插入 > 模組」指令,開啟一個空白模組頁面。
3.輸入下列程式:
Sub FILL()
v = 0
For Each c In [a1:j10]
c.Value = v
v = v + 1
Next
End Sub
留言列表