发布网友 发布时间:2022-04-23 11:21
共3个回答
热心网友 时间:2022-07-12 10:26
'自定义公式-按ALT+F11-插入模块-粘贴代码-将表格另存为启用宏的格式
Function cs(a As String)
b = Application.Substitute(Application.Substitute(a, "×", "*"), "÷", "/")
cs = Evaluate(b)
End Function
热心网友 时间:2022-07-12 11:44
将"×"替换成"*";将"÷ "替换成"/ ";将"["替换成"(" ;将"]"替换成")"。这样即可参与计算,若想加到第二列,可用替换公式。追问=ROUND(EVALUATE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE('1计'!$F3,"[","("),"]",")"),"×","*"),"÷","/")),2)追答我用WPS还是可以正常计算出来啊,你这是用的什么?是不是版本低了?
热心网友 时间:2022-07-12 13:19
'自定义公式-按ALT+F11-插入模块-粘贴代码-将表格另存为启用宏的格式Function cs(a As String)b = Application.Substitute(Application.Substitute(a, "×", "*"), "÷", "/")cs = Evaluate(b)End Function...