Mit ShortCut zwischen zwei Tabellen wechseln

Thema: Allgemein - Gruppe Arbeitsblatt

Arbeitsmappe

225904    222404

Problem: Ist Tabell1 aktiviert, soll mit dem ShortCut Strg+n in Tabelle3, ist Tabelle3 aktiviert, in Tabelle1 gewechselt werden.

StandardModule: Modul1

Sub ChangeWks()
   If ActiveSheet.Name = "Tabelle1" Then
      Worksheets("Tabelle3").Activate
   ElseIf ActiveSheet.Name = "Tabelle3" Then
      Worksheets("Tabelle1").Activate
   End If
End Sub