返回列表 上一主題 發帖

[發問] 苦惱... 菜鳥EXCEL VBA 求助

[發問] 苦惱... 菜鳥EXCEL VBA 求助

應該是個簡單的程序但腦殘起來就是想不通...
已經試過好多不同方式但都不行所以想搵師兄師姐求救 ><><><

以下是小妹PLOT GRAPH 時用的CODE...
Dim SMA_day As Integer
Dim stockno As String
Dim row As String

stockno = CStr(ThisWorkbook.Sheets("control").Cells(6, "K").Value)
SMA_day = CInt(ThisWorkbook.Sheets("control").Cells(5, "K").Value)
row = SMA_day + 1

ThisWorkbook.Sheets(stockno).Shapes.AddChart.Select
ThisWorkbook.Sheets(stockno).Shapes.AddChart.Chart.ChartType = xlLine
ThisWorkbook.Sheets(stockno).Shapes.AddChart.Chart.SetSourceData Source:=Range(stockno & "$A$2A" & row, stockno & "$H$2H$" & row)

到SET RANGE時總會有BUG... 但又改不回來
會不會是 ! 的位置錯了尼...? 應該怎樣解決?? 求救 >< ><

回復 2# kimbal

回復了也不行呢 >< ><
可能是偶表達不好... 把原檔貼上來請教大家 ><
http://dl.dropbox.com/u/84304423/ShareAnalyzer%201.xlsm

TOP

回復 4# stillfish00


看不太懂... @@
附上原檔在這裡
http://dl.dropbox.com/u/84304423/ShareAnalyzer%201.xlsm
感謝幫忙 ><

TOP

回復 7# stillfish00


出來了出來了 !!
謝謝喔 !!^3^

TOP

        靜思自在 : 【時間無法遮擋】怕時間消逝,花了許多心血,想盡各式方法要遮擋時間,結果是:浪費了更多時間,且一無所成!
返回列表 上一主題