- 帖子
- 6
- 主題
- 3
- 精華
- 0
- 積分
- 14
- 點名
- 0
- 作業系統
- XP
- 軟體版本
- Office2003
- 閱讀權限
- 10
- 性別
- 男
- 註冊時間
- 2011-7-11
- 最後登錄
- 2011-7-27
|
用excel做出曲線圖然後秀到VB6上
小弟我最近在寫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變數未定義!~害我不知要如何下手! |
|
發表於 2011-7-26 14:45
| 
