vba - 如何拆分字符串并存储在变量中？

我想拆分某个字符串并将它们存储在一个变量中。

  GetID = "13H4"
  sSplit = Split(GetID)

我想拆分它们并将“13”存储在一个变量中，将“4”存储在另一个变量中。

我不想使用 MID、RIGHT、LEFT 方法，因为我不想放置字符串的位置来获得“13”或“4”。大家知道怎么做吗？

谢谢你们。

最佳答案

以下是一些向您展示如何做到这一点的可能性:

Dim var1 As String, _
    var2 As String, _
    sSplit() As String
  GetID = "13H4"

  sSplit = Split(GetID, "H")
  var1 = sSplit(0)
  var2 = sSplit(1)

'--- OR ---

  var1 = Split(GetID, "H")(0)
  var2 = Split(GetID, "H")(1)

如果你想直接输出数字而不是数字的文本，这将是这样做的方法:

Dim var1 As Integer, _
    var2 As Integer, _
    sSplit() As String

  GetID = "13H4"
  sSplit = Split(GetID, "H")
  var1 = CInt(sSplit(0))
  var2 = CInt(sSplit(1))

关于vba - 如何拆分字符串并存储在变量中？，我们在Stack Overflow上找到一个类似的问题：https://stackoverflow.com/questions/32861636/