I am trying to clean up a string of email addresses:

> 
> bruce.wayne@batcave.com;#30;#clarke.kent@dailyplanet.com;#32;#the.joker@arkhamassylum.com;#33
> 
> 
> 

I don't know how many emails will be in the list and the numbers will change length too. 

I have tried:

```
(?!([\w-]+\.)[\w-]+@([\w-]+\.)+[\w;]+)

```

as a pattern but it doesn't work. 

This is all being done in VBA.