如何在 Excel 中解析我的字符串
How to parse my String in Excel
我从我的 Android 设备中获得了一些统计数据。简单地说,我如何检索 Excel 中的每个字段(我想在 Excel 中简单地完成而不使用外部语言)?
例如,如何获取 vel
值 18.5
并存储在另一个单元格中。
Location[gps 40.459137,-87.661198 acc=8 et=+5d16h57m45s127ms alt=194.0 vel=18.5 bear=89.9 {Bundle[mParcelledData.dataSize=44]}]
注意: 请注意,18.5 也可以是 7.0。所以值的长度并不总是固定的。
使用 A1 中的数据,在另一个单元格中输入:
=LEFT(MID(A1,FIND("vel=",A1)+LEN("vel="),999),FIND(" ",MID(A1,FIND("vel=",A1)+LEN("vel="),999))-1)
这是一个VBA解决方案:
Function GetVel(s As String) As Double
Dim fields As Variant
Dim i As Long
fields = Split(s)
For i = LBound(fields) To UBound(fields)
If fields(i) Like "vel=*" Then
GetVel = Val(Split(fields(i), "=")(1))
Exit Function
End If
Next i
End Function
在标准代码模块中输入后,您可以像工作表函数一样使用它:
我从我的 Android 设备中获得了一些统计数据。简单地说,我如何检索 Excel 中的每个字段(我想在 Excel 中简单地完成而不使用外部语言)?
例如,如何获取 vel
值 18.5
并存储在另一个单元格中。
Location[gps 40.459137,-87.661198 acc=8 et=+5d16h57m45s127ms alt=194.0 vel=18.5 bear=89.9 {Bundle[mParcelledData.dataSize=44]}]
注意: 请注意,18.5 也可以是 7.0。所以值的长度并不总是固定的。
使用 A1 中的数据,在另一个单元格中输入:
=LEFT(MID(A1,FIND("vel=",A1)+LEN("vel="),999),FIND(" ",MID(A1,FIND("vel=",A1)+LEN("vel="),999))-1)
这是一个VBA解决方案:
Function GetVel(s As String) As Double
Dim fields As Variant
Dim i As Long
fields = Split(s)
For i = LBound(fields) To UBound(fields)
If fields(i) Like "vel=*" Then
GetVel = Val(Split(fields(i), "=")(1))
Exit Function
End If
Next i
End Function
在标准代码模块中输入后,您可以像工作表函数一样使用它: