Office: zu bestimmter Spalte springen

Hallo,

habe ein neues Problem. Zu vielen ähnlichen Problembeschreibungen werden auf verschiedenen Foren Lösungen angeboten. Leider schaffe ich es nicht, mir eine geeignete Lösung zurechtzubasteln.

Ich habe in einem Tabellenblatt in der Zeile 1 folgende Inhalte:
F1: 2016 - November
AK1: =TEXT(MONATSENDE(DATWERT("1. "&RECHTS(VERWEIS(2;1/($A$1:AJ$1"");1:1);LÄNGE(VERWEIS(2;1/($A$1:AJ$1"");1:1))-7)&" "&LINKS(VERWEIS(2;1/($A$1:AJ$1"");1:1);4));0)+1;"JJJJ"&" - "&"MMMM")
BP1: wie AK1 (nur statt AJ BO)

Ich habe also alle 31 Spalten eine Jahres- und Monatsangabe stehen.
Den Unterschied in der Tagesanzahl je Monat habe ich zwecks Vereinfachung unberücksichtigt gelassen. Die entsprechenden Felder sind dann einfach leer.
Da jetzt sich schon einige Monate im Tabellenblatt befinden, ist das seitliche Scrollen etwas müßig.

In Zelle D2 möchte ich daher ein Listenfeld erstellen, in dem Monat den Monat auswählen kann und sich die Bildschirmanzeige aktualisiert.
Aktuelle Zelle ist die, welche den ausgewählten Monat enthält.
Die Spalten A:E sind fixiert.

Für die Unterstützung vielen Dank schon einmal im Voraus!
Thober

:)

 

Hi,

stelle eine Beispielmappe zur Verfügung.

 

Ebenfalls hi,

vielen Dank für Dein Interesse für mein Problem und, 'tschuldigung, dass ich jetzt erst antworte.

Habe das Original auf das Wesentliche zurechtgestutzt und anonymisiert.

In Zelle wäre die Auswahl zu treffen.
Die Zelle in Zeile 1 den ausgewählten Text enthält, soll sofort bei Auswahl auf dem Bildschirm sichtbar sein. Sie muss aber nicht unbedingt aktiv sein. Optimal wäre sogar, wenn D2 aktiv bleibt bzw. bei Aufruf des Tabellenblattes die zuletzt aktive Zelle vor Verlassen.
Wie ich schon erwähnte, die Anzahl der für jeden Monat zur Verfügung stehenden Spalten ist 31, also auch für Februar, April etc..

Vielen Dank schon mal im Voraus für die Hilfe!

Gruß
Thober

 

Hi,

kopiere folgenden Code ins Codemodul des Tabellenblattes:

Code:

 

Hallo Karin,

für mein spätes Feedback bitte ich um Entschuldigung. Ich war mehrere Tage nicht vor Ort.

Dein Lösungsvorschlag funktioniert, wie gewünscht. Dass dieser auch noch so wenig Aufwand erfordert, hat mich zusätzlich gefreut.

Allerherzlichen Dank für die Lösung.

Übrigens, das Listenfeld habe ich so erstellt (vielleicht kann das ein weiterer Nutzer der Lösung mit verwenden):

In einem weiteren (bei mir schon vorhandenen) Tabellenblatt in die oberste Zelle einer Spalte die Formel

=WENN((ZEILE()-1)*31>MAX(INDEX((Artikel!$1:$1"")*SPALTE(Artikel!$1:$1);0));"";INDEX(Artikel!$1:$1;;VERGLEICH("*";Artikel!$1:$1;0)+(ZEILE()-1)*31))

eingegeben ("Artikel" ist das Tabellenblatt, wo der Monat gefunden werden soll),
die Formel über mehrere Zeilen herunterkopiert
und einen Namen mit der Formel

=BEREICH.VERSCHIEBEN(Parameter!$J$1;;;SUMMENPRODUKT((Parameter!$J:$J"")*1))

hinzugefügt.

LG
Thober