excel - 如何将 "fraction"字符转换为十进制？

Question

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

10 ¾ AB 02/15/19

我正在尝试将 3/4 转换为 .75，以便数据如下所示:

10.75 AB 02/15/19

我正在考虑尝试迭代字符串中的每个字符，但是一旦这样做，如何将 3/4 转换为 .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

注释:

我们替换分数之前的空格以及分数以获得所需的结果。
您可能需要考虑其他统一代码“分数”。