Okay. I am assuming that code will highlight the rows that hold the data
ending at the blank row. Now, how would I get the highlighted information to
copy over to the word document in the specific place i need?

Joel wrote:
to select the cells you need something like this

Sub abc()

mylastrow = Cells(2, "A").End(xlDown).Row
Range(Cells(2, "A"), Cells(mylastrow, "A")).Select

End Sub

I was using the fourm search function to find any previous post regarding my
questions, (a and b in my first post).
[quoted text clipped - 13 lines]

Thank you in advance.

--
Message posted via http://www.officekb.com