안녕하세요? 아래 내용을 참고해보셔요.
Sub test()
Dim V
Dim strNum
strNum = "+50 +90 -30 +70 +10 +58.599"
V = Split(strNum, " ")
For i = 0 To UBound(V)
If V(i) <> "" Then
Debug.Print V(i)
End If
Next
End Sub
다음검색