Ein Diagramm mit zwei unterschiedlichen Datensätzen

[Ego]

Hallo S...,

1. zweite Y-Achse (Sekundär vertikal)
zB. so:
Das Diagramm anklicken und unter "Diagrammtools">"Entwurf">"Diagrammelement hinzufügen">"Achsen"   "Sekundär vertikal" anwählen.

2. anpassen der Grenzen
das geht meines Wissens nur manuell oder per Programm. In der Anlage ein Programmbeispiel:

Code:

Private Sub cbTuwat_Click()
Dim Grenzen As Variant
Grenzen = ThisWorkbook.Names("Grenzen").RefersToRange.Value
With Me.ChartObjects("Diagramm 7").Chart
    .Axes(xlValue).MinimumScale = Grenzen(1, 2)
    .Axes(xlValue).MaximumScale = Grenzen(1, 3)
    .Axes(xlValue).MajorUnit = Grenzen(1, 1)
    .Axes(xlValue, xlSecondary).MinimumScale = Grenzen(2, 2)
    .Axes(xlValue, xlSecondary).MaximumScale = Grenzen(2, 3)
    .Axes(xlValue, xlSecondary).MajorUnit = Grenzen(2, 1)
End With
End Sub

[StrammerMax]

Super, vielen Dank - ich schaue es mir gleich mal an. 

Ich weiß, dass ich auch schon Diagramme erstellt habe die die Beschriftungen und Wertebereiche automatisch angepasst haben ohne VBA. Aber frag mich bitte nicht mehr wie das ging. 
Ich glaube mit definierten Namen und Bereich.Verschiebe oder so. 

Aber per Code wäre das natürlich elegant gelöst.