Hallo zusammen,
ich möchte gerne in einem Diagramm einen einzelnen zusätzlichen Wert aus einem anderen Tabellenblatt einfügen (z.B. rechts oben in der Ecke aber nicht in der Diagramfläche selber). Eine Möglichkeit die ich gefunden habe, ist ein Textfeld zu erzeugen und dies mit dem Wert aus einer bestimmten Zelle zu füllen. Über den Makrorecorder erzeugt sieht das ganze so aus und funktioniert auch:
ActiveChart.Shapes.AddTextbox(msoTextOrientationHorizontal, 580, 3, _
20, 12).Select
Selection.Characters.Text = ""
Selection.AutoScaleFont = False
Selection.Formula = "'123456_diagnostic'!$C$10990"
Aber das Problem das ich habe, ist, dass sowohl der Blattname als auch die Reihennummer variable sind, nur die Spalte „C“ bleibt immer gleich!
Mein Ansatz das Problem zu lösen sieht so aus:
Dim BlattName As String
Dim ZeilenNum As String
' nur zur Info hier – die Werte hole ich an anderer Stelle
BlattName = andere Tabellenblatt Name
ZeilenNum = Reihennummer
Selection.Formula = Worksheets(BlattName)+("C" + ZeilenNum)
Aber bei sämtlichen Versuchen diese Werte durch Variable zu ersetzen meckert Excel.
(In Hochkomma, ohne Hochkomma, mit Klammer, ohne Klammer, mehr Klammern....nix funzt!)
Wie sieht den der richtige Algorithmus aus oder was muss man Beachten?
Oder vielleicht gibt es ja eine ganz andere elegantere Lösung für mein Problem.
Danke für eure Hilfe.