我有個圖表需要事後去指定範圍跟相關的變數
我先這樣作
Sheets("圖表顯示").Select
ActiveSheet.ChartObjects("圖表 1038").Activate
ActiveChart.SeriesCollection(1).Select
ActiveChart.SetSourceData Source:=Sheets("輸入數據").Range("B" & b1 & ":B" & b2), PlotBy _
:=xlColumns
ActiveChart.SeriesCollection(1).XValues = Sheets("輸入數據").Range("A" & b1 & ":A" & b2)
With ActiveChart
.HasAxis(xlCategory, xlPrimary) = True
.HasAxis(xlValue, xlPrimary) = True
End With
ActiveChart.Axes(xlCategory, xlPrimary).CategoryType = xlCategoryScale
那個b1跟b2是使用者填入儲存格的範圍
現在位址"A""B"也要要改成動態的
由使用者輸入fx後看是A還是A
我改成這樣以後
ActiveChart.SetSourceData Source:=Sheets("輸入數據").Range(Cells(b1, fx), Cells(b2, fx)), PlotBy _
:=xlColumns
結果發生
直接階段錯誤'1004'
Cells方法('Global'物件)失敗
是否還有其他可以動態選擇範圍的方法呢？？
還有想問一下喔！！
像那個圖表我每拉一個出來他就會用流水號自訂一個號碼
比如這次～～圖表 1038
然後另外一個就變成～～圖表 1038
這個是否可以改成自行定義的呢？
|
