That Aisle part was not indicated in your sample.
To accommodate this in my code change this line
Code:
If arr(i, ii) <> "" Then
to
Code:
If InStr(arr(i, ii), ";") <> 0 Then
What "other cell" are you wanting to put the value(s) into ?
And what does your ID;Amount data really look like ?