第一种方法是使用Excel的函数来实现。可以使用SUBSTITUTE和TEXT函数来将“一二三”转换为“123”。具体步骤如下:
在Excel中,打开一个新的工作表。
在第一列输入“一二三”。
在第二列输入以下公式:=SUBSTITUTE(SUBSTITUTE(TEXT(INT(A2),[DBNum2][$-804]),”一”,”1″),”二”,”2″)
按下回车键,公式将自动计算并将“一二三”转换为“123”。
将第二列的单元格复制并粘贴到需要转换的单元格中,即可将“一二三”转换为“123”。
第二种方法是使用VBA宏来实现。具体步骤如下:
在Excel中,按下Alt + F11打开Visual Basic Editor。
在左侧的项目资源管理器中,双击需要添加宏的工作表。
在代码窗口中,输入以下代码:
![请问怎样使用函数将 一二三,直接转换为123? =SUBSTITUTE(SUBSTITUTE(TEXT(INT(A2),[DBNum2][$](http://www.shoesin.cn/wp-content/uploads/2023/08/a792feabaecfa9abdbfb1b0cf8f84a45.png)
Function ChineseToNumber(ByVal str As String) As Long
Dim i As Long
Dim n As Long
n = 0
For i = 1 To Len(str)
Select Case Mid(str, i, 1)
Case “一”
n = n * 10 + 1
Case “二”
n = n * 10 + 2
Case “三”
n = n * 10 + 3
Case “四”
n = n * 10 + 4
Case “五”
n = n * 10 + 5
Case “六”
n = n * 10 + 6
Case “七”
n = n * 10 + 7
Case “八”
n = n * 10 + 8
Case “九”
n = n * 10 + 9
End Select
Next i
ChineseToNumber = n
End Function
关闭Visual Basic Editor。
在Excel中,输入以下公式:=ChineseToNumber(“一二三”)
按下回车键,公式将自动计算并将“一二三”转换为“123”。
将公式复制并粘贴到需要转换的单元格中,即可将“一二三”转换为“123”。
无论是使用函数还是VBA宏,都可以将“一二三”转换为“123”,具体选择哪种方法取决于个人的喜好和需求。