VBA-Beispiel 031
mail schreiben
mail schreiben

Modul entfernen

Löscht ohne Rückfrage Modul1 in der aktiven Mappe
Sub modul_weg()
'löscht ohne Rückfrage Modul1
On Error Resume Next    
    With ActiveWorkbook.VBProject
    .VBComponents.Remove .VBComponents("Modul1")
    End With
End Sub

Download:   vba031.zip