質問: エクセルのマクロの事? エクセルで a1あ、b1い、c1う a2え、b2お、c2か a3き、b3く、c3け 以下続く このようになっている物を a1あ a2い a3う a4え a5お a6か a7き a8く a9け こんな感じにマクロを使って変更したいのですが、どのようにすればいいでしょうか?
回答: こんにちは。 データが、もう少し、複雑な内容でしたら、以下のようなコードではうまくいかないとは思いますが、初歩的なマクロなら、こんな風にしますね。別に、マクロの経験があってもなくても構わないですが、この程度なら、[標準モジュール]に貼り付けて、[alt+f8] で呼び出すだけで、結構です。 内容を説明してください、ということになると、ちょっと・・・(^^ゞ 書き出し場所は、worksheets("sheet2") になっています。 このマクロの場合は、同じシートの自同じ場所には、上書きは出来ませんから、配列変数にデータを確保しなければなりません。 '標準モジュールに書き出してください。 '----------------------------------------- sub test1() dim r as range dim c as variant dim i as long set r = range("a1").currentregion application.screenupdating = false i = 1 '初期値 for each c in r if not (isempty(c.value)) then worksheets("sheet2").cells(i, 1).value = c.value i = i + 1 end if next c application.screenupdating = true set r = nothing end sub