Macro to change title block rev to document property rev value?

I need to change the revision value in the title block to link to the document property of a large quantity of drawings.

Does anyone know of a macro that can do this?

SolidworksApi macros