From Access I to be able to export data in a string into a word document.
The String is below, what it does is create “blocks” of 25 email addresses (with a semi colon separating each). I would like these blocks to be pasted into a word document separate by a line break i.e.
Emails 26 -50
Can anybody help?
Dim rst As Recordset
Dim BccList As String, x As Integer
Set rst = CurrentDb.OpenRecordset("AfricanMembersLive")
Do While Not rst.EOF
BccList = ""
x = 1
Do Until rst.EOF Or x >= 25
BccList = BccList & rst!email & "; "
x = x + 1