Tabelle kopieren ohne vorhandene Makros

15.05.2001


Sinnvoll, wenn man beispielweise eine Tabelle per Mail versenden m�chte,
die darin vorhandenen Makros allerdings nicht mit versenden m�chte.

Dieses Beispiel kopiert "Tabelle1" aus der aktiven Arbeitsmappe
in eine neue Arbeitsmappe und l�scht anschlie�end alle Codezeilen.
ActiveWorkbook.Worksheets("Tabelle1").Copy
With ActiveWorkbook.VBProject.VBComponents("Tabelle1").CodeModule
   .DeleteLines 1, .CountOfLines
End With

                
Download - 10 KB