从右到左拆分[重复]

【问题标题】：Split From Right to Left [duplicate]从右到左拆分[重复]
【发布时间】：2021-12-10 22:41:57
【问题描述】：

到目前为止，我的代码已用于拆分

如何将其从右向左拆分？

Sub try()
Dim size As String
Dim ResultSize() As String
Dim i As Integer
Dim MaxSize As Integer

size = "36;37;38;39"
ResultSize = Split(size, ";")
MaxSize = UBound(ResultSize)

For i = 0 To MaxSize
  Debug.Print ResultSize(i)
Next i

End Sub

【问题讨论】：

或者你只需要向后循环数组：For i = MaxSize to 0 Step -1

标签： excel vba split

【解决方案1】：

你可以这样试试

Sub try()
Dim size As String
Dim ResultSize() As String
Dim i As Integer
Dim MaxSize As Integer

size = "36;37;38;39"
ResultSize = Split(size, ";")
MaxSize = UBound(ResultSize)

For i = MaxSize to 0 Step -1
  Debug.Print ResultSize(i)
Next i

End Sub

【讨论】：