Pessoal,

eu preciso fazer um gráfico onde a linha selecionada deve ser determinada por uma lista suspensa. Ou seja, na macro abaixo, as linhas, 1 e 3 no caso, deve ser determinadas pelo valor de uma lista suspensa (logo, pelo valor de uma célula).
Creio que é algo simples, porém, não sei. Sabem me dizer como eu faria isso se, por exemplo, os valores das linhas estivessem nas célular A1 e A2?

Sub Macro1()
    Range("B3:M3,B1:M1").Select
    Range("M1").Activate
    ActiveSheet.Shapes.AddChart.Select
    ActiveChart.SetSourceData Source:=Range("'Plan1'!$B$3:$M$3;'Plan1'!$B$1:$M$1" _
        )
    ActiveChart.ChartType = xlLineMarkers
End Sub