You could change the Author of the document?
Sub ChangeAuthor()
ActiveWorkbook.BuiltinDocumentProperties("Author").Value = "ExcelProductionMacro"
End Sub
and to retrieve
Public Function GetAuthor() As String
GetAuthor = ActiveWorkbook.BuiltinDocumentProperties("Author").Value
End Function
In case you are interested, here is a complete list of document properties you can access.
Others may be useful, such as Last Author
, Category
, Comments