Excel VBA 質問スレ Part14

Excel VBA 質問スレ P ..

196:デフォルトの名無しさん
10/02/06 16:57:38
ログデータから取得したリストがあり、頭に種別を表す連番1～16が振ってあります。
このリストを上からチェックしていき、種別番号が1ならA列から始まる表に、2ならD列から始まる表に
という具合に、種別ごとの表に落とし込みたいと考えています。
それぞれの列に落とし込むことはできたのですが、貼り付ける行が前の列からの続きになってしまい悩んでいます。
具体的には、A1～A10が種別1、D1～D5が種別2、G1～G10が種別3としたいのに、
A1～A10が種別1、D11～D15が種別2、G16～G20が種別3となってしまうのです。

If hantei = 1 Then
Range("A" & i + 100).Formula = (参照式)

次ページ