Impedir que un archivo se copie

Que tal al_sa_ca:
Pega este codigo en ThisWorkbook., abriendo claro VB con Alt+F11 de tu
archivo y comentas
*** es una aportacion de nuestro amigo y maestro Hector Miguel.
saludos...

Private Sub Workbook_Open()

End Sub

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target
As Range)
Application.CutCopyMode = False
End Sub


Jesús Peralta
Hermosillo, Sonora, Mexico
el_ultimo_profeta"alt+64"hotmail.com

"al_sa_ca" escribió en el mensaje
news:
Hola, con que código puedo evitar que un archivo hecho en excel NO
pueda ser copiado.

Es decir, quiero impedir que seleccionen el archivo le presionen clic
derecho copiar ó que seleccionen el archivo y precionen Control + c
para copiarlo.

U otra forma, que el archivo al ser copiado automáticamente borre el
código VB escrito en el.