title image


Smiley Re: Knacknuss: VBA löschen
Hallo Aston,



ja, so:



Public Sub Makros_und_Module_loeschen2()    Dim objVBC As Object    With ThisWorkbook.VBProject        For Each objVBC In .VBComponents            Select Case objVBC.Type                Case 1, 2, 3                    .VBComponents.Remove .VBComponents(objVBC.Name)                Case 100                    With objVBC.CodeModule                        .DeleteLines 1, .CountOfLines                    End With            End Select        Next    End WithEnd Sub
Gruß
Nepumuk


geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: