Bueno, creo que más o menos te voy entendiendo.
Entonces la idea del split me parece buena:
- Partes de la cadena "Guerra Mundial, Albéniz, impresionismo, Fauré"
- Haces un split tomando como separador la coma, haces trim para eliminar espacios del principio y el final.
- Recorres el array generado a partir de la cadena
- Buscas cada uno de los trozos en el texto "Guerra Mundial", Albéniz, ....
- Sustituyes con la función replace la palabra buscada por el enlace, sacando de base de datos lo que necesites.
Código:
Array_st = Split(Cadena, ",")
For i = 0 To UBound(Array_st)
strCadena = Trim(Array_st(i))
textoBDmodificado = Replace(textoBDoriginal, strCadena, "<A HREF='otrapagina.asp?id=xxx'>" & strCadena & "</A>")
Next
Un saludo
Txarly