我在一个单元格中有数据(例如,ND(1.37)),需要以不同的方式显示它(ND<1.37)。
是否有一种通过宏或短脚本快速简便地完成此操作的方法?
提前致谢!
编辑:我还没有尝试太多(我对 Excel 宏还不太熟悉),但我正在寻找的一个例子是:
ND(494) 至 ND<494
ND(319) 至 ND<319
ND(2.19) 至 ND<2.19
本质上,我正在尝试将 ND(###) 更改为 ND<###。
答案1
我认为这可以满足您的需要:
Sub test()
Dim a As String
Dim cell As Object
For Each cell In Selection
cell.Select
a = ActiveCell.Text
ActiveCell.Formula = Replace(Replace(a, "(", "<"), ")", "")
Next
End Sub
答案2
如果全部你的细胞含有,你可以使用ND(something)
="ND<" & LEFT(RIGHT(A1,LEN(A1)-3),LEN(A1)-4)
如果您有与该模式不匹配的数据,则必须指定您想要的结果。