Hallo beisammen,
über
Private Sub cmb_SEND_Click()
ThisWorkbook.SaveCopyAs "C:\Dokumente und Einstellungen\ENTRYIT.xls"
Application.DisplayAlerts = False
Workbooks.Open "C:\Dokumente und Einstellungen\ENTRYIT.xls"
With ActiveWorkbook
.Sheets("Tabelle1").Delete
.Sheets("Tabelle2").Delete
.Sheets("PROTOC").Delete
End With
Application.DisplayAlerts = True
ActiveWorkbook.Save
...
kopiere ich eine Datei und lösche in der Kopie("ENTRYIT") einige WS.
Ein WS("ENTRY") bleibt dabei bestehen, welches aber sowohl einen VBA-Code als auch ein cmb_Button("cmb_SEND") enthält. Wie kann ich nun über eine Ergänzung des o.g. Codes den VBA-Code des WS als auch den Button ansprechen und löschen?
Weiß jemand Rat?
Vielen Dank im voraus.
Gruß
Torsten