投稿/コメントを表示します。

エクセルマクロ・VBA基礎編フォローアップ ベーシック
とびとびに存在するデータを拾って加工する

ガラパゴスタディー吉川さんの投稿

(投稿ID: 3582)

いきなり問題を解いているので、私の場合以下のようなまどろっこしいマクロを書いてしまいました。

Sub mondai6_1()
Dim moto1
Dim moto2
Dim saki
moto1 = 1
moto2 = 2
For saki = 1 To 10
Range("c" & saki).Value = Range("a" & moto1).Value & Range("a" & moto2).Value
moto1 = moto1 + 3
moto2 = moto2 + 3
Next

End Sub

結果は同じですが、変数が多いとメンテナンスもしにくいので、
確かに数列で記述する方がスマートだと思いました。
学生の頃は数学不得意だったので、今回改めて勉強になりました。
2017/12/14 01:52