麻烦大家绑我把这段画excel 饼图的代码翻译成 c# 谢谢大家了！

Question

Sub Macro2()
'
' Macro2 Macro
''
    ActiveSheet.Shapes.AddChart.Select
    ActiveChart.SetSourceData Source:=Range("Sheet1!$A$1:$A$4")
    ActiveChart.ChartType = xlPie
    ActiveChart.SeriesCollection(1).Select
    ActiveSheet.ChartObjects("图表 4").Activate
    ActiveChart.Legend.Select
    ActiveSheet.ChartObjects("图表 4").Activate
    ActiveChart.ChartArea.Select
    ActiveSheet.ChartObjects("图表 4").Activate
    ActiveChart.SeriesCollection(1).Select
    ActiveSheet.ChartObjects("图表 4").Activate
    ActiveChart.Legend.Select
    ActiveSheet.ChartObjects("图表 4").Activate
    ActiveChart.SeriesCollection(1).Select
    ActiveChart.SeriesCollection(1).Name = "=""第一个"""
    ActiveSheet.ChartObjects("图表 4").Activate
    ActiveChart.Legend.Select
    ActiveSheet.ChartObjects("图表 4").Activate
    ActiveChart.ChartArea.Select
    ActiveSheet.ChartObjects("图表 4").Activate
    ActiveChart.SeriesCollection(1).Select
    ActiveChart.SeriesCollection(1).Formula = _
        "=SERIES(""第一个"",{""股票""},Sheet1!$A$1:$A$4,1)"
    ActiveSheet.ChartObjects("图表 4").Activate
    ActiveChart.ChartArea.Select
    ActiveSheet.ChartObjects("图表 4").Activate
    ActiveChart.SeriesCollection(1).Select
    ActiveChart.SeriesCollection(1).Formula = _
        "=SERIES(""第一个"",{""股票"",""aaa"",""bbb"",""ccc""},Sheet1!$A$1:$A$4,1)"
End Sub