Hi @ahmedAlie ,
In order to replace picture with text in word, you can refer to the following code.
Private Sub FindAndReplaceImages(ByVal d As Document) Dim missing As Object = System.Reflection.Missing.Value Dim ranges As List(Of Range) = New List(Of Range)() For Each s As InlineShape In d.InlineShapes If s.Type = Microsoft.Office.Interop.Word.WdInlineShapeType.wdInlineShapePicture Then ranges.Add(s.Range) s.Delete() End If Next For Each r As Range In ranges For Each b As Bookmark In d.Bookmarks If b.Range.InRange(r) Then r.InsertBefore(b.Name) End If Next Next End Sub
Hope it could be helpful.
If the answer is helpful, please click "Accept Answer" and upvote it.
Note: Please follow the steps in our documentation to enable e-mail notifications if you want to receive the related email notification for this thread.