string - 在 Excel VBA 中拆分日期和字符串

Question

我需要从以下格式的数据中获取数小时：

'166:05 hod:min'

第一个数字是小时数，接下来':'是分钟数。其余的可以扔掉。

我的想法是拆分第一个数字，将第二个数字相加除以60 [166:05 -> 166,08]，但我是 VBA 和这些东西的初学者。

score 1 · Accepted Answer

您可以简单地使用 VBA 中的拆分命令，

Dim splitTarget() As Variant
Dim splitMin() as Variant

splitTarget  = Split('166:05 hod:min', ":")

splitTarget(0)应该返回 166 并且splitTarget(1)应该返回 '05 hod'

splitMin = Split(splitTarget(0), " ")

SplitMin(0) 会给你 05

1 回答 1