看電影去嚕^^~

小弟我最近在寫VB6~

想說要把excel檔案裡面的曲線圖秀在VB6上面~

目前是可以辦到!~

不過有一些地方有點問題~

1.    Dim nowChart As Object
    Set nowChart = xlBook.Charts.Add
    nowChart.ChartType = xlLineMarkers
'    nowChart.SetSourceData Source:=Sheets("Sheet6").Range("A2:D8") '加上去有問題~這行在重複執行的時候會顯示錯誤!~
    nowChart.Location Where:=xlLocationAsObject, Name:="Sheet" & CInt(selectsheet.Text)

2.再來就是想調整一下圖片的大小~就是在excel裡面調整好在秀到VB6上面這樣~

xlSheet.Shapes("圖表 1").ScaleWidth 1.05, msoFalse, msoScaleFromTopLeft

想說用這個去調整~但是好像msoFalse, msoScaleFromTopLeft變數未定義!~害我不知要如何下手!