I want to be able to force the format of the naming of a file when someone does a "Save As"

i.e. the person must enter ####-mmdd (1137-0710) and if the format doesn't meet the convention format then a error message comes up until the name it right.

Does anyone know if there is a VBA that does this

Thanks