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

Microsoft Excelファイルの空白列を削除する方法は、複数存在します。なぜこんなことをする必要があるのでしょうか?

ウェブページからインポートしたデータは、使用されていないにもかかわらず、非常に多くの列が表示されることが時々あります。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 ステップ -1
    セットrng = InputRng.Cells(1, i).EntireColumn
    If Application.WorksheetFunction.CountA(rng) = 0 Then
    rng.Delete(削除
    End If
    次へ
    Application.ScreenUpdating = True
    エンドサブ
  7. F5キーを押して、マクロをコンパイルし、実行します。
  8. ダイアログウィンドウに適切なワークレンジを入力します。

    作業範囲またはデータ範囲は、対象とする列の特定の間隔です。フォーマットは$A$1:$J$12で、文字が列、数字が行に相当します。

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

    $A$1 – 上角
    J$12 – 下端

    マクロのアップロードを開始する前にデータ範囲を選択すると、選択されたままにならないので、選択しないようにします。

  9. OKを押す。

その後、すべての空の列が消去され、すべての塗りつぶされた列が互いに隣り合っているはずです。

Excelのツールを使って空白の列を削除する

もちろん、Excelには優れたソート機能がなければ、このような強力なツールにはなりません。あなたは全体の行、列、または空白のセルを削除するために削除ドロップダウンメニューを使用することができます。

  1. まず、データ範囲を選択し、F5キーを押します。
  2. 次に、Specialをクリックします。
  3. ここで、「空白」オプションを選択します。
  4. OKをクリックします(この選択により、対象となる範囲内のすべての空白セルが選択されることになります)。
  5. ホーム」タブに移動します。
  6. セル」ツール・グループの「削除」ドロップダウン・メニューを選択します。
  7. セルの削除] を選択します。
  8. 列の削除と並べ替えのために、「左方向にシフトするセル」を選択します。
  9. OKをクリックします。

これで、空白の列から空のセルが消え、他のすべての行が近くに移動しているはずです。

同じ方法で、行全体を削除することができます。ただし、セルを左に移動させるのではなく、もう一方のオプションを選択します。

行の削除と並べ替えには、「セルを上に移動する」を選択します。

お使いのExcelのバージョンによっては、異なる文言が表示される場合があります。しかし、いずれにせよ、「セルの削除」メニューの上位2つのオプションは常に同じものです。

この方法では、選択範囲内のすべての空白セルが削除されなくなりました。Excel 2013以前は、この方法によって不注意に空の行まで削除されてしまい、一般に並べ替えがめちゃくちゃになっていました。

現在では、この問題は発生しなくなりました。したがって、行も取り除きたい場合は、データ範囲を再度選択し、前の手順を実行することで行うことができます。その後、単に左の代わりに上にセルをシフトまたは削除するために選択します。

Androidで空白の列を削除する

Windows、Mac、Android上のExcelで空白の列を削除するためのプロセスは似ていますが、ここではAndroid上でそれを行うの簡単な概要です.

  1. 編集したいExcelのスプレッドシートを開き、編集したい列の見出しにカーソルを合わせます。
  2. ここで、表示されるメニューから「削除 」を選択します。

その他の簡単な並べ替えタスク

技術的にはExcelのツールバーを使って空の列や行を削除する方が簡単そうに見えますが、VBAマクロの方法は確実なので、古いMicrosoft Excelのバージョンでも使用することができます。

同じVBAモジュールやGo To機能メニューを使えば、Excelでできることはもっとたくさんあります。不要になった数式があれば、それを削除したり、並べ替えたりすることができます。

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

最後に

ここ数年で、様々なアドオンがネット上に登場しました。中には、大きなスプレッドシートをソートする際に、さらにショートカットを可能にするものもあります。しかし、これらのアプリはほとんど無料で、空白の行、セル、列を削除するような単純なタスクのために苦労する価値はありません。

それに、そんなに難しいなら、Microsoftは今頃、さらにプロセスを簡素化するか、Excelの並べ替えに関するさらに広範なガイドを作成しているはずです。

Scroll to Top