Pasar nombre de campos a registros y desdoblar registros según el valor de un campo.

Tengo la tabla siguiente:

<strong style="line-height: 1.5em;">Persona Riesgo11 Nota11 Riesgo12 Nota12 Comentarios

1 1 "Texto11-1" 1 "Texto12-1" "Texto1"
2 1 "Texto11-2" 0 "Vacío" "Texto2"
3 0 "Vacío" 0 "Vacío" "Texto3"

Quisiera hacer una consulta para tener los siguientes resultados:

Persona Riesgo Nota Comentarios
1 Riesgo11 "Texto11-1" "Texto1"
1 Riesgo12 "Texto12-1" "Texto1"
2 Riesgo11 "Texto11-2" "Texto2"

Es decir, el resultado consiste en:
- Desdoblar las filas donde aparezca 1 en [RiesgoXY] manteniendo [Persona] y [Comentarios] en común
- Añadir como valor en el registro el nombre del campo [RiesgoXY] cuando [RiesgoXY]=1
- Si [RiesgoXY] es 0 ni aparece en el resultado final la [Persona]

Siento no proponer nada pero es que por más vueltas que doy no encuentro la manera.

Estoy trabajando con Access + VBA, si hubiera otra forma utilizando Recordsets no tengo inconveniente (ésta última es la que estoy planteando sobre papel).

Gracias de antemano.