excelde regex ile desen yakalama

[spasmex97]

elimde bir veri seti var bu veri seti şu şekile oluşuyor xxx.111111.aa / ab _a / _b ama bazen şu şekilde olabiliyor xxx.a111111.aa /ab _a / _b
xxx.111111.aa_a
xxx.111111.ab_a
xxx.111111.aa_b
xxx.a111111.aa_a
gibi örnekler arttırılabilir, yapmak istediğim şey regex desen yakalama ile xxx".x111111" tarafını yakalamak, office insider programına dahilim, excelde fonksiyonlar mevcut

 

[Erdem Akdemir]

Aşağıdaki kodu kullanabilirsiniz.

Sub Regex_Test()

    Set regex = CreateObject("VBScript.RegExp")
    
    regex.Pattern = "^([^\.]*\.[^\.]*)\."
    regex.Global = False

    For Each cell In Range("A1:A4")
        If Not IsEmpty(cell.Value) Then
            Set matches = regex.Execute(cell.Value)
            If matches.Count > 0 Then
                cell.Offset(0, 1).Value = matches(0).SubMatches(0)
            End If
        End If
    Next cell
End Sub

 

[spasmex97]

Aşağıdaki kodu kullanabilirsiniz.

Sub Regex_Test()

    Set regex = CreateObject("VBScript.RegExp")
   
    regex.Pattern = "^([^\.]*\.[^\.]*)\."
    regex.Global = False

    For Each cell In Range("A1:A4")
        If Not IsEmpty(cell.Value) Then
            Set matches = regex.Execute(cell.Value)
            If matches.Count > 0 Then
                cell.Offset(0, 1).Value = matches(0).SubMatches(0)
            End If
        End If
    Next cell
End Sub

peki xxx.a111111 olan kısmı 2 ayrı sütüna
xxx.111111 ve a111111 şeklinde nasıl ayırabilirim?