title image


Smiley Modul entfernen
Hi Alfons,

Dein Tip hat mir sehr gut gefallen, aber irgendwie funktioniert der nicht so richtig bei mir. ich schreibe in meinem Makro:



'löscht ohne Rückfrage Modul1

On Error Resume Next

With ActiveWorkbook.VBProject

.vbcomponents.Remove .vbcomponents("Modul1")

End With



'Datei als xls speichern

ActiveWorkbook.SaveAs Filename:="H:\Projekte\Projekt1\TEST.xls", _

FileFormat:=xlNormal, CreateBackup:=False



Application.DisplayAlerts = True

Close



Das Makro speichert mir dann zwar meine veränderte Datei im angegebenen Pfad, aber wieder mit meinem Ursprungsmakro. Warum wird das Löschen des Moduls nicht druchgeführt?



Gruß Dieter

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: