Loop through string of id's and perform task

[Moss100]

Hello,

I am using Allen Browne code to concatenate records from
a table. This results in a string of id's.

For example "10,33,150,345" etc...

I would like to perform a task for each id, (I n this case
adding to a log table).

How would I go about looping through each id so I could
perform my vba code on each id?

Many thanks Mark.

 

[strongm]

Something like

[blue]    Dim sourcestring As String
    Dim taskdata As Variant
    
    sourcestring = "10,33,150,345"
    
    For Each taskdata In Split(sourcestring , ",")
        MsgBox Trim(taskdata) [green]' this is where you'd perform your task[/green]
    Next[/blue]

 

[Moss100]

Thank you very much.