Microsoft Excel

Excel und VBA: Formeln, Programmierung, Lösungen

Die Excel/VBA-Beispiele

Thema

Tabellencode nach Kopieren des Blattes löschen

Gruppe

Prozedur

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