Name von Diagramm festlegen
04.06.2013 19:40:03
Diagramm
ich habe folgendes Problem.
Über die Suche habe ich schon einige Dinge gefunden, mein Problem ist nur, dass ich nicht das passende finde.
Ich führe folgendes Makro aus.
Sub Makro5()
Diagrammname = InputBox("Bitte Name eingeben")
ActiveSheet.ListObjects("Tabelle24510").Range.AutoFilter Field:=2, Criteria1:=Diagrammname
Columns("B:B").Select
Selection.EntireColumn.Hidden = True
ActiveSheet.Shapes.AddChart.Select
ActiveChart.ChartType = xlLineMarkersStacked
ActiveChart.SetSourceData Source:=Range(Cells(1, 1), Cells(Cells(65536, 4).End(xlUp).Row, 4) _
)
End Sub
Sub Makro8()
ActiveSheet.ChartObjects("Diagramm 22").Activate
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True, _
IgnorePrintAreas:=False
End Sub
Gibt es dafür irgendeinen Befehl den ich oben in das Makro mit einbauen kann?
Ich suche jetzt bestimmt schon 3 Stunden und probiere hin und her. Komme einfach nicht weiter.
LG
Ben