Using VBA to create a text string of records (A2k)

Topic

New Reply

I have a query whose criteria results in a list of names. What I want to do is, on a button click, create a report that will list all the names, separated by a comma, for example, if my query returned:

NAME
JOHN
JOE
BOB
FRANK

I would want my report to show NAME: JOHN, JOE, BOB, FRANK

Reply | Quote

Replies

Hi Jeremy,
I normally do that by getting a recordset and using a Do Until Loop.

With rst
	Do Until .EOF
		strString = strString & [FirstName] & ", "
	.MoveNext
	Loop
End With
strString = "NAME: " & Left(strString , Len(strString ) - 2)

You can then place that into a textbox (or whatever) on your report.

gdr

Reply | Quote

Perfect~! Thanks.

Reply | Quote

You can also use the Concat function attached to post 301393. You must copy that function into a module.

Reply | Quote