VBA-Programmierung in Microsoft Excel

Tutorial: Excel-Beispiele

Tabellencode nach Kopieren des Blattes löschen

Gruppe

VBE

Bereich

Prozedur

Thema

Tabellencode nach Kopieren des Blattes löschen

Problem

Wenn ich ein Arbeitsblatt als neue Arbeitsmappe kopiere, wird das Klassenmodul des Blattes mitkopiert. Dieses läßt sich nicht löschen. Wie kann ich den Code in diesem Modul per VBA entfernen?

Lösung

Geben Sie den nachfolgenden Code in ein Standardmodul ein und weisen Sie ihn einer Schaltfläche zu.




ClassModule: Tabelle3

Private Sub cmdWksCopy_Click()
   Dim wks As Worksheet
   Worksheets("Tabelle1").Copy
   Set wks = ActiveSheet
   With ActiveWorkbook.VBProject _
      .VBComponents(wks.CodeName).CodeModule
      .DeleteLines 1, .CountOfLines
   End With
End Sub

    


Beiträge aus dem Excel-Forum zu den Themen VBE und Prozedur