No.1ベストアンサー
- 回答日時:
No.2
- 回答日時:
こういう話題には、
・マクロを無効にする
・マクロコードを削除する
などがあるが、本質問は後者として
下記コードを入れるブックを決めて、その標準モジュールに
Sub test01()
Workbooks.Open "XXXX.xls"
Dim objVBCOMPO As Object
For Each objVBCOMPO In ActiveWorkbook.VBProject.VBComponents
With objVBCOMPO.CodeModule
If .CountOfLines <> 0 Then .DeleteLines 1, .CountOfLines
End With
If (objVBCOMPO.Type = vbext_ct_StdModule Or objVBCOMPO.Type = vbext_ct_MSForm) Then
ActiveWorkbook.VBProject.VBComponents.Remove objVBCOMPO
End If
Next objVBCOMPO
Set objVBCOMPO = Nothing
End Sub
これは
http://chaichan.web.infoseek.co.jp/vbtips/VBMemo …
のコードに一行加えたものである。
"XXXX.xls"は>名前をつけて別のファイルに保存した、ブックである。
ーーー
>Microsoft Visual Basic Applications Extensibility の参照設定が必要と思う。WEB記事に対しApplicationsが正しいようだ。チェックが付いてなくても動いたが、正しいかどうか不知。
ーーー
これらは自己責任でやること。コピーしたものを対照にして、良く結果を検討し、変更後の保存は慎重にするべきである。
マクロをプログラムでいじくるのは、勧められた話ではない。質問者の技量はわからないが、何かわからない場合に、こういうWEB照会も習慣として、して無いレベルの人は、やらないほうが良かろう。
コードが削除されると、普通のシートの操作などの際に、エラーが発生したりする場合も考えられるので、本来はシートの状態も含めて、中身を十分検討のうえ、手動で削除するべきでしょう。(一例でユーザー設定のボタンが作られていた場合で、OnActionで何か処理がされる場合やユーザー作成関数が在ったなどが一例)
ーー
Module1の解放などまでは上記コードではやってない。
ーーー
また
http://www.asahi-net.or.jp/~zn3y-ngi/YNxv9cz48.h …
>マクロを含むブックを別名で保存すると、当然のことながら、モジュールシートが付いた状態で保存されます。
しかし、右図のようにシートの[移動またはコピー]で[新しいブック]に[コピーを作成する]して、その新しいブックに[名前を付けて保存]すればモジュールシートは付きませんから、・・
これも試してください。
ーーー
http://www.vbalab.net/vbaqa/data/excel/log/tree_ …
にもコードがありました。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2023/02/21 11:19
- Excel(エクセル) Excelのマクロコードについて教えてください。 1 2022/03/27 10:47
- Excel(エクセル) エクセルのマクロについて教えてください。 1 2022/08/04 13:56
- Visual Basic(VBA) vba マクロでファイル名をつけて保存するやり方を教えてください。 マクロで作成したエクセルファイル 2 2023/01/31 18:22
- Excel(エクセル) エクセルのマクロについて教えてください。 1 2023/02/21 09:28
- Excel(エクセル) エクセルのマクロについて教えてください。 1 2023/02/03 13:18
- Excel(エクセル) エクセルのマクロについて教えてください。 1 2022/03/31 12:46
- Excel(エクセル) エクセルのマクロについて教えてください。 1 2023/02/11 11:05
- PowerPoint(パワーポイント) エクセルのマクロについて教えてください。 1 2022/03/25 17:03
- Excel(エクセル) エクセルのマクロについて教えてください。 2 2023/02/21 13:29
このQ&Aを見た人はこんなQ&Aも見ています
-
性格の違いは生まれた順番で決まる?長男長女・中間子・末っ子・一人っ子の性格の傾向
同じ環境で生まれ育っても、生まれ順で性格は違うものなのだろうか。家庭教育研究家の田宮由美さんに教えてもらった。
-
【ExcelVBA】指定の書式で、マクロなしブックとしてAlertなしで別名保存する方法
Visual Basic(VBA)
-
マクロ ブックをマクロなしでコピー
Access(アクセス)
-
VBAで保存しないで閉じると空のBookが残る
Excel(エクセル)
-
-
4
EXCELのVBAでシートコピーをしたとき元のマクロを削除するには?
Excel(エクセル)
-
5
VBAでマクロを使って、マクロ無効のエクセルシートとして名前を付けて保
その他(Microsoft Office)
-
6
名前をつけて保存した後、元のファイルに戻るには
その他(コンピューター・テクノロジー)
-
7
マクロを消すマクロは不可能?
Excel(エクセル)
-
8
マクロでマクロを削除する
Excel(エクセル)
-
9
VBA マクロを削除して保存したい
PowerPoint(パワーポイント)
-
10
EXCEL VBA セルに既に入力されている文字に文字を追加する
Excel(エクセル)
-
11
エクセルVBAでセルに入力したパスでブックを開く
Excel(エクセル)
-
12
マクロの「SaveAs」でエラーが出るのを解消したいです(再)
Visual Basic(VBA)
-
13
マクロの「SaveAs」でエラーが出るのを解消したいです
Visual Basic(VBA)
-
14
Excelの入力規則で2列表示したい
Excel(エクセル)
-
15
VBA 存在しないシートを選択した時にエラーメッセージを表示するには?
Visual Basic(VBA)
-
16
エクセル:マクロ「Application.CutCopyMode = False」って?
Excel(エクセル)
-
17
(Excel VBA)シートコピー時マクロはコピーしたくない
Excel(エクセル)
-
18
ExcelVBAを使って、値がある場合は作業を繰り返し実行するプログラムを作成したい。
Visual Basic(VBA)
-
19
エクセルVBAで開いているファイルをコピーする方法
Visual Basic(VBA)
-
20
Excelのセルにユーザー名を表示する方法
Excel(エクセル)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
VBAで保存しないで閉じると空の...
-
マクロの保存先、開いてるすべ...
-
【Excel VBA】マクロでExcel自...
-
エクセル関数>参照ファイル名...
-
複数のExcelブックを1つ...
-
excel VBA シート保存について...
-
エクセル;相対パスを絶対パスへ...
-
ファイルごとにセルの移動方向...
-
【Excel】特定セルの内容をテキ...
-
エクセルVBAで作成した別ブック...
-
【Excel】マクロの保存先について
-
Excel VBAで他のブックを選択...
-
マクロ 自動でパスワード及び指...
-
エクセルでメッセージボックス...
-
エクセルで読み取り専用の時に...
-
ブックを開いたとき自動的にバ...
-
エクセルで複数のファイル(ブッ...
-
エクセル 半角カナを全角に、...
-
エクセルマクロで(セルの削除...
-
名前の変わるブックをアクティ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
VBAで保存しないで閉じると空の...
-
エクセル関数>参照ファイル名...
-
【Excel VBA】マクロでExcel自...
-
エクセル;相対パスを絶対パスへ...
-
マクロの保存先、開いてるすべ...
-
【Excel】マクロの保存先について
-
excelで直前に参照していたブッ...
-
EXcelのマクロで相対パスでファ...
-
エクセルVBAで作成した別ブック...
-
複数のExcelファイルの印刷設定...
-
エクセルのvbaにて thisworkboo...
-
EXCELのボタンによるマクロの登...
-
エクセルVBA 個人用マクロブッ...
-
EXCELマクロで、開いてはいるが...
-
EXCELブックが勝手に開いて困っ...
-
エクセルで未保存に対するメッ...
-
[フィルターオプションの設定]...
-
【Excel】特定セルの内容をテキ...
-
ファイル名変更後も、マクロを...
-
名前の変わるブックをアクティ...
おすすめ情報