VBA Project vor Vesand löschen
22.03.2006 16:07:32
Jakob
in einer Tabelle habe ich 2 CommandButtons erstellt. Die Tabelle wird in eine neue Arbeitsmappe kopiert und soll anschließend per Outlook als Fax versendet werden.
Mein Problem besteht jetzt darin die 2 CommandButtons vor den Vesand zu löschen da die Datei sonst von unserer Firewall geblockt wird.
Die Commandbuttons habe ich nach den Kopieren mit folgenden Code gelöscht.
' Makros und Schaltflächen werden entfernt
ActiveSheet.Shapes("Button 1").Select
Selection.Cut
ActiveSheet.Shapes("CmdEingabeStart").Select
Selection.Cut
ActiveSheet.Shapes("CmdBeenden").Select
Selection.Cut
Wie müßte der Code aussehen um auch den dazugehörenden VBA-Code zu löschen?
Der VBA-Code für die CommandButtons steht in der Tabelle1 und lautet folgendermaßen
Private Sub CmdBeenden_Click()
Application.CutCopyMode = False
ActiveWorkbook.Close False
End Sub
Private Sub CmdEingabeStart_Click()
usrAbfrage.Show
End Sub
Vielen Dank im voraus für Eure HIlfe.
Gruß
J.Freitag