Save with a new filename, replace existing string

Hi,

I have a document saved with the name "Q114 XXXXXX".
I want to have a macro that replaces Q114 with Q214.

Is that easy to make?

Thanks!