Opgelost Grafiek past zich aan door keuze validatie lijst

[genexxa]

Ik loop vast bij het maken van een grafiek.

Ik heb 3 tabbladen (coin1, 2 en 3)
Tevens een tabblad Data en een tabblad Grafiek.
In de tabblad Grafiek heb ik een grafiek staan die de waarde weergeeft van tabblad coin1.
Ook heb ik in tabblad grafiek een validatielijst staan in cel B3

Ik zou willen dat als ik in cel B3 kies voor bv coin2, dat de grafiek zich aanpast naar de data uit tabblad coin2.
Ik ben hier al even mee bezig en heb zitten googlelen maar kom er niet uit.
Kan iemand mij hierbij helpen?
Wat doe ik verkeerd en hoe kan ik dit wel realiseren?

 

[AHulpje]

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Address = "$B$3" Then
        ChartObjects("Grafiek 1").Chart.SetSourceData Source:=Sheets(Target.Value).ListObjects("tbl" & Target.Value).Range
    End If
End Sub

Zie bijlage

 

[genexxa]

@AHulpje
Dank je dat is precies wat ik bedoelde.