今天要講的例子,主要數據格式的轉換。
問題如下:
解決的思路如下:
代碼運行的結果如下:
代碼如下:
代碼解析
1:2~4行 DIM定義變量;
2:5行 獲取最後一個非空單元格;
3:6~26行 遍歷整個工作表的一列;
4:7行 查找B列包含有“尺碼”的單元格;
5:8行 獲取該單元格區域內的,最後一個非空單元格;
6:9行 把獲得的區域,賦值給數組arr;
7:10~11行 用兩個for循環 遍歷數組arr;
8:12行 判斷字符串裡面是否包含“-”,此判斷是為了排除整數的部分;
9:13行 用nn記錄拆分出來的整數部分;
10:14行 用mm記錄拆分出來的分子及分母,並計算的結果;
11:15行 把結果再賦值給數組
12: 17行 用like函數判斷是否為純分母,代碼解析同14行代碼;
13:23行 把單元格區域的格式,變更為數值,並保留兩位數的格式。
14:24行 把數組arr,再賦值給該單元格區域。
私信 視頻 可以獲取54集VBA入門視頻
私信 VBA或 vba 可以獲取文章中含VBA代碼的Excle文件
閱讀更多 浮雲Excel分享 的文章