データを複数セルずつ貼り付ける

質問

Excel超初心者です。
どう質問していいかわからず、へんな質問になりました。

　　　Ａ　　　Ｂ
１　泉川　　泉川
２　谷口　　泉川
３　森沢　　谷口
４　山地　　谷口
５　　　　　森沢
６　　　　　森沢
７　　　　　山地
８　　　　　山地

という風に、Ｂ列にＡ列のデータを２行ずつ入れていきたいのですが
関数を使えばできるでしょうか？
どうしたらいいのでしょう？
教えて下さい。よろしくお願いします。

回答No.4

imogasi · ベストアンサー

Ａ列にデータがあり、Ｂ列があいている列とする。
Ｂ１に１、Ｂ２に２を入れて、Ａ１：Ｂ２を範囲指定し、Ｂ２で＋ハンドルを出し、下方向へ引っ張る。連番が振れる（オートフィル）。
Ａ１：Ｂ１０（１０は最下行のつもり）を範囲指定して、ＣＴＲＬキーを押しながら、Ｂ２０まで引っ張ると、またはコピー貼り付けすると２倍のデータになる。
連番で並べ替えれば質問のようになります。
エクセルーー＞関数式がよいとは限りません。

お礼

なんだか難しく難しく考えていました。
基本的なことを使えばいいんですよね。
すっきりしました。
ありがとうございました。

回答No.3

BLUEPIXY

B1に
=OFFSET($A$1,INT((ROWS($A$1:A1)-1)/2),0)
として下にコピー

お礼

ありがとうございました。
この方法が、関数を使う場合一番シンプルですね。

回答No.2

haccyan

こんばんは

まず、C列を作業セルとして先頭行から下に、
1、1.5、2、2.5、‥‥と、0.5づつ増える数をフィルコピーします。

次に２行ずつ入れたいB列に

　　=IF(OFFSET($A$1,C2,0)="","",OFFSET($A$1,C2,0))

と入力し、下方向にフィルコピーすればできます。

もし、A列に入力されていない部分があっても、以上の関数で0（ゼロ）の表示を回避できます。

また、C列は作業セルなので、右クリックで[表示しない]を選ぶと、隠すことができます。

お礼

ありがとうございました。
そうですね、０回避も考えておかないといけませんね。

回答No.1

kaisendon

こんばんは

Ｂ１に　=INDEX(A:A,ROW()/2+0.5)
Ｂ２に　=INDEX(A:A,ROW()/2)　　と入力

Ｂ１とＢ２の二つのセルを同時に選択して
下方向にフィルコピー

とすれば出来ます。

入力されていない部分で表示される　0（ゼロ）を回避したいのなら
Ｂ１に　=IF(INDEX(A:A,ROW()/2+0.5)=0,"",INDEX(A:A,ROW()/2+0.5))
Ｂ２に　=IF(INDEX(A:A,ROW()/2)=0,"",INDEX(A:A,ROW()/2))
として、Ｂ１とＢ２の二つのセルを同時に選択して
下方向にフィルコピーで如何でしょうか？

お礼

ありがとうございました。
関数を２行に入れるわけですね。
がんばってみます。