エクセルのオートフィルで、

1
2
3
4
とふやしていく事はできるのですが
1
1
2
2
3
3
4
4
のように、複数の行をオートフィルで増やしていく事はできないのでしょうか?

回答の条件
  • URL必須
  • 1人1回まで
  • 登録:2008/11/22 16:29:03
  • 終了:2008/11/24 21:54:18

回答(4件)

id:pahoo No.1

pahoo回答回数5960ベストアンサー獲得回数6332008/11/22 16:55:51

ポイント23pt

下記のように1~4行目を初期値として用意し、この4行を選択しオートフィルしていくことで、表示上は、お求めの結果にすることができます。

A
1 1
2 =A1
3 2
4 =A3
5
6

参考サイト

id:khirakaw

ありがとうございました。

2008/11/24 21:54:03
id:masanobuyo No.2

masanobuyo回答回数4616ベストアンサー獲得回数782008/11/22 16:55:54

ポイント23pt

オートフィル機能は、1列のみだけでなく、複数の行・列をまとめて

オートフィルすることが出来ます。

(1)列に数字に入力します。

 例 A1からE5に1、8、15、22、29と入力します。

(2)入力した1行全体を選択します。

(3)フィルハンドルをドラックします。

 例 7行目までドラックします。

(4)複数の列に連続して数字が入力されます。


http://www.cybozu.net/cpt/moug/item_00026.html

id:khirakaw

ありがとうございました。

2008/11/24 21:54:05
id:van-dine No.3

van-dine回答回数108ベストアンサー獲得回数112008/11/22 17:38:41

ポイント22pt

直接はできないようです。

ただ、この場合は

A
1 1
2 1
3 =A1+1

と入力し、A3の式をオートフィルすると実現出来ます。

↓ダミー

http://q.hatena.ne.jp/1227338941

id:khirakaw

ありがとうございました。

2008/11/24 21:54:07
id:SALINGER No.4

SALINGER回答回数3430ベストアンサー獲得回数9692008/11/23 15:27:53

ポイント22pt

自分も数通りの解法を考えて見ましたが、既に回答してる方がいたので簡単な方法があるのかと思って回答は控えていました。


まず、1のid:pahooさんの回答はできないようです。

2のid:masanobuyoさんの回答もこの場合は違うようです。

この場合、一番簡単な方法は3のid:van-dineさんの回答になるでしょうか。


自分で思いついた3以外の方法は以下。

1 1行目に0.5、2行目に1を入れて2行を選択して下にオートフィル。列を選択してセルの書式設定で数値にして小数点以下の桁数を0にする。

この場合は、見た目だけで実際の数値は違うことになるが印刷するだけならこれでいい。


2 1行目からならば次の数式でもいける。

=ROUND(ROW()/2,0)


3 選択したセルの下に指定した行まで連番を入れるVBAも作ってみました。

Sub Macro()
    i = Application.InputBox(Prompt:="何行目まで入れますか?", Type:=1)
    If i <= Selection.Row Or i > Rows.Count Then Exit Sub
    k = 0.5
    For j = Selection.Row + 1 To i
        Cells(j, Selection.Column).Value = Int(Selection.Value + k)
        k = k + 0.5
    Next j
End Sub
id:khirakaw

ありがとうございました。

2008/11/24 21:53:50
  • id:SALINGER
    1番簡単なのは、A2セルに=A1の数式を入れてA1とA2を選択してオートフィルですね。

この質問への反応(ブックマークコメント)

トラックバック

「あの人に答えてほしい」「この質問はあの人が答えられそう」というときに、回答リクエストを送ってみてましょう。

これ以上回答リクエストを送信することはできません。制限について

絞り込み :
はてなココの「ともだち」を表示します。
回答リクエストを送信したユーザーはいません