|
▼ウッシ さん:
こんにちは。
>Sub test1()
> m = 3
> Do While m <= 90
> i = 1
> Do While i <= 4
> Range("F" & m).Value = _
> Worksheets("Sheet1").Cells(i, 2).Value
> i = i + 1
> m = m + 1
> Loop
> Loop
>End Sub
のほうを使わせていただきたいと思っています。
申し訳ないのですがその後やりたいことが少し変わりました。
質問時点では次行のセルに入れるために変数mを使いましたが、
今は、次列のセルに入れるために変数mを使いたいと存じます。
Range(F & m).Value = Worksheets("Sheet1").Cells(i, 2).Value
↓
Range("m" & 3).Value = Worksheets("Sheet1").Cells(i, 2).Value
のように変えたのですが、エラーになってしまいます。
土、日で自力でやろうと思ったのですが結局できませんでした。
次列のセルに入れるために変数mを使うにはどうすればよいでしょうか。
|
|