MS Access vba comma delimited string from field

Question

I need short vba code to convert ms access table field to comma delimited string variable

T1.F     to    'A','123','008','A'
A
123
008
A

parakmiakos · Accepted Answer · 2014-09-17 06:54:57Z

1

The following will get your desired string in s :

Dim s as String, rs as Recordset

s = " Select [F] from [T1] "
Set rs = CurrentDb.OpenRecordset(s)
s = ""
While Not rs.EOF
    s = s & "'" & rs(0) & "',"
    rs.moveNext
Wend
s = Left(s,Len(s) - 1)
rs.close

answered Sep 17, 2014 at 6:54

parakmiakos

3,0209 gold badges31 silver badges45 bronze badges

Sign up to request clarification or add additional context in comments.

2 Comments

Maxrem Over a year ago

Thanks! it worked, but can it be shorter like SPLIT(rs," ',' ") or SPLIT([T1].[F1]," ',' ")?

parakmiakos Over a year ago

As far as I know, you can't do something like that to a recordset. I'm pretty sure you'll have to iterate to get the result.

Collectives™ on Stack Overflow

MS Access vba comma delimited string from field

1 Answer 1

2 Comments

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

2 Comments

Your Answer

Sign up or log in

Post as a guest

Related