excel - excel vba中单元格的引用部分

Question

我想知道一种在 VBA 中的 Excel 单元格中引用部分值的方法。例如，如果在单元格 A32 中我存储了 4200 cc。我想在 VBA 中的宏中仅引用 4200 进行计算。因此，就像可以使用索引在 python 中引用字符串或列表一样，我希望能够做到这一点。谢谢！

Answer 1

像这样的东西（？）：

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

Answer 2

您可以创建一个函数来拆分单元格的内容，然后分别处理您想要的部分。

Dim content As Variant 
content = Split(Range("A32").Value, " ") 

Answer 3

将单元格值作为字符串 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