|
▼よろずや さん:
>>という流れで考えましたが、上手くできませんでした。
>それを提示すると回答が付くと思いますよ。
回答ありがとうございます!
----------------------------------
Sub test001()
Dim i As Long
i = 1
Do While Cells(i, 1) = ""
Cells(i, 1) = ※1111、2222、3333のシートいずれかのA1セル(データが入っているもの)
i = i + 1
Loop
End Sub
----------------------------------
超初心者のため、上記形でどうにかならないかと考えましたが、
お恥ずかしいことに、以下の点でつまづいています・・
1.上記、1111、2222、3333のシートの中で
データが入っているシートのA1セルを指定する方法
2.1111、2222、3333のすべてのシートでA1セルが空欄だった場合は
どうしたらよいのか
3.フォーマットのA列の最下行まで来たら、B列の1列目から同じ処理を繰り返す方法。
4.フォーマット内が一部セル結合されているため、上記の方法で上手くコピーできるのか?
そもそも上記の処理では効率が悪いもしくは難しいのでしょうか・・?
他によい方法があれば教えていただきたいです。
どうぞよろしくお願いいたします。
|
|