(資料圖片)

1、Range("A1:A8").Select Charts.Add ActiveChart.ChartType = xl3DLine ActiveChart.SetSourceData Source:=Sheets("Sheet1").Range("A1:A8") ActiveChart.Location Where:=xlLocationAsObject, Name:="Sheet1"。

本文分享完畢，希望對大家有所幫助。