2

この VBA マクロは次のように機能します。

Sub Draw_Graph()
    Columns("A:B").Select
    ActiveSheet.Shapes.AddChart.Select
    ActiveChart.SetSourceData Source:=ActiveSheet.Range("$A:$B")
    ActiveChart.ChartType = xlLine
End Sub

この Python の (ほぼ) 同等のものは、ほぼ動作します。

from win32com import client

excel=client.Dispatch("Excel.Application")
excel.Visible=True
book=excel.Workbooks.Open("myfile.csv", False, True)
sheet=book.Worksheets(1)
chart=book.Charts.Add()
chart.SetSourceData(sheet.Range("$A:$B"))
chart.ChartType=client.constants.xlLine

最後のビットは別として、グラフの種類を「xlLine」(プレーンな折れ線グラフ) にすることができません。何か案は ？

4

1 に答える 1

1

動作させるには、「makepy.py」を実行する必要があります。

http://docs.activestate.com/activepython/2.4/pywin32/html/com/win32com/HTML/QuickStartClientCom.html#UsingComConstants

于 2010-02-05T00:02:57.517 に答える