If I have the following data:

```
123, thomas
123, gordon
123, smith
334, joey
334, nancy
3452, angela
3452, liza
```

I want a formula to produce the following results:

```
123, thomas, gordon, smith
334, joey, nancy
3452, angela, liza
```

Is there an easy and/or efficient way to do this with a formula? If not, how can I do this with VBA?