https://bugs.documentfoundation.org/show_bug.cgi?id=146157

--- Comment #7 from Michael Kogan <[email protected]> ---
I added the following Macro and ran it:

_________________________________________
Sub Writer_Find_and_Replace_Formula( strFind As String, strReplace As String )
REM     This finds all occurrences of <strFind> within all Formula objects
embedded within the current Writer document,
REM and replaces the found occurrences by <strReplace>.
REM NB. This action can not be Undone via the menu "Edit : Undo".
        Dim oDoc As Object
        oDoc = ThisComponent

        Dim oEmbeddedObjects As Object, oObj As Object
        oEmbeddedObjects = oDoc.getEmbeddedObjects()

        Dim i As Integer
        For i = 0 To oEmbeddedObjects.getCount() - 1
                oObj = oEmbeddedObjects.getByIndex( i ).getEmbeddedObject()

                If oObj.ImplementationName =
"com.sun.star.comp.Math.FormulaDocument" Then      REM Found a Formula.
                        oObj.Formula = Join( Split( oObj.Formula, strFind ),
strReplace )               REM Perform Find & Replace.
                End If

        Next i
End Sub
_______________________________________

Reference:
https://ask.libreoffice.org/t/find-and-replace-for-formulas-in-libreoffice-writer/27113/5

-- 
You are receiving this mail because:
You are the assignee for the bug.

Reply via email to