日本免费全黄少妇一区二区三区-高清无码一区二区三区四区-欧美中文字幕日韩在线观看-国产福利诱惑在线网站-国产中文字幕一区在线-亚洲欧美精品日韩一区-久久国产精品国产精品国产-国产精久久久久久一区二区三区-欧美亚洲国产精品久久久久

Excel另類的柱形餅圖 excel柱形圖和餅圖適用場合

在tableau里可以很輕易的做出下面的圖表 , 但是相比之下 , excel的應用更加廣泛 , 于是我嘗試用excel將其做出 。我大概倒騰了一個下午 , 如果只是簡簡單單的做個一次性的那還算簡單 , 當你看完我這篇文章也就會了 , 耗費我時間的是怎樣讓其在篩選的
在tableau里可以很輕易的做出下面的圖表 , 但是相比之下 , excel的應用更加廣泛 , 于是我嘗試用excel將其做出 。

Excel另類的柱形餅圖 excel柱形圖和餅圖適用場合


我大概倒騰了一個下午 , 如果只是簡簡單單的做個一次性的那還算簡單 , 當你看完我這篇文章也就會了 , 耗費我時間的是怎樣讓其在篩選的時候可以動態(tài)變換 。
Excel另類的柱形餅圖 excel柱形圖和餅圖適用場合


先說說怎么做出柱狀餅圖組合圖 。我隨機準備了一些數據 。
第一步:制作組合圖
Excel另類的柱形餅圖 excel柱形圖和餅圖適用場合


第二步:制作餅圖(每個月份制作一個餅圖) 。
【Excel另類的柱形餅圖 excel柱形圖和餅圖適用場合】
Excel另類的柱形餅圖 excel柱形圖和餅圖適用場合


第三步:調整縱坐標軸(此操作為了讓餅圖不超出圖表區(qū)域) 。
Excel另類的柱形餅圖 excel柱形圖和餅圖適用場合


第四步:逐個將餅圖復制黏貼為圖片 , 再剪切圖片黏貼到輔助系列的每個數據點上 。
Excel另類的柱形餅圖 excel柱形圖和餅圖適用場合



Excel另類的柱形餅圖 excel柱形圖和餅圖適用場合


第五步:再制作一個餅圖 , 將圖例截圖成圖片放到圖表里即可 。
Excel另類的柱形餅圖 excel柱形圖和餅圖適用場合


逐個黏貼 , 圖表就操作完成了 。
如果是制作可篩選的報表 , 那就需要額外增加進行一些操作 。
首先需要將餅圖逐個命名 。比如1月餅圖命名為1月 , 2月餅圖命名為2月……
記住名稱必須是橫坐標那一列文字 , 圖表命名為組合圖 , 因為后面代碼要用到 。
Excel另類的柱形餅圖 excel柱形圖和餅圖適用場合


然后我們再在當前sheet里放置代碼 。
Excel另類的柱形餅圖 excel柱形圖和餅圖適用場合


最后組合框指定宏添加餅圖 。
代碼需要修改的地方我做了備注 , 其余代碼無需改動即可使用 。這里需要說明的是 , 圖表橫坐標的排序需要和單元格中一致(無特殊設置 , 通常情況是一致的) 。如有疑問 , 歡迎留言 。
Sub 添加餅圖()i = 1Set rg = Range("a2:a6") '橫坐標所在位置Set ch = ActiveSheet.ChartObjects("組合圖") '圖表名稱num = 2 '第幾個系列改為添加餅圖ms = Range("a9").Value '設置縱坐標最大值Application.ScreenUpdating = Falsech.ActivateActiveChart.Axes(xlValue).MaximumScale = msFor Each r In rgActiveSheet.ChartObjects(r).ActivateActiveChart.ChartArea.selectActiveChart.ChartArea.CopyRange("a1").selectActiveSheet.Pictures.Paste.selectSelection.Cutch.ActivateActiveChart.FullSeriesCollection(num).Points(i).selectSelection.PasteApplication.CutCopyMode = Falsei = i + 1NextApplication.ScreenUpdating = Truech.ActivateEnd Sub

    推薦閱讀