Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


55795 / 76732 ←次へ | 前へ→

【25704】Re:作成したファイルのマクロの消去について
回答  Nossori  - 05/6/11(土) 8:53 -

引用なし
パスワード
   ▼グリーン さん:

こんにちは
私もこの質問をしたのですが、回答を頂きまして
感激した経験があります。
URLを添付します。
シート単位、ブック単位・・・等4種類が掲載された
いたと思います。
http://excelfactory.cool.ne.jp/ExcelVBATips/vbe/vbe_index.html
一度色々と試してみてください。

私は以下のコードを利用してデータ保存に「ひにち」をつけて
ファイルを作成しています。
'キーワード>>VBProject・VBComponents・CodeModule・DeleteLines 1・Remove
'
'Point: 全てのマクロを削除したはずなのにマクロの警告が出てしまう。
'
'   'ThisWorkbookの全てのマクロを消去・モジュールを削除します。
Sub Test()
Dim myVBComp
  For Each myVBComp In ThisWorkbook.VBProject.VBComponents
   If myVBComp.Type = 100 Then
   'Documentモジュール(ThisWorkbookやSheet)なら消去
    With myVBComp.CodeModule
      .DeleteLines 1, .CountOfLines
    End With
   Else
 'Documentモジュール(標準モージュール、クラスモジュール、Formなど)以外なら削除
     Application.VBE.ActiveVBProject.VBComponents.Remove myVBComp
  End If
 Next myVBComp
End Sub'

1 hits

【25672】作成したファイルのマクロの消去について グリーン 05/6/10(金) 13:54 質問
【25675】Re:作成したファイルのマクロの消去について Kein 05/6/10(金) 15:41 発言
【25701】Re:作成したファイルのマクロの消去につ... じぇっと 05/6/11(土) 2:52 発言
【25704】Re:作成したファイルのマクロの消去について Nossori 05/6/11(土) 8:53 回答

55795 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free