用VBA提取字符串中的数字

上一篇讲了用 python 提取字符串中的数字，这次用VBA来实现。总体思路和 python 是一样的，代码如下：

Option Explicit

Sub GetNumbers()
    
    Dim from_string As String, convert_numbers As String
    Dim i, j, k, m, first_number_location
    Dim i1 As String
    Dim check_start(9) As String, check_end(10) As String
    Dim split_string() As String, get_numbers() As String
    
    ' 给 from_string 赋值
    from_string = Cells(