Office: (Office 2016) mit einer Zahl ein Tabellenblatt aufrufen

hi@all
ich habe folgendes Problem
ich habe in einer Zelle im Tabellenblatt 1 eine Zahl stehen,
diese Zahl soll in der Mappe ein dazugehöriges Tabellenblatt aufrufen.

z.B
ich habe eine Zahl 32
dann soll das Tabellenblatt AAA die Spalte G angezeigt werden.

wie realisiere ich das?
sicher mittels Makro
kann mir jemand eine Syntax dazu geben?

DANKE
ein Helau oder Alaaf aus Mannheim

:)

 

starte den VBA Editor (Alt+F11), Bild sollte zweigeteilt sein ansonsten Strg+R, Doppelklick auf Deine Datei, Doppelklick auf Deine Tabelle, Code ins rechte Fenster kopieren, VBA Editor schließen.
Das Makro wird automatisch gestartet.
Der Code wirkt nur in dieser Tabelle.
Code:

 

Hi Hajo
kannst du mir das Mako kurz erklären,
das ich es event editieren kann und es auf meine Bedürfnisse anpassen kann
wäre lieb von dir

Gruß Mike

 

Target ist die geänderte Zelle.
Was ist unklar?

 

ich müsste ja mit der Zahl die im Tabellenblatt "A" eingeben wird
das Tabellenblatt "AAA" die Zelle D 2 aufrufen

bei einer anderen Zahl auf dem gleichen Tablellen Blatt "AAA" die Zelle K 2

als Beispiel gedacht

Jede Zahl im Tabellenblatt A springt in das Blatt AAA auf eine dazu zugeordnete Zelle
Die Zahlen bestehen aus der Zahl 6 fortlaufend bis 40
das kann ich halt in deinem Code nicht rauslesen
bin ja nicht so der Profi

ware lieb von dir e mir zu erklären dann

Danke nochmal

 

ja in meiner Datei wurde die entsprechende Tabelle aufgerufen.
Ich bin dann raus, da Lösung erstellt.

Zu Deiner Datei kann ich nichts schreiben, was wohl daran liegt das ich nicht auf fremde Rechner schaue. Ich baue keine Datei nach.

Sollte die Datei verlinkt werden?

Der Name einer hochgeladenen Mappe wird im Beitrag automatisch angezeigt, sodass es bei Verwendung von aussagekräftigen Namen leichter fällt, sie später im Ablageordner wiederzufinden und sie gedanklich einem bestimmten Thema zuzuordnen. Namen wie Muster*, Test*, Mappe*, Beispiel*, Fehler*, Kalender*, UserForm* usw. sind so allgemein, dass eine Zuordnung zu einem Thema unmöglich gemacht wird.
Es sollte ein aussagekräftiger Name sein.

Das ist nur meine Meinung zu dem Thema.

Wenn du an Stelle einer Demomappe deine Originalmappe hochladen willst, diese aber sensible Daten enthält, kannst du diese Daten
http://www.ms-office-forum.de/forum/...d.php?t=322895
änderrn.

Das ist nur meine Meinung zu dem Thema.

 

Dein Code ist Murks und löst auch nicht die Aufgabe

1. Gehört der Code in 'Worksheet_SelectionChange'
2. geht Dein Code davon aus, daß die Tabellenblätter numerisch benannt wurden
3 . Wenn ich Tabellenblätter 3, 11 , 12 habe, und die 11 eingebe, kommt nur Deine Messagebox...
4. Geht es nicht um benannte Tabellenblätter, sondern um eine Zelle im Blatt 'AAA'

@Mike: Wie definierst Du, in welche Zelle gesprungen werden soll?

 

Mein Code

Sheets("Tabelle1").Select

Select Case Cells(6, 1).Value ' Zelle mit dem Wert

Case 6 ' inhalt der Zelle`

' z.B wohin es gehen muss
Cells(2, 3).Value = Sheets("xyz").Select

Case 7 'anderer Wert

'oder als Textanzeige in einer Zelle
Cells(2, 4).Value = "1-4er 1-3er"
....... usw..

End select.

mehr wollte ich eigendlich nicht

mit diesem Code kann ich hinspringen wohin ich will
ich muss halt eine ganze Reihe mit den Case Zahlen erstellen und die Aktion dazu als Value schreiben.
Wasd Hajo geschrieben hat ist echt keine Hilfe
und wenn man hier schon als Anfänger frägt "erklär mal" finde ich das nicht nett dann so zu reagieren
aber wie hat Forest Gump´s Mutter schon gesagt
Dumm ist nur der wer dummes tut.
Es gibt ja auch Youtube *grins