Excel VBA質問スレ Part13

Excel VBA質問スレ Part13at TECH

Excel VBA質問スレ Part13 - 暇つぶし2ch633:デフォルトの名無しさん
09/11/14 10:49:33
>>619
Sub Ary()
Dim Arow As Long
Dim r As Range

For Each r In Range("A1:A100")
r.Value = r.Row Mod 10
Next r

End Sub
こんなものでどないでしょう。

次ページ

続きを表示

1を表示