UF,Modul,Klasse entfernen
11.05.2020 12:43:23
Sigi
in meinem VBA Projekt soll nach Aufruf bestimmte Module, UF und Klassen gelöscht werden.
Der Aufruf erfolgt aus
Modul Name "modStammdaten"
Call fcUFMCweg(sForm:="UFStammdaten", sModul:="modStammdaten", cModul:="clsStamm")
Modul Name "modVar"
Public Sub fcUFMCweg(ByVal sForm As String, ByVal cModul As String, ByVal sModul As String)
ThisWorkbook.VBProject.VBComponents.Remove ThisWorkbook.VBProject.VBComponents(sForm)
ThisWorkbook.VBProject.VBComponents.Remove ThisWorkbook.VBProject.VBComponents(cModul)
ThisWorkbook.VBProject.VBComponents.Remove ThisWorkbook.VBProject.VBComponents(sModul)
End Sub
Was mache ich falsch?
Danke!
Gruß Sigi
Anzeige