Need vba code to export rows from excel to msword with image

HI experts

i have set of data in excel start from A7 with header, i want copy data one by one into word file with image where stored in desktop

In column images saved path contain

please find the attachment and expected result in word

Regards
jackh

Use a mailmerge. No VBA code required. See:
How to use the Mail Merge feature in Word to create and to print form letters that use the data from an Excel worksheet (microsoft.com)
Use mail merge for bulk email, letters, labels, and envelopes (microsoft.com)
See also the Managing Mailmerge Graphics topic in the in the Mailmerge Tips and Tricks page at:
https://www.msofficeforums.com/mail-...ps-tricks.html

Prerequisite: an empty document in Word is open.

Code:

---

Sub M_snb()
 sn = Sheet1.Cells(7, 1).CurrentRegion
 
 With GetObject(, "word.application").ActiveDocument
    For j = 2 To UBound(sn)
        With .Tables.Add(.Paragraphs.last.Range, 15, 2)
          For jj = 1 To UBound(sn, 2)
            .Cell(jj, 1) = sn(1, jj)
            .Cell(jj, 2) = sn(j, jj)
            Next
        End With
      .Content.InsertAfter vbCr & vbCr & vbCr
      Next
  End With
End Sub

---

i got error

VBA lesson 1.

@jackhack99. What snb meant to say was that because you used the term "Option Explicit" at the start of your section of code you need to define sn as range.

@snb Those of us who have been around this forum for a while recognise that you dislike (amongst other things) using "Option Explicit". Your types of coding doesn't help those who are new to VBA.

Liking isn't an issue in VBA. Redundancy is as in all forms of automation.
What is helpful will be determined by TS's and visitors, not by moderators (whose task isn't to criticize helpers; that doesn't help anyone).

Quote:

---

Originally Posted by snb

VBA lesson 1.

---

= Declare variables

Quote:

---

Originally Posted by snb

Liking isn't an issue in VBA. Redundancy is as in all forms of automation.

---

Variable declaration is hardly a redundancy...

Show me 1 macro in VBA that doesn't run correctly because of not declaring variables.
Have a look at https://www.snb-vba.eu/index_en.html

Attached is an example of why I prefer to declare variables, another is being able to declare a variable that uses the least memory like an integer instead of a long etc... There are too many other reasons to list.

Attached is a silly sample of error handling a Boolean value without needing a separate If to handle values other than true, false. May not be the best example but it makes use of the Err.Number due to the declaration.

Quote:

---

Originally Posted by snb

Show me 1 macro in VBA that doesn't run correctly because of not declaring variables.
Have a look at https://www.snb-vba.eu/index_en.html

---

Clearly, in this case your own macro didn't. Need anyone say more? Or are you going to blame the OP for having 'Option Explicit' set?

As for practical proof of macros that won't run correctly without declaring variables, see for example:
http://www.vbaexpress.com/forum/show...l=1#post414547
http://www.vbaexpress.com/forum/show...l=1#post363960
etc.

Delete the variable declarations there and the macros won't run...

Quote:

---

Originally Posted by snb

What is helpful will be determined by TS's and visitors, not by moderators (whose task isn't to criticize helpers; that doesn't help anyone).

---

Well I guess you are in for a rough night then snb