返回列表 上一主題 發帖

[發問] 關於儲存圖表..

EGBT

帖子
127 
主題
38 
精華
0 
積分
166 
點名
0  
作業系統
Microsoft 
軟體版本
Windows 7 
閱讀權限
20 
性別
男 
註冊時間
2015-7-31 
最後登錄
2018-8-3 
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2016-1-16 21:29 | 只看該作者

[發問] 關於儲存圖表..

請問各位大大

範圍：A1:D6，畫出圖表 (長條圖)

然後貼上不同資料內容 (範圍大小都是 A1:D6)

每次貼上不一樣資料內容，長條圖會有不同的變化，

而我要儲存每次貼上長條圖的圖，

ActiveSheet.ChartObjects(1).Chart.Export Filename:="D:\" & i & ".jpg", FilterName:="jpg"

假設貼10次不同資料內容上去，會有10張圖，但是都只有一張圖，問題出在哪裡呢?
收藏 分享

准提部林

帖子
2833 
主題
10 
精華
0 
積分
2889 
點名
0  
作業系統
〔略〕 
軟體版本
〔略〕 
閱讀權限
100 
性別
男 
來自
〔略〕 
註冊時間
2013-5-13 
最後登錄
2024-11-17 
2#
發表於 2016-1-17 16:24 | 只看該作者
i 值並非變動值，每次都是同一檔名，當然不會有１０個檔案！

試試：
i=Format(Now, "yyyymmdd-hhmmss")
ActiveSheet.ChartObjects(1).Chart.Export Filename:="D:\" & i & ".jpg", FilterName:="jpg"

TOP

EGBT

帖子
127 
主題
38 
精華
0 
積分
166 
點名
0  
作業系統
Microsoft 
軟體版本
Windows 7 
閱讀權限
20 
性別
男 
註冊時間
2015-7-31 
最後登錄
2018-8-3 
3#
發表於 2016-1-18 11:04 | 只看該作者
回復 2# 准提部林


    好的，感謝大大的耐性回答∼我試試看

TOP

        靜思自在 : 稻穗結得越飽滿，越會往下垂，一個人越有成就，就要越有謙沖的胸襟。
返回列表 上一主題