ROW関数について

質問

セルA5を番号1にして順番に番号振っていっています。
=ROW()-4をA5に入力しています。
行を追加した際に追加したセルより下のせるには連番が崩れず入っているのですが、
行を追加したセルには何も入っていない状態です。
行を追加と同時にそのセルに連番を追加することは可能でしょうか？

回答No.4

MackyNo1 · ベストアンサー

行の挿入時に自動的に数式も入力したいならテーブルの機能を使います。

そのリストを選択し(カーソルを置いて）、ホームタブの「テーブルとして書式設定」をクリックして適当な書式を選択してください。

＃上記の回答はExcel2007の場合の操作例を示しましたが、Officeソフトはバージョンによって使用できる機能や操作方法が大きく異なりますので、質問の際には必ずバージョンを明記しましょう。

回答No.3

tom04

こんばんは！
一番簡単な方法は行挿入後、一つ上のセルをオートフィルで下へコピーする方法だと思います。

それも面倒な場合はVBAになってしまいますが、一例です。

画面左下の操作したいSheet見出し上で右クリック　→　コードの表示　→　VBE画面に
↓のコードをコピー＆ペーストして行挿入してみてください。

Private Sub Worksheet_SelectionChange(ByVal Target As Range) 'この行から
Dim i As Long
i = Cells(Rows.Count, "A").End(xlUp).Row
Range(Cells(5, "A"), Cells(i, "A")).Formula = "=row()-4"
End Sub 'この行まで

※　行挿入時点では空白ですが、どこかのセルをクリックで選択すると連番が表示されます。m(_ _)m

回答No.2

K Kazz（@JazzCorp）

空行を追加するのではなく、上でも下でも、1行コピーしてそれを挿入し、上書きする。その程度の式なら問題なく使える。

回答No.1

asciiz

ROW関数については問題ないと思います。

問題は、複数行指定して、右クリック→挿入、とすると、『全て空欄の行(セル)』が入ることです。

でもそれは当たり前ですよね? 何もないはずのものを挿入したのに、あちこちのセルに勝手に式や値が入っていたら、それこそ気持ち悪い話です。

ですので、やり方としては、

(1)1行全体、あるいは挿入したいだけの複数行を選択
(2)右クリック→コピー
(3)右クリック→コピーしたセルの挿入

このようにすれば、式がコピーされて入るので、増えた行にもちゃんと番号が付きます。これでどうでしょう。