如何将“小数”字符转换为小数？

Question

我有一个数据集，其数据格式如下：

10 ¾ AB 02/15/19

我正在尝试将¾转换为.75，以便数据看起来像这样：

10.75 AB 02/15/19

我正在考虑尝试遍历字符串中的每个字符，但是一旦这样做，如何将¾转换为.75？

Answer 1

简单的字符串替换集：

Public Function numerify(s As String) As String
    numerify = Replace(s, " " & ChrW(190), ".75")
    numerify = Replace(numerify, " " & ChrW(188), ".25")
    numerify = Replace(numerify, " " & ChrW(189), ".5")
End Function

注释：

我们在分数以及分数之前替换空格，以获得所需的结果。
您可能还需要考虑其他unicode的“分数”。