エクセルの関数で質問です

質問

エクセルで、下記の様に同じ文字やセルを移動する関数はありますでしょうか。
(1)をＦ列の　 (1)に
(2)を　　　　　(2)に
(3)を　　　　　(3)に
の様な感じで規則的に何十段も続けたいのですが。

　Ａ　Ｂ　Ｃ　Ｄ　Ｅ　Ｆ　Ｇ　Ｈ
1
2(1)　　　　　　　　　(1)
3(2)
4(3)　　　　　　　　
5(4)　　　　　　　　　(2)
6(5)
7(6)
8(7) 　　　　　　　　 (3)
9(8)　　　　　　　　　
・
・
・

よろしくお願い致します。

回答No.5

imogasi · ベストアンサー

もう回答が出ていますが、小学校か中学校の級数のことをおもいだして考えればでき。
F列　--A列
２行目ーー２行目
５行目ー　３行目
８行目ー　４行目
１１行目ー５行目
↑　　　　　　↑　１行おき
３行おき
ーーー
関係する関数は式を入れるセルの自分自身の行はROW（）関数
割った余りはMOD関数
割った商はINT関数
A列の何番目かを取る関数はINDEX関数
この関係を数式にするには
F－２を考える。第２行目から始まっているため。
（F-２)/３の商とあまりを考える
其れでF2に
=IF(MOD(ROW()-2,3)=0,INDEX($A$1:$A$100,INT((ROW()-2)/3)+2),"")
例データA列とF列
1 1
2
3
4 2
5
6
3
ーーー
ただしF列の
第３行目、４行目に何か既にデータがあって、それを壊してはいけない場合は、VBAで処理しないとならない。
または人間がコピー貼り付けを５，８，１１行・・にしないとダメ(手間がかかる）
CTRLキーを押しつつマウスクリックしてセルを選択して置いて、CTRL+V。

お礼

丁寧なご説明。

どの方も、ありがたいアドバイスで助かります。
ご丁寧にアドバイスいただきましてありがとうございます。

これから、関数の事も少し学びたいと思います。

回答No.4

KURUMITO

F１セルには次の式を入力して下方にオートフィルドラッグします。

=IF(ROW(A1)>COUNTA(A:A)*3,"",IF(MOD(ROW(A1),3)=2,INDEX(A:A,ROUNDUP(ROW(A1)/3,0)+1),""))

お礼

いろいろなご回答があって、どれも出来てビックリです。

回答No.3

mshr1962

F2=IF(MOD(ROW(),3)=2,INDEX(A:A,(ROW()+1)/3+1),"")
または
F2=IF(MOD(ROW(),3)=2,INDIRECT("A"&(ROW()+1)/3+1),"")
で下方にコピー

お礼

へ～って感じです。

ちゃんと勉強したくなりました。

回答No.2

silverfd

F2にこの式を入力、
=IF(MOD(ROW(),3)=2,INDIRECT("A"&INT(ROW()/3)+2),"")
それを下にドラッグしたら同じようになりましたよ。

お礼

これでも出来ました。

いろいろやり方があるんですね。

回答No.1

keithin

Ｆ２のセルに
=INDEX(A:A,ROW(A6)/3)
と記入し，Ｆ２：Ｆ４の３つのセルを選んでおいて下向けにえいやっとオートフィルドラッグします。

お礼

ご回答いただきありがとうございます。

できました！
嬉しいです。