MS word multiple pictures to be replaced within table RRS feed

  • Question

  • Hi,

    I have one word file which contains a table with 3 rows and 2 columns each cell contains some image and want to replace the image with new image with same width and height.

    Total 6 pictures in one page and there are multiple pages. i want code to identify picture actual name and replace with new picture with same size. tried with below code but not able to identify picture actual name.

    Dim rg As Word.Range
      Dim i As Long
      Dim doc As Word.Document
      Dim path As String

      path = "FileName"

       Set doc = ActiveDocument

    For i = doc.InlineShapes.Count To 1 Step -1
      Set rg = doc.InlineShapes(i).Range

    Please help me with this. thank you in advance
    Friday, October 30, 2020 3:47 PM

All replies

  • https://www.techrepublic.com/article/how-to-turn-a-word-table-cell-into-a-picture-placeholder/
    Sunday, November 1, 2020 10:52 AM
  • This is manual method i need VBA code to do all these setps.

    I need to identify and replace image with same size.

    Tuesday, November 3, 2020 5:55 AM