Rozwiązaniem takiego problemu może być własna funkcja napisana oczywiście w VBA. Kod funkcji należy wkleić do modułu publicznego:

' Wymaga biblioteki Excela
' ze względu na obiekt WorksheetFunction
Function PominTekst( _
     Tekst As String, Ogr1 As String, Ogr2 As String, _
     BezZbednychSpacji As Boolean)
     
     Dim Pocz As Long, Wynik As String
     Dim PozOgr1 As Long
     Dim PozOgr2 As Long
     Pocz = 1
     Do
         PozOgr1 = InStr(Pocz, Tekst, Ogr1)
         If PozOgr1 = 0 Then Exit Do
         PozOgr2 = InStr(PozOgr1 + 1, Tekst, Ogr2)
         Wynik = Wynik & Mid(Tekst, Pocz, PozOgr1 - Pocz)
         Pocz = PozOgr2 + 1
     Loop
     Wynik = Wynik & Mid(Tekst, Pocz)
     If BezZbednychSpacji Then
         PominTekst = WorksheetFunction.Trim(Wynik)
     Else
         PominTekst = Wynik
     End If
End Function

Dla formalności wersja PowerShella inspirowana wersją Artura:

PS Env:\> "Ala (123) ma (12) kota" -replace "\([^)]+\)"
Ala  ma  kota

Wyrażenie regularne skonstruowane analogicznie do poprzedniego rozwiązania z drobnymi zmianami w składni m.in.:

- nawiasy okrągłe zostały potraktowane dosłownie przez dodanie znaku "\"
- usunięte zostały opcje

Przy okazji nasuwa się jeszcze jedno usprawnienie - usuwanie zbędnych spacji:

PS Env:\> "Ala (123) ma (12) kota" -replace "\([^)]+\)\s+"
Ala ma kota

To ja jeszcze zaproponuję rozwiązanie dla osoby, która nie chce mieszać w takie sprawy programowania i zaproponuję wykonanie tego zadania zwykłą kwerendą.

Przyjmiemy następujące dane do oczyszczenia z fragmentu zawartego w nawiasach:

I stworzymy kwerendę, która wytnie znaki od strony lewej do "(" i połączy to z fragmentem tekstu wyciętym od strony prawej od ")".

Nazwa_konw: Trim(Left([Nazwa_kl];InStr(1;[nazwa_kl];"(")-1) & Right([nazwa_kl];Len([nazwa_kl])-InStr(1;[nazwa_kl];")")))

Gdzie [Nazwa_kl]  - top nazwa pola w którym wycinamy dane:

I efekt tego wycinania:

W rozwiązaniu dodatkowo umieściłem funkcję TRIM, która to potencjalnie zajmie się niepotrzebnymi spacjami.

Pozdrawiam.
Tomasz Grabowski.