[算表] ExcelVBA 語法問題

看板Office作者 (ggyy)時間11年前 (2014/09/25 08:09), 11年前編輯推噓0(0015)
留言15則, 2人參與, 最新討論串1/1
軟體:ExcelVBA 版本:2007 小弟最近要做Chart 以下是程式碼 chart.add activechart.chartType = xlColumnClustered activeChart.SetSourceData Source := Sheets("table").Range("A1:D8"),PlotBy := _ xlRows activeChart.Location Where := xlLocationAsObject , Name := "table" 小弟的問題 1. 有沒有辦法將Range("A1:D8")改成Range(cells(1,1),cells(8,4)) 因為沒有成功,也不知到哪裡出問題....... 2. 原本想設計成 xlLocationNewChart 讓生成的圖都在一個分頁,而且圖很大 但是發現沒辦法看過一次就刪掉 請問刪掉那個chart的分頁的語法是哪個 3. 因為第二個問題的關係,所以我改成貼在工作表上,然後每個新生成的圖 都會附蓋之前生成的舊的圖....,因為也不會刪掉貼在工作表上的圖, 所以用覆蓋的..., 請問怎麼將圖放大到很大有第三個問題的效果 4. 有沒有辦法將之前生成的圖刪掉的語法 希望各位大大能夠抽空幫我解答,先在這邊謝謝大大了! -- ※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 220.135.47.243 ※ 文章網址: http://www.ptt.cc/bbs/Office/M.1411603785.A.011.html ※ 編輯: billchen123 (220.135.47.243), 09/25/2014 08:20:18

09/25 08:42, , 1F
問題1先將位置暫存字串再丟到range內http://goo.gl/RuAbvc
09/25 08:42, 1F

09/25 08:43, , 2F
2.刪掉分頁想到的是sheets.delete
09/25 08:43, 2F

09/25 08:46, , 3F
3.刪掉貼在工作表上的圖,有命名的話就ActiveSheet.Shapes
09/25 08:46, 3F

09/25 08:46, , 4F
("chart1").Delete
09/25 08:46, 4F

09/25 08:49, , 5F
4.刪掉之前生成的圖,假設都沒有命名的話
09/25 08:49, 5F

09/25 08:50, , 6F
用for each shp in activesheet.shapes ...next
09/25 08:50, 6F

09/25 08:50, , 7F
迴圈內加上if shp.type = msochart then
09/25 08:50, 7F

09/25 08:51, , 8F
shp.delete 來刪除,shp是自訂變數,宣告類型為shape
09/25 08:51, 8F

09/25 11:00, , 9F
謝謝大大幫忙!! 我待會試試看!
09/25 11:00, 9F

09/25 11:05, , 10F
大大給的例子正是我要的功能!!! 謝謝大大!!!!
09/25 11:05, 10F

09/25 11:07, , 11F
^^
09/25 11:07, 11F

09/25 11:07, , 12F
小弟後來測試 usedrange 可以用,跟大大分享這個資訊
09/25 11:07, 12F

09/25 11:08, , 13F
也謝謝大大額外分享 當Chart 在sheet上怎麼刪圖
09/25 11:08, 13F

09/25 11:10, , 14F
感謝分享^^
09/25 11:10, 14F

09/25 11:14, , 15F
也可用currentregion
09/25 11:14, 15F
文章代碼(AID): #1K8rr90H (Office)
文章代碼(AID): #1K8rr90H (Office)