Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


56505 / 76737 ←次へ | 前へ→

【24984】>Re:どこがまずいのでしょうか
お礼  hinerikomi  - 05/5/16(月) 16:38 -

引用なし
パスワード
   Jaka さん、こんにちは。

>▼hinerikomi さん:
>>Range("A1":"C4")のエリアに、4列目で改行するようにして
>>各セルに1〜10の数字を出力させようとしています。
>>すなわち
>>Range("A1") = 1
>>Range("A2") = 2
>>Range("A3") = 3
>>改行して
>>Range("A2") = 4
>>……………………
>>……………………
>>Range("A4") = 10
>>という具合です。
>
>すみません。
>上の意味がわかりません。
>Range("A2") = 2
>Range("A2") = 4 改行せずに同じ所に書き込んでますが

非常に申し訳ありません。
Range("A1") = 1
>>Range("B1") = 2
>>Range("C1") = 3
>>改行して
>>Range("A2") = 4
>>……………………
>>……………………
>>Range("A4") = 10
>>という具合です。
が正しい記述です。

>こう言う事なんでしょうか?
>Dim Cel As Range
>For Each Cel In Range("A1:C4")
>  ct = ct + 1
>  Cel.Value = ct
>Next
>
>同じですが、
>For i = 1 To 4
>  For ii = 1 To 3
>    CT = CT + 1
>    Cells(i, ii).Value = CT
>  Next
>Next

ありがとうございます。
そのとおりです。

0 hits

【24977】どこがまずいのでしょうか hinerikomi 05/5/16(月) 15:44 質問
【24979】Re:どこがまずいのでしょうか Kein 05/5/16(月) 16:02 回答
【24985】>Re:どこがまずいのでしょうか hinerikomi 05/5/16(月) 16:42 お礼
【24980】Re:どこがまずいのでしょうか 小僧 05/5/16(月) 16:03 回答
【24986】>Re:どこがまずいのでしょうか hinerikomi 05/5/16(月) 16:45 お礼
【24982】Re:どこがまずいのでしょうか Jaka 05/5/16(月) 16:08 発言
【24984】>Re:どこがまずいのでしょうか hinerikomi 05/5/16(月) 16:38 お礼

56505 / 76737 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free