Macro validación dependiente

hola, tengo una celda A1 dependiente de unas casillas de verificación, según marque una u otra se me despliega una lista u otra de validación. Hasta ahi bien. El problema es que quiero crear una validación dependiente de la celda A1 en B2. Para ello he creado una tabla con los enunciados que pueden aparecer en A1 y que están relacionados con nombres de rango por ejemplo "Avería mecánica" tiene un rango llamado AverMec que representa las celdas G1 a G12.

Hacer que en B2 tenga una lista dependiente de la celda A1 es fácil, con =Indirecto(buscarV(A1;ListAve;2,Falso) .

La dificultad viene ahora, necesito que la validación se ejecute solo con algunos valores de la lista ListAve y no con todos por eso necesito crear una macro.

Yo había pensado en esta

Sub ListTR1()
With Range("b2").Validation
.Add Type:=xlValidateList, _
AlertStyle:=xlValidAlertStop, _
Operator:=xlEqual, Formula1:="=Indirecto(buscarV(A1;ListAve;2,Falso)"
End With
End Sub

pero no funciona creo que en formula solo se puede poner el nombre de un rango, por ejemplo AverMec y no la formula que yo puse.

la pregunta es ¿Cómo se puede hacer?