Excel VBA 帶有分子分母的字符串轉換成數據格式

今天要講的例子,主要數據格式的轉換。

問題如下:

Excel VBA 帶有分子分母的字符串轉換成數據格式

解決的思路如下:

Excel VBA 帶有分子分母的字符串轉換成數據格式

代碼運行的結果如下:

Excel VBA 帶有分子分母的字符串轉換成數據格式

代碼如下:

Excel VBA 帶有分子分母的字符串轉換成數據格式

代碼解析

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文件


分享到:


相關文章: