高考问答火影ol无梨甚八雷主:Excel表达式忽略文本
来源：百度文库 编辑：高考问答 时间：2024/04/29 10:41:24
如:
单元格1 = 3200.2[十月结余]+2889.0[十一月收入]-1459.6[十一月支出]
单元格2 = 单元格1的运算结果
如何忽略中括号"[]"里面的文字部分而在单元格2中得到数值的结果?
谢谢你!
今天早上把代码写了出来，可以实现楼主的要求了，一定要给分阿~~~
在EXCEL裏按ctrl+F11 调出VBA ，然后直接拷贝下面代码到右面
Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
Dim a As String
Dim Count As Integer
Dim k As Integer
Dim z() As Double
Dim x() As String
Dim y As Integer
Dim Result As Double
k = 1
ReDim z(0)
ReDim x(0)
'' 指定原始单元格
a = Trim(Range("a1"))
count1 = Len(a)
Do While k <> 0
Count = Len(a)
k = InStr(a, "[")
If k = 0 Then
GoTo ERROR
End If
ReDim Preserve z(y + 1)
z(y) = Left(a, k - 1)
y = y + 1
k = InStr(a, "]")
k = Count - k
a = Right(a, k)
Count = Len(z(y - 1))
Loop
For y = 0 To UBound(z)
Result = Result + z(y)
Next y
'' 指定结果单元格
Range("a2") = Result
Exit Sub
ERROR:
Range("a2") = Range("a1")
End Sub
在你改变A1单元格的时候A2单元格会自动计算A1中的数字。
好像是不可以的，因为excel的表达式格式是固定的
如：a3=d2+f6 ，a4=4500+b3-20*c7,round(11/7,2)=1.57
但你可以在存放3200.2和2889.0的单元格上添加注释，这样当鼠标移到
相应的单元格上时，就会有黄色的框框出现，显示文字“十月结余”，“十一月收入”等等。