Excelからマクロを削除する方法(完全ガイド)
Microsoft Excel は、マクロという形で強力な機能を提供しています。このマクロを使用すると、繰り返しのタスクを自動化でき、Excel の標準機能では実現できない多くの操作を行うことができます。しかし、これらのマクロが不要になったり、特にワークブックを他人と共有する際に潜在的なセキュリティリスクを引き起こす場合があります。このような状況では、マクロを安全かつ効果的に削除する方法を理解することが不可欠です。このガイドでは、Excel ワークブックからマクロを削除するさまざまな方法を詳しく説明し、必要なときにクリーンで整理されたファイルを確保できるようにします。
Excelでマクロを削除する前に知っておくべきこと
- マクロが有効なワークブックを開き、マクロを削除しようとする場合、まずワークブックの「コンテンツの有効化」ボタンをクリックする必要があります。これを実行して初めて、マクロを削除できるようになります。
注釈: このボタンが表示されない場合、それはマクロを削除して進めるためのグリーンライトです。このボタンが表示されない理由は、自分でマクロを埋め込んだワークブックを作成し、保存した場合かもしれません。同じコンピュータでそのワークブックを再開し、Excelの設定が変更されていない場合、「コンテンツの有効化」ボタンは通常表示されません。これは、ファイルが信頼できるソース(あなた)から来ており、信頼できる場所(あなたのコンピュータ)に保存されているためです。
- マクロを一度削除すると、復元はできません。作業内容を保護するために、マクロを削除する前にワークブックのバックアップコピーを作成することをお勧めします。
特定のマクロを削除
ステップ1: マクロダイアログボックスを開く
開発タブに移動し、マクロを選択してマクロダイアログボックスを開きます。(開発タブがExcelに表示されていない場合は、手順後の注記を参照してください。)
- Excel 2013以降のバージョンを使用している場合、マクロボタンは表示タブ内にもあります。
- ショートカット愛好家は、Alt + F8 を直接押してマクロダイアログボックスにアクセスできます。
ステップ 2: 特定のマクロを選択して削除する
- 「Macros in」のドロップダウンメニューを展開し、マクロを削除する対象の場所を選択してください。
- マクロの一覧から、削除したいマクロを選択します。
- 「削除」をクリックします。
注記:
- 追加するには 開発者 Excelのリボンにタブを追加するには、次の手順に従ってください:
- リボンの任意の場所を右クリックし、「リボンのユーザー設定…」を選択します。
- 表示されたウィンドウの右側にあるメインタブの一覧で、Developer の横にあるチェックボックスをオンにし、OK をクリックします。
- リボンの任意の場所を右クリックし、「リボンのユーザー設定…」を選択します。
- 複数のマクロを削除する場合、個々のマクロごとに上記のプロセスを繰り返す必要があります。すべてのマクロを一括で削除する手順については、次のセクションに進んでください。
xlsx形式でファイルを保存することにより、ワークブックからすべてのマクロを削除します
「Excel ブック (*.xlsx)」形式は、本質的にマクロをサポートしていません。そのため、この特定の形式でワークブックを保存すると、すべての埋め込みマクロが自動的に削除されます。この方法を実行するには、次の手順に従ってください:
- 「ファイル」>「名前を付けて保存」に移動します。
- ファイルの種類のドロップダウンメニューを展開し、「Excel ブック (*.xlsx)" 形式。
ヒント: ドロップダウンメニューの上にあるテキストボックスに、新しい .xlsx ファイル名を入力できます。ファイルを別の場所に保存するには、参照をクリックします。
- クリック 保存.
注: 「名前を付けて保存」のインターフェースは、Excelのバージョンによって異なる場合があります。上記のようにファイル形式を選択できる右ペインが表示されない場合は、常に「参照」をクリックしてから「Excel ブック (*.xlsx)」形式を選択してください。
- 表示されるプロンプトボックスで、「はい」を選択します。
結果
その結果、マクロなしの新しい「.xlsx」形式のファイルが保存されます。この .xlsx ファイルは、元の .xlsm ファイルの名前を引き継ぎ、同じ場所に保存されます。
注: この方法では、UserForms、Excel 5/95 ダイアログシート、および同様の要素は削除されません。これらを削除する場合は、次の方法をご参照ください。
Kutoolsが提供するワンクリックオプションを使用して、ワークブックからすべてのマクロを削除します。
Kutools for Excelは、高度なExcelアドインであり、ユーザーにワークブックに埋め込まれたすべてのマクロを簡単に削除するための一クリックオプションを提供します。ワンクリックで、VBAモジュール、UserForms、Excel 5/95ダイアログシート、およびExcel 4 XLMマクロワークシートを一括して削除できます。
削除したいマクロを含むワークブックを開いたら、Kutoolsタブに移動し、削除 > すべてのマクロを削除を選択します。これで完了です!
注釈: この機能にアクセスしたいですか?今すぐKutools for Excelをダウンロードしてください!さらに、Kutoolsには300以上の多岐にわたる機能があり、30日間の無料試用も提供しています。お待たせせず、ぜひ今日お試しください!
VBAを使用してフォルダ内のすべてのワークブックからマクロを削除
このセクションでは、VBAマクロを使用して指定されたフォルダ内のすべてのワークブックからマクロを効率的に削除する方法を実演します。
- ファイル > オプション > セキュリティセンター > セキュリティセンターの設定 > マクロの設定 に移動し、「VBAプロジェクトオブジェクトモデルへのアクセスを信頼する」オプションを選択します。
- 指定されたフォルダ内のワークブックが開いていない状態でこのVBAを実行してください。開いているワークブックがある状態で実行すると、エラーが発生する可能性があります。
ステップ1:新しいモジュールを作成
- Alt + F11 を押して、Visual Basic for Applications (VBA) エディターを開きます。
- 挿入をクリックして > モジュールで新しいモジュールを作成します。
ステップ 2: VBAコードをモジュールウィンドウにコピーする
以下のVBAコードをコピーして、開かれたモジュール ウィンドウに貼り付けてください。
Sub RemoveMacrosFromWorkbooks()
' Update by ExtendOffice
Dim wb As Workbook
Dim FolderPath As String
Dim filename As String
Dim VBComp As Object
Dim VBProj As Object
With Application.FileDialog(msoFileDialogFolderPicker)
.title = "Select a folder"
.Show
If .SelectedItems.Count = 0 Then
MsgBox "No folder selected. The procedure will exit.", vbExclamation
Exit Sub
End If
FolderPath = .SelectedItems(1)
End With
If Right(FolderPath, 1) <> "\" Then FolderPath = FolderPath + "\"
filename = Dir(FolderPath & "*.xls*")
Application.ScreenUpdating = False
Application.DisplayAlerts = False
On Error Resume Next
Do While filename <> ""
Set wb = Workbooks.Open(FolderPath & filename)
If wb.HasVBProject Then
Set VBProj = wb.VBProject
For Each VBComp In VBProj.VBComponents
VBProj.VBComponents.Remove VBComp
Next VBComp
End If
wb.Close SaveChanges:=True
filename = Dir
Loop
Application.ScreenUpdating = True
Application.DisplayAlerts = True
MsgBox "Macros removal completed!", vbInformation
End Sub
ステップ 3: VBA コードを実行する
- において モジュール ウィンドウで「press」 F5 またはクリックしてください
貼り付けられたコードを実行するためのボタン。
- 表示される「フォルダを選択」ウィンドウで、マクロを削除するワークブックが含まれているフォルダを選択し、OKをクリックします。
結果
選択したフォルダ内のすべてのExcelファイルの処理が完了し、それらからマクロが削除されると、「マクロの削除が完了しました!」というメッセージボックスが表示されます。
注記:
- この方法では、UserForms、Excel 5/95のダイアログシート、および同様の要素は削除されません。これらを削除する場合は、次の方法をご参照ください。
- 「VBAプロジェクトのオブジェクトモデルへの信頼アクセス」オプションを有効にすると、セキュリティ上のリスクが生じる可能性があります。このコードを実行している間だけオプションを有効にすることをお勧めします。コードの実行が完了したら、「VBAプロジェクトのオブジェクトモデルへの信頼アクセス」オプションを必ずオフにしてください。
Kutoolsで特定のワークブックからすべてのマクロを削除する
Kutools for Excelは、複数のワークブックからすべてのマクロを削除するための使いやすい方法を提供します。VBA技術に不慣れまたは不安がある方にとって、Kutoolsは理想的な代替手段です。このツールを使用すれば、VBAモジュール、UserForms、Excel 5/95ダイアログシート、およびExcel 4 XLMマクロワークシートを簡単に削除できます。
注: この機能を実行するには、VBAプロジェクトオブジェクトモデルへのアクセスを信頼する必要があります。Excelでは、[ファイル] > [オプション] > [トラストセンター] > [トラストセンターの設定] > [マクロの設定] に移動し、「VBAプロジェクトオブジェクトモデルへのアクセスを信頼する」オプションを選択してください。
Kutools for Excel をダウンロードしてインストールした後、次の手順に進みます。
- Kutools > 削除 > 一括ですべてのマクロを削除 を選択します。
- において 一括ですべてのマクロを削除 表示されるダイアログボックスでは、マクロの削除対象としてすべての開いているワークブックがリストされます。次にやるべきことは以下の通りです:
- さらにマクロを削除するワークブックを追加するには、[追加] ボタンをクリックし、[ファイル] または [フォルダ] を選択します。
- マクロの削除プロセスから除外したいワークブックがある場合は、クリックしてください
それらを削除するためのボタン。
- ダイアログボックスにマクロの削除対象となるすべてのワークブックをリストしたら、「OK」をクリックします。
結果
新しいダイアログボックスが表示され、Kutoolsがマクロの削除のために処理したワークブックの数が示されます。押すと OK自動的にまとめられたワークブックが生成され、結果が概説されます。
注記:
- この機能にアクセスしたいですか?今すぐKutools for Excelをダウンロードしましょう!さらに、Kutoolsは300以上のその他の機能を提供しています。30日間の無料トライアルがあり、待つ理由はありません。今日からお試しください!
- 「VBAプロジェクトのオブジェクトモデルへの信頼アクセス」オプションを有効にすると、セキュリティ上のリスクが生じる可能性があります。この機能を実行している間だけオプションを有効にすることをお勧めします。機能の実行が完了したら、「VBAプロジェクトのオブジェクトモデルへの信頼アクセス」オプションを必ずオフにしてください。
上記は、Excelでマクロを削除するためのすべての関連コンテンツです。このチュートリアルが役に立つことを願っています。さらに多くのExcelのヒントやテクニックを探求したい場合は、ここをクリックして、数千以上のチュートリアルからなる私たちの広範なコレクションにアクセスしてください。
関連記事
最高のオフィス生産性ツール
🤖 | Kutools AI Aide:データ分析を革新:インテリジェント実行 | コード生成 | カスタム数式の作成 | データを分析してグラフを生成 | Kutools Functions を呼び出す… |
人気機能:重複の検索・ハイライト・マーキング | 空白行を削除 | データを失わず列やセルを統合 | 丸める ... | |
スーパーLOOKUP:複数条件VLOOKUP | 複数値VLOOKUP | 複数シートの検索 | ファジーマッチ .... | |
高度なドロップダウンリスト:すばやくドロップダウンリストを作成 | 依存型ドロップダウンリスト | 複数選択ドロップダウンリスト .... | |
列の管理:特定数の列を追加 | 列を移動 | 非表示列の表示状態を切り替え | 範囲と列の比較 ... | |
注目機能:グリッドフォーカス | デザインビュー | 強化された数式バー | ワークブック&ワークシートの管理 | オートテキスト ライブラリ (Auto Text) | 日付ピッカー | データの統合 | セルの暗号化/復号化 | リスト送信で電子メールを送信 | スーパーフィルター | 特殊フィルタ(太字/斜体/取り消し線でフィルタ...) | |
トップ15ツールセット:12 種類のテキストツール(テキストの追加、特定の文字を削除など) | 50 種以上のグラフ タイプ(ガントチャートなど) | 40を超える実用的な 数式(誕生日に基づいて年齢を計算する、など) | 19種の 挿入ツール(QRコードの挿入、パスから画像の挿入など) | 12種類の 変換ツール(単語に変換する、通貨変換など) | 7つの 結合&分割ツール(高度な行のマージ、セルの分割など) | ...さらに多数 |
Kutools for ExcelでExcelスキルを強化し、かつてない効率を体験しましょう。 Kutools for Excelは300以上の高度な機能で生産性向上と時間短縮を実現します。最も必要な機能を今すぐ取得...
Office TabはOfficeにタブ表示を追加し、作業効率を大幅に向上させます
- Word、Excel、PowerPointでタブ編集とタブ閲覧を有効にします
- 同じウィンドウ内の新しいタブで複数のドキュメントを開いたり作成したりできます。新しいウィンドウを開く必要はありません。
- 生産性が50%向上し、1日に何百回ものマウスクリックも削減できます!