VBA Makros per Makro löschen / Kopieren

[Wolfgang Reinhardt]

Guten Tag,
gibt es eine Möglichkeit per VBA (Excel 97), Makros zu löschen bzw. zu
kopieren. Kenne diese Möglichkeit von Word.
Danke
Wolfgang Reinhardt

[Bernd Held]

Hallo Wolfgang,

das geht über VBE Programmierung, z.B. löscht folgendes Makro das Modul2

Sub ModulLöschen()
Dim VBComp As VBComponent
Set VBComp = ThisWorkbook.VBProject.VBComponents("Modul2")
ThisWorkbook.VBProject.VBComponents.Remove VBComp
End Sub

das nächste löscht aus einem Modulblatt ein bestimmtes Makr:

Sub MakroLöschen()
Dim VBCodeMod As CodeModule
Dim ErsteZeile As Integer
Dim i As Integer

Set VBCodeMod = _
ThisWorkbook.VBProject.VBComponents("Modul2").CodeModule
With VBCodeMod
ErsteZeile = .ProcStartLine("Test", vbext_pk_Proc)
i = .ProcCountLines("Test", vbext_pk_Proc)
.DeleteLines ErsteZeile, i
End With
End Sub

Achtung die Bibliothek unter ExtrasVerweise Microsoft Visual Basic for
Applications Extensibility library muss gesetzt sein.

Viele Grüße
Bernd

//////////////////////////////////////
// Die MacHero EXCEL/WORKS Homepage
// Microsoft Excel MVP
// http://members.aol.com/Machero
//
// Computerbild 06/2000 "Buch der Woche" unter
// http://members.aol.com/Machero/derexcel.html

Wolfgang Reinhardt schrieb:

[Wolfgang Reinhardt]

Hallo Bernd,
vielen Dank, werde es gleich testen
Wolfgang Reinhardt