Macro en word para guardar doc en determinada carpeta dependiendo de una fecha en el doc

Diariamente hacemos contratos a trabajadores los cuales expiran (frecuentemente) a los 30 días, quiero hacer una macro para que dependiendo de la fecha en el documento se guarde en una carpeta con el nombre de la fecha, y si no existe que la cree