separador = "</td><td>" for u=1 to 15 execute("linea_" & u & " = split(Partits_ver.fields(" & u & "),"& separador &")") next