ヒント:他の言語はGoogle翻訳されています。 訪問することができます English このリンクのバージョン。
ログイン
x
or
x
x
LPI ID 登録
x

or

Excelで他のすべての行をすばやく削除する方法

Excelで他のすべての行や列をすばやく削除する場合は、最初に他の行や列をすばやく選択してから削除操作を適用する方法が主なポイントです。 そしてこの記事では、他のすべての行や列を最初に選択してから、それらをすばやく削除する方法についてのいくつかのトリッキーなことを示します。

フィルタコマンドを使用してExcelで他のすべての行を削除

ExcelでVBAコードを使用して他の行を1つずつ削除する

Kutools for Excelを使用してExcel内の他のすべての行または列を削除する


1行おきまたはn番目の行、列を選択して、一度に削除します

Kutools for Excel's インターバルの行と列の選択 ユーティリティを使用すると、1つおきまたはn番目の行または列を見つけて選択でき、必要に応じていくつかの操作を実行できます。 クリックしてExcelをダウンロードする


矢印青い右の泡 フィルタコマンドを使用してExcelで他のすべての行を削除


Microsoft Excelの フィルタ コマンドを使用すると、他の行をすばやくフィルタリングしてからすぐに削除することができます。次のようにしてください。

1。 元のデータ以外の空欄には、次のように入力します。 0,1,0,1 ...、0,1。 この場合、ヘルパーの列Cに数値を入力します。次のスクリーンショットを参照してください。

2。 列Cを選択し、 フィルタ 下のボタン データ タブ。 C1の横にある矢印ボタンをクリックして、 0すべてを選択します。 オプション。 スクリーンショットを見る:

3。 その後、1を含むすべての行が非表示になります。 表示されている行を0で選択し、 ホーム > 削除 > シートの行を削除する これらの行を削除します。 次に、他のすべての行を削除し、クリックする必要があります フィルタ ボタンをもう一度押すと、1の行だけが表示されます。 スクリーンショットを参照してください:

doc-delete-every-other-row5 -2 doc-delete-every-other-row12

4。 最後に、必要に応じてヘルパー列Cを削除することができます。


矢印青い右の泡 ExcelでVBAコードを使用して他の行を1つずつ削除する

実際、この問題を解決するにはVBAマクロも良い選択です。

1. 押したまま 他の + F11 Excelのキーを押して アプリケーション用Microsoft Visual Basic 窓。

2。 クリック インセット > モジュール、次のマクロを モジュール 窓。

VBAコード:選択範囲内の他のすべての行を削除:

Sub DeleteEveryOtherRow()
'Updateby20160122
Dim rng As Range
Dim InputRng As Range
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type:=8)
Application.ScreenUpdating = False
For i = InputRng.Rows.Count To 1 Step -2
    Set rng = InputRng.Cells(i, 1)
    rng.EntireRow.Delete
Next
Application.ScreenUpdating = True
End Sub

3. 押す F5 このマクロを実行するキー。 次に、範囲を選択するためのダイアログが表示されます。 スクリーンショットを見る:

4。 次に、をクリックします OK2行目から選択した範囲の他のすべての行が一度に削除されます。スクリーンショットを参照してください。

doc-delete-every-other-row5 -2 doc-delete-every-other-row12

矢印青い右の泡 Kutools for Excelを使用してExcel内の他のすべての行または列を削除する

VBAマクロを使用するMicrosoft Excelの初心者ユーザーにとっては、少し複雑です。 ザ インターバルの行と列の選択 の有用性 Kutools for Excel 他のすべての行をすばやく削除するのに役立ちます。

Kutools for Excel : 300便利なExcelアドイン以上で、60日以内に自由に試してみてください.

インストールした後 Kutools for Excel次のようにしてください:

1。 他のすべての行を削除する範囲を選択し、このユーティリティをクリックして適用します。 クツール > 選択します > インターバルの行と列を選択....

2。 で インターバルの行と列の選択 ダイアログボックスで、次に示すスクリーンショットのような設定を指定し、をクリックします。 OK ボタンを押して、他のすべての行を最初に選択します。

3。 次に、選択されている行が1つおきに選択されて強調表示されます。 スクリーンショットを見る:

4。 次に、選択した1行おきの行をすばやく削除するには、 ホーム > 削除 > シートの行を削除する これらの行をすべて削除します。 スクリーンショットを参照してください:

doc-delete-every-other-row5 -2 doc-delete-every-other-row12

クリックすると、間隔の行と列の選択機能の詳細が表示されます。

この機能を使用すると、必要に応じてn番目の行または列をすべて削除することもできます。

Excel用のKutoolsを今すぐダウンロードして無料でダウンロードできます!


矢印青い右の泡デモ:Kutools for Excelで他のすべての行や列を削除する

Kutools for Excel200便利なExcelアドイン以上で、60日に制限なく試してみることができます。 今すぐダウンロードして無料トライアル!


Kutools for Excelは、ほとんどの問題を解決し、生産性を80%向上させます

  • 再利用: すばやく挿入 複雑な数式、チャート そして、以前に使用したもの; セルを暗号化する パスワード付き メーリングリストの作成 そしてメールを送る...
  • スーパーフォーミュラバー (複数行のテキストや数式を簡単に編集する) レイアウトを読む (多数のセルを簡単に読んで編集できます)。 フィルター範囲に貼り付ける...
  • セル/行/列を結合 データを失うことなく; セルコンテンツの分割。 重複する行/列を結合する...重複セルの防止。 範囲の比較...
  • 重複または一意を選択します空白行を選択 (すべてのセルは空です)。 スーパー検索とファジー検索 多くのワークブックで。 ランダム選択
  • 完全コピー 式の参照を変更せずに複数のセル。 参照を自動作成 複数のシートに 箇条書きを挿入、チェックボックスなど
  • テキストを抽出、テキストの追加、位置による削除、 スペースを削除する; ページング小計の作成と印刷 セルのコンテンツとコメント間の変換...
  • スーパーフィルター (保存して他のシートにフィルタ方式を適用する)。 高度な並べ替え 月/週/日、頻度などによる。 特殊フィルター 太字、斜体で...
  • ワークブックとワークシートを組み合わせる; キー列に基づいて表をマージします。 データを複数のシートに分割する; xls、xlsx、およびPDFのバッチ変換...
  • 300を超える強力な機能。 Office / Excel 2007-2019および365をサポートします。 すべての言語をサポートします。 企業または組織に簡単に展開できます。 フル機能の30日間の無料トライアル。
KTEタブ201905

OfficeタブはOfficeにタブ付きインターフェイスを提供し、作業をより簡単にします

  • Word、Excel、PowerPointでタブ付き編集と読み取りを有効にする、出版社、アクセス、Visioおよびプロジェクト。
  • 新しいウィンドウではなく、同じウィンドウの新しいタブで複数のドキュメントを開いて作成します。
  • 生産性を50%向上させ、毎日数百回のマウスクリックを削減します。
オフィシタブ底
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Jeff · 1 years ago
    An easy way to put 0 or 1 in the column instead is to add a formula column: =IF(MOD(ROW(), 2) = 0, 0, 1). That might help if you'd rather not type 0,1,01, etc.
  • To post as a guest, your comment is unpublished.
    captainmorgan · 3 years ago
    another way is to add a new column in front of your data, so column A is blank, then just enter a b a b a b as you go down the rows in column A - so "a" in A1, "b" in A2, "a" in A3, "b" in A4. then you can drag the new "a" and "b" cells down for all rows of data. then sort column A alphabetically, and you get all the odd rows with an "a" at the top and all the even rows with a "b" at the bottom. this is probably the easiest way.
    • To post as a guest, your comment is unpublished.
      Lucille · 10 months ago
      You're genious :)
    • To post as a guest, your comment is unpublished.
      Lasty · 2 years ago
      Easiest? How is that different from the 0,1 method? ;-)
      • To post as a guest, your comment is unpublished.
        Fox East · 1 years ago
        This is actually very useful if you have a large number of rows and can't enter the 2 settings in manually. if you drag 0,1 down, it continues to 2, 3, 4...but if you drag a,b down, it will repeat as a,b,a,b...all the way down. Thanks!
  • To post as a guest, your comment is unpublished.
    Ducky · 4 years ago
    That would be great, except column C is all 0
  • To post as a guest, your comment is unpublished.
    JTB · 4 years ago
    This is really really helpful. thanks
  • To post as a guest, your comment is unpublished.
    AJ · 4 years ago
    Great trick...thank you. I love simple sneaky tricks like this
  • To post as a guest, your comment is unpublished.
    Marian Cody · 4 years ago
    This was really helpful. thanks,
  • To post as a guest, your comment is unpublished.
    Richarddddd · 4 years ago
    In cell B1: =row(A1)

    Drag this down all of column B.

    In cell C1: =mod(B1,2)

    Drag this down all of column C.

    Apply a filter and in column C select all 0s or 1s as required.
    • To post as a guest, your comment is unpublished.
      Liza · 4 years ago
      Richarddddd,

      Sneaky! I like that, and it was useful to me today. Thanks.