Excel VBA中的拆分日期和字符串

Question

我需要按照以下格式从数据中获取一小部分时间：

'166:05 hod:min'

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

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

Answer 1

您可以在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