在随机的字母和数字字符串中查找最后一个字母
Finding the last letter in a random string of letters and number
我希望能够在一个单元格中包含一个由数字和字母组成的字符串。然后能够拆分它,以便(包括)最后一个字母的文本位于一个单元格中,然后是下一个单元格中的剩余数字。
例如,如果字符串是 "sdgs214njkdsf123",那么 "sdgs214njkdsf" 将在一个单元格中,“123”将在另一个单元格中。
假设值在 A1 中:
Sub Splitter()
a = Range("A1").Value
For i = Len(a) To 1 Step -1
If Not IsNumeric(Mid(a, i, 1)) Then Exit For
Next i
part1 = Left(a, i)
part2 = Right(a, Len(a) - i)
End Sub
我希望能够在一个单元格中包含一个由数字和字母组成的字符串。然后能够拆分它,以便(包括)最后一个字母的文本位于一个单元格中,然后是下一个单元格中的剩余数字。
例如,如果字符串是 "sdgs214njkdsf123",那么 "sdgs214njkdsf" 将在一个单元格中,“123”将在另一个单元格中。
假设值在 A1 中:
Sub Splitter()
a = Range("A1").Value
For i = Len(a) To 1 Step -1
If Not IsNumeric(Mid(a, i, 1)) Then Exit For
Next i
part1 = Left(a, i)
part2 = Right(a, Len(a) - i)
End Sub