Diagramm: dynamischer Tabellenblattname

[CyberFOG]

Hallo liebe Gemeinde!

Ich habe ein kleines Diagramm-Problem.

Ich habe eine Datei mit mehreren Datenblättern (2017, 2018, usw.). Diese Datenblätter sind bis auf den Namen und die Daten
alle identisch. In einem weiteren Datenblatt, wird das Diagramm erzeugt. Des Weiteren bekommt der Benutzer die Möglichkeit
ein Jahr auszuwählen.

Mein Problem besteht jetzt darin, den Diagrammdatenbereich in Abhängigkeit der Eingabe des Benutzers zu gestalten. Lautet die
Benutzereingabe 2017, soll auf das Datenblatt 2017 zugegriffen werden, bei 2018 auf das Datenblatt 2018, usw. Der Datenbereich
innerhalb des Datenblattes bleibt immer gleich und erweitert sich auch nicht. Nur der Verweis auf das Datenblatt soll dynamisch
sein.

Ich habe mich schon mit Bereich.Verschieben beschäftigt, komme damit aber nicht zu einer Lösung.

Danke für eure Hilfe

[Fennek]

Hallo,

ob man das per Formel ("indirekt") machen kann, weis ich nicht, es macht Sinn auf die Antwort eines Formelspezialisten zu warten.

Mit VBA geht es in jedem Fall, aber eine kleine Beispieldatei ist nötig.

mfg

[CyberFOG]

Danke für deine Antwort.

An INDIREKT hatte ich auch schon gedacht, funktionierte bei mir aber nicht wirklich. Ich bekam dazu die Auskunft,
dass ein Diagramm im Diagrammdatenbereich keine Formeln zulässt, sondern nur direkte Verweise auf Bereiche nach
dem Muster '2017'!A1:A50. Hier genau liegt leider auch das Problem, 2017 soll dynamisch sein. :s

Gruß

[WillWissen]

Hi,

schau dir mal diese Seite an:  https://excelnova.org/2014/01/das-geheim...den-knnen/
Ob du damit dein Problem lösen kannst, weiß ich nicht, habe so etwas noch nicht ausprobiert.

[CyberFOG]

Danke für deine Antwort und den Link.

WAHL ist eine interessante Funktion, habe ich mich bis dato noch nicht mit beschäftigt.

Weiter unter wird auf die Seite "Dynamische Bereiche mit Namens-Manager" verwiesen. Hier ist weiter unten einem
Kommentar des Autors folgendes zu entnehmen "den Dateinamen dynamisch generieren wirst Du über Formeln nicht
hinbekommen. Da muss man VBA einsetzen". Mal sehen, ob ich nicht doch noch andere Lösungsansätze finde.

Gruß

[Couch81]

Hallo!

Anbei mal eine Hilfskrücke... falls du damit leben kannst


Grüße
Sascha

[Dieter63]

Hallo

 das  geht  über  den  NamensManager
 
 z.b. W wie  Werte

 W_2016='2016'!$B$2:$B$4
 W_2017='2017'!$B$2:$B$4

 z.b. du  kannst auch  Bereich.Verschieben( 

 Werte=WENN(Diagramm!$B$1=2016;W_2016;W_2017)

 
 Im  Diagramm dann  den  Namen eintragen

 Syntax  -->    ExcelMappe +  !  +  Name 

 
 =DynDiagr.xlsx!Werte



Versuchs mal.

[Fennek]

Hallo,

das wäre die VBA Variante:

Code:

Sub T_1()
For i = 1 To Sheets.Count
   Debug.Print Sheets(i).Name, TypeName(Sheets(i))
   If Sheets(i).Name = "Diagramm1" Then
       Sheets(i).SetSourceData Source:=Sheets("2016").Range("A1:B5")
   End If
Next i
End Sub

mfg

[Rabe]

Hi,

es könnten ja auch alle Daten auf ein Blatt mit der zusätzlichen Spalte "Jahr" und dann mit PivotTable und -Diagramm anzeigen mit Filter auf das Jahr.