No.1ベストアンサー
- 回答日時:
こんにちは。
間に1行づつ挿入するって意味でしょうか?
下記マクロでA列にデータがある場合、偶数行に1行挿入します。
i Mod 2 <> 0 にすれば奇数行になるハズです。
i = 1 を変えれば開始行を変更出来ます。
.Range("A" & i) の "A" を変えれば データ列を変えられます。
必ずテスト環境で試して下さい。
Sub test()
Dim i As Long
i = 1
With ActiveSheet
Do While .Range("A" & i) <> ""
If i Mod 2 = 0 Then
.Rows(i).Insert
End If
i = i + 1
Loop
End With
End Sub
No.3
- 回答日時:
VBAで#1に既にご回答がありますが、もう少し短く
Sub test01()
For i = 1 To 100
Cells(i * 2, 1).Select
Selection.EntireRow.Insert
Next i
End Sub
で出来ます。
ご納得はA1~A100まで1~100までの数を入れる。
(A1に1、A2に2を入力。A1:A2を+でA100まで引っ張る。)そして上記を実行。
No.2
- 回答日時:
こんばんは!
1案
・データ列の隣の空き列に1~300(データ末行)まで連番を
ふって下さい
(1 2 と入力した2行を選択してオートフィル)
・同列のデータ末の次の行から1.5~300.5まで+1ずつ
連番をふって下さい
(1.5 2.5 と入力した2行を選択してオートフィル)
・データ列+連番列までを選択 データ 並べ替え
昇順 優先キーを連番列に指定
・並べ終わったら 連番列を削除
で試してみて下さい
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- その他(Microsoft Office) 関数を教えてください 1 2022/12/13 15:56
- Access(アクセス) Accessのクエリの結果を、既存のエクセルに追加したい 2 2022/07/31 22:44
- Excel(エクセル) エクセルについて 6 2022/11/29 14:07
- ホームページ作成・プログラミング 秀丸に関して教えて下さい。 1 2022/06/30 10:00
- Excel(エクセル) 特定文字(数字)で行挿入、挿入された行で合計したい 2 2023/03/13 14:30
- Excel(エクセル) エクセルについて質問です。 計算式などが入ったエクセルに行(項目)を増やしたいとき、普通に行を挿入し 3 2023/01/25 16:01
- PowerPoint(パワーポイント) パワーポイント アニメーションで挿入したグループを消すことは可能ですか? 2 2022/12/11 05:12
- Excel(エクセル) フォルダ内の全ブックのシート名を変更したい 7 2022/09/22 21:34
- Excel(エクセル) 非表示にしたい行をグループ化して折り畳み 4 2022/09/17 20:17
- Excel(エクセル) Excel VBA 空白行があるセル範囲に色を付ける 3 2022/06/13 15:58
関連するカテゴリからQ&Aを探す
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
エクセルで日付から日にちを削...
-
複数の条件に合う行番号を取得...
-
エクセルで1列に500行並んだデ...
-
Excelで2行単位のソートの出来...
-
excel:別シートの値を飛び飛び...
-
エクセルで、重複データを除外...
-
Excelの30個ずつの平均値の出し方
-
Excelで2つのデータの突合せを...
-
Countifよりも早く重複数をカウ...
-
本日の日付を超えているものを...
-
【VBA】A列にある連続したデー...
-
マクロ コピー貼り付けと重複デ...
-
エクセルのマクロ Range("A1")...
-
エクセル 複数の文字列を別シ...
-
エクセルVBA C列に特定の文字列...
-
Excel 列データのランダムな並...
-
エクセルで、特定の文字を含む...
-
EXCELでの重複データカウント方...
-
エクセルデータの比較をしたい。
-
エクセル2003でマクロでマクロ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
エクセルで1列に500行並んだデ...
-
エクセルで日付から日にちを削...
-
Excelで2つのデータの突合せを...
-
Excelで2行単位のソートの出来...
-
複数の条件に合う行番号を取得...
-
excel:別シートの値を飛び飛び...
-
エクセルで、重複データを除外...
-
Countifよりも早く重複数をカウ...
-
Excelの30個ずつの平均値の出し方
-
VBA 数式を最終行までコピー
-
エクセルVBA C列に特定の文字列...
-
エクセルで横並びの複数データ...
-
エクセル2016にて、行挿入&コピ...
-
【Excel】小計単位で並べ替えを...
-
VBA 大きなtxtテキストファ...
-
500行の中から、多い順に抽出す...
-
エクセル~空白のセルのある行...
-
エクセルで1つの会社名に対して...
-
【エクセル】1列内に複数ある同...
-
Excel VBA 空白セル以下のデー...
おすすめ情報