I frequently receive translations as documents from colleagues with ambiguous filenames like: “Übersetzung.docx” – and more often than not they are for small translation “snippets” – from a couple of sentences to a couple of paragraphs. I like to run a couple of macros in Word before I translate – most notably to change non-breaking hyphens into normal ones.
In addition though, to help with aligning documents to dates received, I have a little macro that I use that saves the file with a date prefixed into the filename from inside Word. This helps in particular for short snippets that are not translated as separate projects in Trados, but dragged into a project made up of short translations.
Sub DateFN() If ActiveDocument.Name = ActiveDocument.FullName Then If Not Application.Dialogs(wdDialogFileSaveAs).Show Then Exit Sub End If CurrentFormat = ActiveDocument.SaveFormat CurrentPathAndName = ActiveDocument.FullName CurrentPath = Replace(ActiveDocument.FullName, ActiveDocument.Name, "") NewNameSamePath = CurrentPath & Format(Now, "yymmdd") & " - " & ActiveDocument.Name ActiveDocument.SaveAs FileName:=NewNameSamePath, FileFormat:=CurrentFormat Kill CurrentPathAndName End Sub
Why do I use the YYMMDD date format?
I chose this particular date format, although YYYYMMDD would work just as well as it is easiest to sort filenames that start with years followed months and then days.