投稿日 | : 2006/01/27(Fri) 16:21 |
投稿者 | : YK |
Eメール | : |
URL | : |
タイトル | : Re: VBよりExcelマクロの削除は可能でしょうか? |
こんにちは。
> これをVB6.0を利用してExcelマクロを削除することは可能でしょうか?
こんな風でどうでしょう。
wkbはワークブックのインスタンス
dim obj as object
dim sht as worksheet
With wkb.VBProject
' If .Protection Then GoTo クローズ処理
' モジュールの削除
For Each obj In .VBComponents
If obj.Type < 4 Then
' Debug.Print obj.Name
.VBComponents.Remove obj
End If
Next
' シートモジュールの中身削除
For Each Sht In wkb.Worksheets
With .VBComponents.Item(Sht.Name).CodeModule
.DeleteLines 1, .CountOfLines
End With
Next
End With