maxchou

帖子: 40
主題: 9
精華: 0
積分: 72
點名: 0
作業系統: xp
軟體版本: office 2010
閱讀權限: 20
性別: 男
註冊時間: 2011-8-19
最後登錄: 2024-10-28

1^# 跳轉到 » 正序看帖

打印

字體大小: tT

發表於 2011-8-19 17:30 | 只看該作者

[發問] 請問這種階梯圖有辦法用EXCLE畫出來嗎？

請問各位前輩高手，像附件這種圖形有辦法使用EXCEL畫出來嗎？
在此先謝過！

樓主熱帖

maxchou

中學生 Rank: 2

帖子: 40
主題: 9
精華: 0
積分: 72
點名: 0
作業系統: xp
軟體版本: office 2010
閱讀權限: 20
性別: 男
註冊時間: 2011-8-19
最後登錄: 2024-10-28

30^#

發表於 2011-9-12 23:13 | 只看該作者

回復 29# infoverdad

謝謝infoverdad前輩，這麼費心製作，我等一下就可以下載，好好研究一番。
X軸上的數字也曾讓我困惑，因為總調不出我要的數字與間隔。
再次感謝infoverdad前輩！有問題在請教您！thanks！

TOP

infoverdad

中學生 Rank: 2

帖子: 175
主題: 8
精華: 0
積分: 207
點名: 275
作業系統: WIN 10
軟體版本: Office 2010
閱讀權限: 20
性別: 女
註冊時間: 2011-6-30
最後登錄: 2024-11-22

2023年全勤獎章 2022虎年全勤獎章 2021牛年全勤獎章 2020鼠年全勤獎章 2019 豬年全勤獎章 2018 狗年全勤獎章

29^#

發表於 2011-9-12 19:49 | 只看該作者

本帖最後由 infoverdad 於 2011-9-12 19:53 編輯

回復 28# maxchou

趁假日認真改良一下：加上命名資料列巨集+限制及公式說明如附件

Brickstairs_VBAr03.rar (27.5 KB)

資料點類別X軸標籤：
依本例,BASE值設為10來解釋：若期望將某數列畫在X軸1~2間,
則將以10個[即(2-1)*BASE]資料點("1.1","1.2…,"2.0")來畫它

BASE值目的：
依本例,將X合計值(52.5)化為整數525 以上個資料點
但最多不能超過32,000個資料點

TOP

maxchou

中學生 Rank: 2

帖子: 40
主題: 9
精華: 0
積分: 72
點名: 0
作業系統: xp
軟體版本: office 2010
閱讀權限: 20
性別: 男
註冊時間: 2011-8-19
最後登錄: 2024-10-28

28^#

發表於 2011-9-11 17:55 | 只看該作者

回復 27# infoverdad

先謝過infoverdad前輩，我還差3分就可以下載了，我會記得這兩天來簽到，就可以升到中學生了。
infoverdad前輩真是有先見之明，知道我還需要作些調整，
這幾天我嘗試自己調整(包括直條圖數量，以及顏色)，就得花很多時間，也有時會常常出現錯誤，excel就關閉了，
最後也有嘗試先錄巨集，自己加迴圈(這部份也是有透過搜尋這網站的資料，才有辦法做到)，只是執行速度比預期慢，而且有時出現錯誤。
不過真的是很謝謝infoverdad前輩的指導，這段時間也了解到excel很多功能，能節省時間的方式的。
再次感謝！

TOP

infoverdad

中學生 Rank: 2

帖子: 175
主題: 8
精華: 0
積分: 207
點名: 275
作業系統: WIN 10
軟體版本: Office 2010
閱讀權限: 20
性別: 女
註冊時間: 2011-6-30
最後登錄: 2024-11-22

2023年全勤獎章 2022虎年全勤獎章 2021牛年全勤獎章 2020鼠年全勤獎章 2019 豬年全勤獎章 2018 狗年全勤獎章

27^#

發表於 2011-9-10 19:29 | 只看該作者

本帖最後由 infoverdad 於 2011-9-11 21:38 編輯

回復 25# maxchou

補上有重新繪圖巨集的檔,可選擇精確倍數
(目的：將X合計值52.5至少化為整數525 or 5250 or more
,但最多不能超過32,000個柱狀資料點)並減少手工調整! 希望有幫助.
打開檔案後,在"重畫階梯圖"的按鈕上按一下即可.

Brickstairs_VBA.rar (22.12 KB)

TOP

infoverdad

中學生 Rank: 2

帖子: 175
主題: 8
精華: 0
積分: 207
點名: 275
作業系統: WIN 10
軟體版本: Office 2010
閱讀權限: 20
性別: 女
註冊時間: 2011-6-30
最後登錄: 2024-11-22

2023年全勤獎章 2022虎年全勤獎章 2021牛年全勤獎章 2020鼠年全勤獎章 2019 豬年全勤獎章 2018 狗年全勤獎章

26^#

發表於 2011-9-8 09:17 | 只看該作者

回復 25# maxchou

託您的福,我也在過程中有所學習!!

TOP

maxchou

中學生 Rank: 2

帖子: 40
主題: 9
精華: 0
積分: 72
點名: 0
作業系統: xp
軟體版本: office 2010
閱讀權限: 20
性別: 男
註冊時間: 2011-8-19
最後登錄: 2024-10-28

25^#

發表於 2011-9-8 00:03 | 只看該作者

回復 24# infoverdad

真是太太太.......感謝infoverdad前輩了，終於可以畫出心中想要的圖了，
而且是連最後兩個小小的直條圖也可以畫出來，(放大到400％以上就可以明顯的看出來)
真的不知道要怎麼感謝～
就在讓我誠心的感謝一次吧！！
謝謝infoverdad前輩！

TOP

infoverdad

中學生 Rank: 2

帖子: 175
主題: 8
精華: 0
積分: 207
點名: 275
作業系統: WIN 10
軟體版本: Office 2010
閱讀權限: 20
性別: 女
註冊時間: 2011-6-30
最後登錄: 2024-11-22

2023年全勤獎章 2022虎年全勤獎章 2021牛年全勤獎章 2020鼠年全勤獎章 2019 豬年全勤獎章 2018 狗年全勤獎章

24^#

發表於 2011-9-7 17:27 | 只看該作者

本帖最後由 infoverdad 於 2011-9-7 23:58 編輯

回復 23# maxchou

修一下:
1. 請在定義名稱處rngBins中的 99與100 (如下公式紅字部份)改成 10000 (目的,增加它的精確度)
=TRANSPOSE(SUM(rngVol)*ROW(Sheet1!$1:$99)/100) 改成
=TRANSPOSE(SUM(rngVol)*ROW(Sheet1!$1:$10000)/10000)

2. 修改X軸刻度( 如圖)

修改後之圖如下:

TOP

maxchou

中學生 Rank: 2

帖子: 40
主題: 9
精華: 0
積分: 72
點名: 0
作業系統: xp
軟體版本: office 2010
閱讀權限: 20
性別: 男
註冊時間: 2011-8-19
最後登錄: 2024-10-28

23^#

發表於 2011-9-7 17:07 | 只看該作者

回復 22# infoverdad

感謝infoverdad前輩這麼即時的回答！
我嘗試直接修改數據，並把PLANT D, E改為有小數點的數據，以符合我RAW DATA會遇到的狀況，
可是卻發現直條圖只剩4條，這是什麼原因呢？(詳見附檔BAR_R.ZIP)

bar_r.zip (20.18 KB)
另又將數據修改成沒有小數點(詳見附檔BAR_R1.ZIP)，就又變成5條直條了，也就是希望畫出來的圖。

bar_r1.zip (20.17 KB)
這樣土法煉鋼測試，是不是代表小數點問題真是如同infoverdad前輩所說是個麻煩點。

TOP

infoverdad

中學生 Rank: 2

帖子: 175
主題: 8
精華: 0
積分: 207
點名: 275
作業系統: WIN 10
軟體版本: Office 2010
閱讀權限: 20
性別: 女
註冊時間: 2011-6-30
最後登錄: 2024-11-22

2023年全勤獎章 2022虎年全勤獎章 2021牛年全勤獎章 2020鼠年全勤獎章 2019 豬年全勤獎章 2018 狗年全勤獎章

22^#

發表於 2011-9-7 14:43 | 只看該作者

回復 21# maxchou

雖然如此,還是可以做的,之前提的網址所下載的那個funchart5_brickyard.zip 把rngBlank從來源資料移除,就可以做到(如附件)

brickyard-R1.rar (14.94 KB)
,其中有一段說明如下:
"All of the hard work in this file is done using defined names. These names create a series of 100 bars, then work out which plant is associated with each bar, and what the 'value' of the bar should be. The 100 bars are plotted on the chart and then formatted such that they appear to be a single column. To improve the accuracy, change the rngBins defined name to use up to 4,000 points (instead of the two 100's there already). "

rngVol =OFFSET(Sheet1!$B$5,0,0,COUNTA(Sheet1!$B:$B)-1,1)
rngVCum =OFFSET(rngVol,0,1)
rngCost =OFFSET(rngVol,0,2)
rngBins =TRANSPOSE(SUM(rngVol)*ROW(Sheet1!$1:$100)/100)
rngPlant =MATCH(rngBins,rngVCum,1)
rngSer1 =IF(rngPlant=1,INDEX(rngCost,1),0)
rngSer2 =IF(rngPlant=2,INDEX(rngCost,2),0)
rngSer3 =IF(rngPlant=3,INDEX(rngCost,3),0)
rngSer4 =IF(rngPlant=4,INDEX(rngCost,4),0)

TOP