Como compartir libro sin que se cree una copia en mis documentos

Una vez más solicito de su ayuda tengo un libro que apenas se abre y ejecuta una macros para compartir, el tema con este archivo es que si lo tengo en una ubicación para este ejemplo en el Escritorio, al abrirlo se guarda en automático en Mis documentos que puede hacer para evitar que esto suceda ya que los usuarios de este archivo lo ponen en la ubicación que más les acomoda.

Este es el código que uso.

Private Sub Workbook_Open()
   ThisWorkbook.ProtectSharing , SharingPassword:="1234"
End Sub