No.1ベストアンサー
- 回答日時:
たとえば2行おきの場合。
添付図:
隣列に,B1に数字の1,B2に数字の2を置いてB1:B2をオートフィルドラッグして連番を記入させます。
その下に,2行おきならまず2を記入,そして4を記入してオートフィルドラッグして2,4,6,8の数字を作ります。
AB列をB列昇順で並べ替えると出来上がりです。
n行置きの場合も同様に,B列下に継ぎ足す数字をnおきの数字に作って操作すれば出来ますね。
また,下に継ぎ足す数字の開始番号を調整すれば,どこから空を挿入するか微調整するのも容易です。
No.2
- 回答日時:
私がよくする方法です。
仮にA列を追加します。(A列を選択して右クリック⇒挿入)
A1に 1 ,A2に 2 を入力
A3に =A1+3 を入力
A3をコピーし、元のデータが入力されている最終行まで貼り付ける(A列には1 2 4 5 7 ・・・と入るはずです)
A列の貼り付けた下に3を入力
その下に =(上記で入力したセル)+3 を入力 コピー
必要なだけA列のその下に貼り付け(3 5 8 ・・・となるはず)
A列を選択⇒コピー⇒値を貼り付ける
表全体を選択⇒A列を優先し昇順で並べ替え
A列を選択⇒削除
文字で書けば長ったらしいですが、一旦やってみればすぐに出来ます。
No.3
- 回答日時:
1、一番左に列を一列追加します
2、追加したA列のセルに以下のように値と数式を入れます
A1 1
A2 1
A3 =IF(A1=A2,A2+1,A2)
A4以降 A3をコピーして貼り付け
これで左端に「1 1 2 2 3 3 4 4 5 5...」という並びができます。
3、A列の一番下に「1 2 3 4 5...」と値を入れます
(「=A1+1」のような数式を使ってください)
4、A列全体を選んで「コピー」→「形式を選択して貼り付け」で「値」で貼り付けます
5、「並び替え」でA列をキーに昇順で並び替えます
以上です。
No.4
- 回答日時:
数式などを使用せず、補助列に簡単な文字列を使って直感的なオートフィル操作で空白行を入れるなら、以下のような操作が簡単かもしれません。
2行に1行空白行を挿入するなら、補助列の一番上に「1a」「1b」と入力して、この2つのセルをオートフィルコピー(セルの右下をダブルクリック)します。
その下のセルには「1c」と入力して下方向にオートフィルします。
これでこの列を基準に昇順に並べ替えてみてください。
No.5
- 回答日時:
マクロ例です。
対象シートタブで右クリック→コードの表示→以下のコード貼り付け→F5キー押下(2000行なので少し間が空きます)
Sub 行数毎に空白行挿入()
Application.ScreenUpdating = False
行数 = 2
Range("A1").Select
Do While ActiveCell.Offset(行数).Value <> ""
ActiveCell.Offset(行数, 0).Rows("1:1").EntireRow.Select
Selection.Insert Shift:=xlDown
ActiveCell.Offset(行数 - 1).Select
Loop
Application.ScreenUpdating = True
End Sub
No.6
- 回答日時:
こんばんは!
一例です。
ごくごく簡単なVBAです
Sub test()
Dim i As Long
i = 1
Do Until Cells(i * 3, 1) = ""
Rows(i * 3).Insert (xlDown)
i = i + 1
Loop
End Sub
こんな感じではどうでしょうか?m(__)m
No.7
- 回答日時:
普通はVBAでやりますでしょう。
オートフィル+並べ替えも工夫してできると思う。
ーー
関数なら
例データ
シート1にA1:A9・・・・に
1
2
3
4
5
6
7
8
9
・・・
Sheet2のA1に
=IF(MOD(ROW(),3)=0,"",INDEX(Sheet1!$A$1:$A$100,ROW()-INT(ROW()/3)))
下方向に式を複写して
結果
1
2
3
4
5
6
7
8
9
10
まずわかりやすいように1列だけでやっているが、複数列の場合
INDEX関数の列を指定するところへ
=IF(MOD(ROW(),3)=0,"",INDEX(Sheet1!$A$1:$D$100,ROW()-INT(ROW()/3),COLUMN()))
として
Sheet1のデータ
111
212
313
414
515
616
717
818
919
1020
1121
1222
ーーー
Sheet2の結果
111
212
313
414
515
616
717
818
919
1020
のようにできる。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) エクセルについて教えてください。 3 2023/06/28 09:11
- Visual Basic(VBA) 追記する列を増やしたい 2つのデータを検索・照合して元データにないデータを下記マクロで商品名を追記し 9 2022/10/05 10:50
- Excel(エクセル) エクセルで最下行にデータを追加するVBA 6 2023/05/09 09:30
- Visual Basic(VBA) 【VBA】Excelで罫線を引きたい 3 2022/07/14 12:04
- Visual Basic(VBA) 列と行の名前(重複あり)が交差するセルに、データを入力したい 1 2022/06/18 21:20
- Excel(エクセル) Excelマクロ 差分抽出の方法が知りたいです。 2 2023/03/07 13:25
- その他(Microsoft Office) マクロVBAについて 1 2022/09/06 18:12
- Excel(エクセル) 【VBA】A列にある連続したデータの1番下に文字列を入力したい 1 2023/01/28 04:40
- Access(アクセス) Accessのクエリの結果を、既存のエクセルに追加したい 2 2022/07/31 22:44
- Visual Basic(VBA) ユーザーフォーム「frm_基本❶」を立ち上げると新規で入力する行数を右下のNoとして表示しています。 1 2023/03/16 19:02
このQ&Aを見た人はこんなQ&Aも見ています
-
外出時に「待たせる妻」vs イライラする「待つ夫」は日本だけ?見習いたい海外事情
夫の家事参加に積極的なイメージのある海外でも、同様の事例はあるのか。結婚カウンセラーの佐竹悦子さんに伺ってみた。
-
Excelで一行おきに2行の空白行を挿入したい
その他(Microsoft Office)
-
エクセルの表で10行毎に1行づず新しい行を挿入する方法
Excel(エクセル)
-
【エクセル】2行に一行のように、規則的に行を新規挿入したい
Excel(エクセル)
-
-
4
Excelで行ごとコピー、同じ行を3行にしたい
Excel(エクセル)
-
5
エクセルで、2種類のデータを交互に入れなおす方法はありますでしょうか??
Excel(エクセル)
-
6
エクセルで1個飛ばしで、一括でコピペする方法は有りますか?
Excel(エクセル)
-
7
エクセルで長い行を5行ごとに1列にするには?
Excel(エクセル)
-
8
エクセルで一列おきに空白列を入れたい
Excel(エクセル)
-
9
エクセル1行おきのセルを隣の列の一つ上に移動したい
Excel(エクセル)
-
10
エクセルで縦に11122233‥と入力したいのですが。
Excel(エクセル)
-
11
excel: 2行ずつ間隔を空けて関数をペーストする方法
Excel(エクセル)
-
12
2つの表を交互に合体させたい!
Excel(エクセル)
-
13
EXCELで、セル間隔をあけて貼り付けしたい。
Excel(エクセル)
-
14
EXCELで2列を参照し、重複するものを横に並べたい
Excel(エクセル)
-
15
Excel VBAでn行毎に行の選択
Excel(エクセル)
-
16
エクセルで複数行ずつ連続データを入力する方法
Excel(エクセル)
-
17
EXCELで条件付き書式で空白セルの時は塗りつぶし無しにする方法
Excel(エクセル)
-
18
Excelでコピーした行の挿入を繰り返すには
Excel(エクセル)
-
19
エクセル:マクロ「Application.CutCopyMode = False」って?
Excel(エクセル)
-
20
ある範囲のセルから任意の値を検索して、その隣のセルの値を取得するという関数はありますか?
Excel(エクセル)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
エクセルで日付の入ったセルの...
-
エクセルでセルに「氏名を入力...
-
Excel ウインドウ枠の固定をす...
-
Excelファイルの「数式」タブ→...
-
関数を教えて下さい。
-
スマートな関数を教えて下さい。
-
EXACT関数とIF関数の組み合わせ...
-
スプレッドシートの関数VLOOKUP...
-
Excelのif関数で文字が見えなく...
-
Excel 2019 のピボットテーブル...
-
Excel 2019 は、SPILL機能があ...
-
各ページの1番上の表示について
-
写真のコピー
-
条件付き書式を教えてください
-
INDEX関数やMATCH関数で値を取...
-
エクセル グラフ軸について
-
excelの不要な行の削除ができな...
-
Excelで行をコピー、同じ行内に...
-
エクセル関数に詳しい方、教え...
-
Excel 改ページの文字色の変更...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
ファイル内にある数字の出現回...
-
Excel関数の先頭に「@」が入っ...
-
エクセルの気味悪い不思議
-
Excel VBAで、実行時にsheet上...
-
表示されている人数だけを数え...
-
他人が作ったマクロの理解
-
Excelの関数について質問です。
-
Excel 集計表
-
エクセル 日時の計算式について
-
Excelの関数に関して質問です。...
-
エクセル:セル内の文字列の下...
-
絞り込み検索
-
エクセルの関数で
-
エクセルの書式設定について教...
-
余分なEXCELファイルに印刷され...
-
VBA 同一シート内での転記の仕方
-
長期休みの関数はありますか
-
Excelの空のセル
-
エクセルで入力してある文を別...
-
Excelのマクロで、セルを結合し...
おすすめ情報