My VB6 application generates an Excel spreadsheet.
Column H contains live email addresses, starting at row 5.
Here is the code:
sCol = "H"
For iI = 1 To iMaxItems
sRow = CStr(iI + 4)
sRange = sCol & sRow
.ActiveSheet.Hyperlinks.Add Anchor:=.Selection, _
Address:="mailto:" & .Selection.Value
This works all right, for each individual email address.
But the user would like to select a group of them from the spreadsheet for a bulk emailing. (Most likely, the entire column H from Row 4 to the last item.)
But when I click the top one, I go directly to the email utility, without having a chance to somehow select all of them.
The only thing I can think of would be for the VB6 application to toss out a text file containing one long string of concatenated email addresses. Then the user would have to copy and paste into the "To" line of his email utility.
It would be slicker to do this directly from the spreadsheet.
By the way, with this in mind, the email address entries actually have a <comma+space> appended: "xxx@yyy, "