You can with vba

Sub ReplaceText()

Dim strchange As String
Dim strto As String
Dim fromslide As Integer
Dim toslide As Integer
Dim n As Integer
Dim oSld As Slide
Dim oShp As Shape
Dim oTxtRng As TextRange
Dim oTmpRng As TextRange

 
       strchange = InputBox("change")
       strto = InputBox("to")
       fromslide = InputBox("From slide")
       toslide = InputBox("To slide")

For n = fromslide To toslide
Set oSld = Application.ActivePresentation.Slides(n)
   
For Each oShp In oSld.Shapes
Set oTxtRng = oShp.TextFrame.TextRange
Set oTmpRng = oTxtRng.Replace(FindWhat:=strchange, _
Replacewhat:=strto, WholeWords:=True)
Do While Not oTmpRng Is Nothing
Set oTxtRng = oTxtRng.Characters(oTmpRng.Start + oTmpRng.Length, _
oTxtRng.Length)
Set oTmpRng = oTxtRng.Replace(FindWhat:=strchange, _
Replacewhat:=strto, WholeWords:=True)
Loop
Next oShp
Next n
End Sub