Macro para modificar el color del texto de una celda

Necesito una macro que me permita modificar en un rango determinado (a2:u20) mediante cuadro de dialogo, los colores del texto de determinadas celdas en función al color que tenga el texto

Ejemplo: Las celdas con texto color=6 (amarillo) poder modificarlas por texto color= 44 (naranja)

Las celdas con texto color=44(naranja) poder modificarlas por texto color=6 (amarillo)