メイン マイクロソフトオフィス Microsoft Excel で空白の列をすべて削除する方法

Microsoft Excel で空白の列をすべて削除する方法



Microsoft Excel ファイルの空白の列を削除する方法は複数あります。なぜこれを行う必要があるのですか? – シンプル。

Microsoft Excel で空白の列をすべて削除する方法

ときどき、Web ページからインポートしたデータによって、使用されていない場合でも大量の列が表示されることがあります。これは、CSV ファイルと .txt ファイルでも同じくらい頻繁に発生します。

その場合、手動で列を削除するのは必ずしも容易ではありません。もちろん、空の列が 2 つか 3 つしかない場合は、手動で削除しても問題ありません。しかし、インポートしたプロジェクトが 57 の空の不連続な列を作成した場合はどうなるでしょうか? – そのためには、自動化されたプロセスが必要です。

VBA マクロの使用

最初の方法では、VBA マクロを使用します。

  1. Excel ファイルに移動します。
  2. Alt と F11 を同時に押します。
  3. Microsoft Visual Basic for Applications ウィンドウが表示されるまで待ちます。
  4. [挿入] をクリックします。
  5. モジュールを選択します。
  6. 次のコード行をウィンドウに貼り付けます。
    Sub DeleteEmptyColumns()
    'Updateby20140317
    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.Columns.Count To 1 Step -1
    Set rng = InputRng.Cells(1, i).EntireColumn
    If Application.WorksheetFunction.CountA(rng) = 0 Then
    rng.Delete
    End If
    Next
    Application.ScreenUpdating = True
    End Sub

  7. F5 キーを押して、マクロをコンパイルして実行します。
  8. ダイアログウィンドウに適切な作業範囲を入力します。


    作業範囲またはデータ範囲は、対象とする列間の特定の間隔です。形式は $A:$J です。文字は列に対応し、数字は行に対応します。

    これをマウスでドラッグするか、Shift キーを押しながら矢印キーを使用してドラッグすると、次のことがわかります。

    $A – トップコーナー
    $J – 下隅

    マクロは選択されたままにならないため、マクロのアップロードを開始する前にデータ範囲を選択することはできません。
  9. OK を押します。

その後、空の列をすべて消去し、塗りつぶされた列をすべて隣り合わせに配置する必要があります。

Xbox One で Apple Music を再生する方法

Excel ツールの使用

明らかに、優れたソート機能がなければ、Excel はそれほど強力ではありません。 [削除] ドロップダウン メニューを使用して、行全体、列全体、または空白セルを削除できます。

  1. 最初にデータ範囲を選択します
  2. F5 キーを押す
  3. クリックスペシャル
  4. ブランクオプションを選択
  5. [OK] をクリックします (これを選択すると、対象範囲内のすべての空白セルが選択されます)
  6. [ホーム] タブに移動
  7. [セル] ツール グループの下にある [削除] ドロップダウン メニューを選択します。
  8. セルの削除を選択
  9. 列を削除および再配置するには、[セルを左にシフト] を選択します
  10. [OK] をクリックします

これで、空白の列の空白のセルが消え、他のすべての行が互いに近づきます。

同じアプローチを使用して、行全体を削除できます。ただし、セルを左に移動する代わりに、他のオプションを選択します。

新しいタブページのグーグルクロームを変更する方法
行を削除および再配置するには、[セルを上にシフト] を選択します

実行している Excel のバージョンに応じて、異なる表現が表示される場合があります。ただし、いずれの場合でも、[セルの削除] メニューの上位 2 つのオプションは常に同じです。

このメソッドは、選択範囲内のすべての空白セルを削除しなくなりました。 Excel 2013 より前では、これにより、空の行でさえ誤って削除され、通常は並べ替えが台無しになりました。

これで問題は発生しなくなりました。したがって、行も削除したい場合は、データ範囲をもう一度選択して前の手順に従ってください。次に、セルを左ではなく上にシフトまたは削除することを選択します。

Facebookのプロフィールを他の人として表示する方法

その他の簡単な仕分け作業

技術的には Excel ツールバーを使用して空の列と行を削除する方が簡単に見えますが、VBA マクロの方法は絶対確実です。

同じ VBA モジュールまたは Go To 関数メニューを使用すると、Excel でさらに多くのことができます。もはや関係のない特定の式がありますか? – 同様に、それらを削除するか、それに応じて並べ替えることができます。

プレゼンテーション中に表示したくない場合は、不要なコメントまたはすべてのコメントをプロジェクトから削除することもできます。 Excel のパワー ユーザーになりたい場合は、VBA を調べてください。

最終的な考え

長年にわたり、さまざまなアドオンがオンラインで登場してきました。それらのいくつかでは、大きなスプレッドシートを並べ替えるときに、さらに多くのショートカットを使用できます。ただし、これらのアプリは無料であることはめったになく、空白の行、セル、列を削除するなどの簡単なタスクを行う価値はありません。

それに、そんなに難しいなら、マイクロソフトは今までにプロセスをさらに簡素化するか、Excel の並べ替えに関するさらに広範なガイドを作成していたでしょう。

興味深い記事

エディターズチョイス

エーペックスレジェンドの言語を変更する方法
エーペックスレジェンドの言語を変更する方法
エーペックスレジェンドシーズン10が本格化し、世界中から何百万人もの人々が参加しています。ゲームは、そのような幅広い言語のシームレスな体験を保証するために選択できる幅広い言語を提供します
Windows10がWi-Fiよりもセルラーデータを優先するようにする方法
Windows10がWi-Fiよりもセルラーデータを優先するようにする方法
Microsoftは、接続の優先順位を変更できるようにしたため、Windows10ではWi-Fiよりもセルラーネットワークが優先されます。
アクティベーションロックiPhoneのロックを解除する方法
アクティベーションロックiPhoneのロックを解除する方法
iCloudのパスワードなしでiPhoneのアクティベーションロックを解除するにはどうすればよいですか? iOS 7 には、Find My iPhone と呼ばれる Apple による盗難防止機能があり、Apple ID を自分のデバイスに関連付けるサービスがあります。
インターネット サービス プロバイダー (ISP)
インターネット サービス プロバイダー (ISP)
インターネット サービス プロバイダー (ISP) は、インターネット サービスを提供する会社です。 ISP の仕組みと利用可能なさまざまなタイプについて学びます。
Apple CarPlayが動作しないときに修正する11の方法
Apple CarPlayが動作しないときに修正する11の方法
Apple CarPlay が接続できない場合、または機能しない場合に修復する方法について説明します。設定の確認や Siri の有効化など、実績のあるトラブルシューティング手順を試してください。
HP ラップトップでスクリーンショットを撮る方法
HP ラップトップでスクリーンショットを撮る方法
HP デバイスの画面をキャプチャする必要がありますか? HP ラップトップおよびタブレットでスクリーンショットを撮る方法またはスクリーンを印刷する方法は次のとおりです。
ペイント3D:任意の角度から編集できます
ペイント3D:任意の角度から編集できます
最近の更新で、MicrosoftはPaint 3Dアプリに新機能を追加しました。これにより、アプリは3Dコンテンツの編集がはるかに簡単になります。何が変わったか見てみましょう。 Windows 10には、ペイント3Dと呼ばれる新しいユニバーサル(UWP)アプリが付属しています。名前にもかかわらず、アプリは古典的なMSの適切な継続ではありません