0293デフォルトの名無しさん垢版 | 大砲2018/03/05(月) 21:48:18.83ID:2t/pwmDg >>290 言い忘れたけど A〜DとKが表としてつながってない想定ね 一つの表からなら Range(Range("a1"), Range("d1").End(xlDown)) Range(Range("k1"), Range("k1").End(xlDown)) でそれぞれの範囲をとれる