IF you select more than one cell for some reason and then press the Create Transmittal button, expect to get results for the last row, not the activecell's row. Try it and play this macro to see what I mean.

[VBA]Sub sadd()
MsgBox Selection.Address, , "Selection.Address"
MsgBox Selection.Row, , "Selection.Row"
MsgBox ActiveCell.Address, , "ActiveCell.Address"
MsgBox ActiveCell.Row, , "ActiveCell.Row"
End Sub[/VBA]

Most any situation can be coded if the rules are constant and known. As you will see, in that scenario, Selection.Row is going to fit better than Activecell.Row.

If you need the number of rows selected, Selection.Rows.Count. The -1 in the Offset means to go up 1 row from the activecell's row.

Did you see how I made a row of cells into one string separated by vbcrlf? If you are doing a column, just use one WorksheetFunction.Transpose. There are some other ways to this as well.

When you have a new question, just post it. If it relates to a thread like this one, then post a link. I generally look at this forum every day. You can PM me if you get no responses. The benefit is that you will probably get more timely answers that may be even better than mine.