可以用EXCEL實現,不需要VBA。先來拆解需求,完成100%是藍色,50%-100%是黃色,其他是紅色,這個可以理解為把資料分為3個系列,在圖表中不同系列不同顏色。第一步,新增輔助列-系列,函式-LOOKUP0到50%為1類,50%到100%為2類,100%為3類,利用公式=LOOKUP(D2,$J$1:$K$3)獲取分類列。如圖:第二步,新增輔助列-系列123,函式VLOOKUP將表格做成如下形式:F2單元格中的公式為=IFERROR(VLOOKUP($A2&F$1,IF({1,0},$A$2:$A$7&$E$2:$E$7,$C$2:$C$7),2,FALSE),0)填好之後使用Ctrl+Shift+Enter,因為公式中涉及陣列,這樣才能得出結果。成功後公式外會自動顯示花括號。然後拖動單元格填充即可。第三步,插入堆積條形圖選擇ABFGH列插入後格式很亂,需要自己調整。1、選擇資料-新增系列-選擇B列資料-移到首位2、編輯分類標籤-選擇A列資料圖表變成這個樣子:3、選擇開始系列-修改為無填充4、選擇水平座標軸-邊界最小值填入7/265、選擇垂直座標軸-勾選逆序類別6、將系列填充為想要的顏色結果如下:這樣在修改進度時,系列會聯動變化,後面所屬系列值也會聯動改變。完成。
可以用EXCEL實現,不需要VBA。先來拆解需求,完成100%是藍色,50%-100%是黃色,其他是紅色,這個可以理解為把資料分為3個系列,在圖表中不同系列不同顏色。第一步,新增輔助列-系列,函式-LOOKUP0到50%為1類,50%到100%為2類,100%為3類,利用公式=LOOKUP(D2,$J$1:$K$3)獲取分類列。如圖:第二步,新增輔助列-系列123,函式VLOOKUP將表格做成如下形式:F2單元格中的公式為=IFERROR(VLOOKUP($A2&F$1,IF({1,0},$A$2:$A$7&$E$2:$E$7,$C$2:$C$7),2,FALSE),0)填好之後使用Ctrl+Shift+Enter,因為公式中涉及陣列,這樣才能得出結果。成功後公式外會自動顯示花括號。然後拖動單元格填充即可。第三步,插入堆積條形圖選擇ABFGH列插入後格式很亂,需要自己調整。1、選擇資料-新增系列-選擇B列資料-移到首位2、編輯分類標籤-選擇A列資料圖表變成這個樣子:3、選擇開始系列-修改為無填充4、選擇水平座標軸-邊界最小值填入7/265、選擇垂直座標軸-勾選逆序類別6、將系列填充為想要的顏色結果如下:這樣在修改進度時,系列會聯動變化,後面所屬系列值也會聯動改變。完成。