PTT
Submit
Submit
選擇語言
正體中文
简体中文
PTT
Office
[算表] 批次畫圖x.y散布圖
作者:
Tampa
(光芒)
2017-11-29 21:11:38
軟體:excel
版本:2007
以下為我錄製的巨集程式碼
ActiveSheet.Shapes.AddChart.Select
ActiveChart.ChartType = xlXYScatter
ActiveChart.SeriesCollection.NewSeries
ActiveChart.SeriesCollection(1).Name = "='6點配置與借車'!$A$2"
ActiveChart.SeriesCollection(1).XValues = "='6點配置與借車'!$E$2:$E$185"
ActiveChart.SeriesCollection(1).Values = "='6點配置與借車'!$H$2:$H$185"
Range("N6").Select
ActiveSheet.Shapes.AddChart.Select
ActiveChart.ChartType = xlXYScatter
ActiveChart.SeriesCollection.NewSeries
ActiveChart.SeriesCollection(1).Name = "='6點配置與借車'!$A$186"
ActiveChart.SeriesCollection(1).XValues = "='6點配置與借車'!$E$186:$E$369"
ActiveChart.SeriesCollection(1).Values = "='6點配置與借車'!$H$186:$H$369"
End Sub
圖表標題固定為A2 A186 (等差184)
圖表資料範圍固定為E2:E185
下一張圖表資料範圍固定為E186:E369(等差也為184)
共34張圖表需要繪設
請問欄位那邊 怎麼利用迴圈方式取代,可以讓他自己繪圖
有試用過
for i = 2 to 6256 step183
"='6點配置與借車'!$J$2:$J$185" 寫成=” '6點配置與借車'!$H$"&i&:i+183
但還是跑不出來,請問有大大可以幫忙解惑 或是指點一下嗎?
作者: soyoso (我是耀宗)
2017-11-29 21:22:00
列偏移上 "j" & i & ":j" & i+183
作者:
Tampa
(光芒)
2017-11-29 21:27:00
S大我有點笨 請問是把後面那欄改掉嗎?
作者: soyoso (我是耀宗)
2017-11-29 21:30:00
為錄製巨集碼內範圍的部分,配合迴圈連接成範圍字串寫法為name、xvalues、values後面的部分原po的範圍欄都是j欄嗎?如果是的話,回文內":i"改為":j"
作者:
Tampa
(光芒)
2017-11-29 21:49:00
都是J欄沒錯
繼續閱讀
[算表] 想寫一個可快速查詢存貨的方法
ctchens
[問題] 只要更動內容就改顏色
thethirdfoot
[算表] 根據時間做資料回傳
eminemrap0
[問題] Outlook 郵件顯示方式
kaaa11
[算表] 設定格式條件
a62312000
[文件] LibreOffice個人設定的備份?
solomn
[算表] 字被吃掉 (非Insert鍵關係)
Ibrahimovic
[算表] 統計趨勢圖的問題
Lo78
[問題] 365續約問題
x61s
[問題] 請問大家都如何學習outlook2016?
cat99961
Links
booklink
Contact Us: admin [ a t ] ucptt.com