Hi Mark,
Thanks for the reply.
I did try the option "/" but still did not get anything in the variable, but this below did the trick after some adjustments.
arrPrn = Split( strPrn, ",", -1, vbTextCompare )
strDescr = arrPrn(0)
arrPort = Split( arrPrn(2), ":", -1...