Excel vba Bestimmtes Blatt aktivieren ..wenn

[sharky51]

Hallo zusammen,

darf ich Euch mal wieder um Eure Hilfe bitten?

Normalerweise ist nach dem manuellen Löschen eines Blattes das Tabellenblatt nach dem gelöschten aktiv.

Aber in meiner Arbeitsmappe soll, wenn ein gerade aktives Tabellenblatt manuell gelöscht wird,
also wenn mit der rechten Maustaste auf den Tabellenreiter geklickt wird und "löschen" ausgewählt wird,
ein bestimmtes Tabellenblatt aktiviert werden, z.B. Tabelle, hier "Vorlage_AKT".


Habt Ihr mir dazu vielleicht einen Lösungsvorschlag?

Vielen Dank schon mal!

[Mase]

Verwende das passende Event dazu.

Code:

Private Sub Workbook_SheetBeforeDelete(ByVal Sh As Object)
    Sheets("Vorlage_Akt").Select
End Sub

Hinweis:
Wenn Du dies in verschiedenen Mappen mit unterschiedlichen Namen benötigst, dann über Klassenprogrammierung. Wenns nur diese Mappe sein soll, reicht wie oben beschrieben.

[sharky51]

Hallo Marco,

vielen Dank, funktioniert perfekt!

Schönes WE!

[Mase]

Danke, Dir auch ein schönes WE.