variable mit "='
17.07.2014 14:22:43
Thomas Tom
hallo forum!
ich komm leider gar nicht mehr weiter und bitte um eure hilfe.
ich möchte immer dieselben diagramme erstellen, welche immer die gleichen spalten verwenden aber in verschiedenen tabellenblätter sind. das weiterkopieren lässt ja immer die bezüge auf das orginal stehen. die tabellenblätter sind ausschließlich mit vierstelligen jahreszahlen benannt. alle tabellenblätter sind in der selben datei.
mit dem recoder konnte ich folgendes macro zusammenbasteln:
Sub diagramm()
tbn = ActiveSheet.Name
ActiveSheet.Shapes.AddChart.Select
ActiveChart.ChartType = xlXYScatterLines
ActiveChart.SeriesCollection.NewSeries
ActiveChart.SeriesCollection(1).Name = "='1979'!$B$2"
ActiveChart.SeriesCollection(1).XValues = "='1979'!$A$3:$A$368"
ActiveChart.SeriesCollection(1).Values = "='1979'!$B$3:$B$368"
ActiveChart.SeriesCollection.NewSeries
ActiveChart.SeriesCollection(2).Name = "='1979'!$D$2"
ActiveChart.SeriesCollection(2).XValues = "='1979'!$A$3:$A$368"
ActiveChart.SeriesCollection(2).Values = "='1979'!$D$3:$D$368"
End Sub
nun möchte ich die jahreszahl (hier 1979) mit der variable tbn ersetzen.
ich kämpfe mit den anführungszeichen, dem = und den hochkommas.
vielleicht kann mir jemand auf die sprünge helfen.
vielen dank und grüße
tom