Il 04/05/23 14:44, Fabien Bodard ha scritto: > Dim a as string[] > For each s in split(s2) > a=scan(s,"*:*") > cRet[a[0]]=a[1] > Next > > > Best regards, > Fabien > Hi Fabien, Nice code, but I think it needs to be given: For Each s In Split(s2, "\n", Null, True) Regards Gianluigi