我想知道在VBA中引用Excel中单元格中某部分值的方法。例如,如果在单元格A32中我存储了4200 cc。我想在VBA的宏中仅引用4200进行计算。因此,就像人们可以使用索引引用python中的字符串或列表一样,我希望能够做到这一点。谢谢!
答案 0 :(得分:2)
像这样(?):
Dim tmpArr
tmpArr = Split(Range("A32"), " ")
'any calculation in vba in this way:
Range("B32") = tmpArr(0) / 100
'results with 42 in cell B32
编辑如果对拆分结果的第一部分的数字识别有任何疑问,您可以通过这种方式进行额外转换:
'conversion to Double type
Range("B32") = CDbl(tmpArr(0))/100
答案 1 :(得分:0)
您可以创建一个功能来分割单元格的内容,然后单独处理所需的部分。
Dim content As Variant
content = Split(Range("A32").Value, " ")
答案 2 :(得分:0)
将单元格值作为字符串s并返回数字部分?
Function GetNumber(s As String)
Dim j As Long
While Not IsNumeric(Left(s, 1))
If Len(s) <= 1 Then
Exit Function
Else
s = Mid(s, 2)
End If
Wend
GetNumber = Val(s)
End Function