trovato!

codice:
rs("Artista") = replace(split(file.name, "-")(0), "_", " ")