A family of Microsoft word processing software products for creating web, email, and print documents.
You could use a wildcard Find/Replace, where:
Find = ([!/-//][0-9])([0-9]{3})>
Replace = \1,\2
or, for replacement with non-breaking spaces:
Replace = \1^s\2
The above expression will ignore dates formatted with / or - separators.