Можно ли определить, была ли книга открыта из вложения электронной почты, а не с диска / общего ресурса?
Из файлов outlook открываются временные каталоги на вашем диске, вы можете проверить, находится ли он в этой папке, VBA Source, следующим образом
IsAttachment = (InStr(1, ThisWorkbook.Path, "Temporary Internet Files", vbTextCompare) > 0)