2

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

4

3 回答 3

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
于 2013-06-25T14:39:51.660 回答
0

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

Dim content As Variant 
content = Split(Range("A32").Value, " ")
于 2013-06-25T14:42:43.700 回答
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
于 2013-06-25T14:44:18.407 回答