今天講的實例如下:
問題如下:
解決的思路如下:
代碼運行的結果如下:
代碼如下:
代碼解析
1:2~3行 dim定義變量;
2:4行 把數據放入數組
3:5行 後期綁定字典;
4:6~19行 判斷年份及供應商是否存在,如果存在則創建一個新的字典,客戶作為新字典的key,金額的和作為字典的item;
5:22行 讀取B1、B2單元格的內容;
6:23~29行 當字典的數據小於6個的適合,直接讀取數據,並用sort直接對區域進行排序。
7:31~47行 當字典的數據大於6個的適合,清空輔助列F、G的數據,寫入字典的內容在相關的區域,用sort進行排序,讀取最大的五個數據,對字典的item及你選哪個求和。計算others的數據。
私信 視頻 可以獲取54集VBA入門視頻
私信 VBA或 vba 可以獲取文章中含VBA代碼的Excle文件
閱讀更多 浮雲Excel分享 的文章