今天要講的例子,按照月份錄入數據。
問題如下:
解決的思路如下:·
代碼運行的結果如下:
代碼如下:
代碼解析
1:2~3行 DIM定義變量;
2:4行 用Month返回月份參數;
3:5~16行 遍歷每個工作表;
4:6行 排除“錄入”工作表;
5:7行 m記錄當前工作表的名稱;
6:8行 按月份把工作表的名稱進行拆分,並轉化成int類型;
7:9行 判斷月份是否相同;
8:10行 把需要錄入的信息放入arr;
9:11行 獲取當前工作表的最後一個非空單元格;
10:12~13行 把arr進行轉置之後賦值給當前工作表區域。
私信 視頻 可以獲取54集VBA入門視頻
私信 VBA或 vba 可以獲取文章中含VBA代碼的Excle文件
閱讀更多 浮雲Excel分享 的文章