Vba makro automatisch starten wenn neues tabellenb

hallo,

ich suche nach einem befehl, der mein vba makro in excel automatisch starten lässt, sobald ein neues tabellenblatt in meine arbeitsmappe eingefügt wird oder noch besser: wenn sich die anzahl der tabellenblätter verändert.

DANKE :smile:

hallo,

ich suche nach einem befehl, der mein vba makro in excel
automatisch starten lässt, sobald ein neues tabellenblatt in
meine arbeitsmappe eingefügt wird oder noch besser: wenn sich
die anzahl der tabellenblätter verändert.

Hallo,

dafür kannst du auf Arbeitsmappen-Ebene in Excel 2003 SP 3 die Workbook_NewSheet-Routine anlegen, in die du deinen Makrocode reinkopieren kannst.

Was man macht, um auch das Löschen von Tabellen mit abzudecken, fällt mir grade nicht ein… :smile:

Gruß
smalbop

hallo,

ich suche nach einem befehl…
…oder noch besser: wenn sich
die anzahl der tabellenblätter verändert.

DANKE :smile:

Hallo,

Füge in den Workbook-Bereich deiner Arbeitsmappe folgenden Code ein. Dann müsste es fürs Löchen und Hinzufügen klappen:

Dim nsheets As Integer

Private Sub Workbook\_Open()
 nsheets = Sheets.Count
End Sub

Private Sub Workbook\_SheetActivate(ByVal Sh As Object)
 If Sheets.Count = nsheets Then Exit Sub
 MsgBox "Blatt eingefügt oder gelöscht" ' Hier muss dein Code rein.
 nsheets = Sheets.Count
End Sub

Gruß, Andreas