如何讓某個(gè)EXCEL文件，限制在某臺電腦上打開，而其它電腦不能打開該EXCEL文件。

　　這得借助VBA代碼來實(shí)現(xiàn)。

　　只需要在工作薄打開的事件中，添加如下代碼即可。

　　Private Sub Workbook_Open()

　　Application.ScreenUpdating = False

　　On Error GoTo 100

　　Workbooks.Open ThisWorkbook.Path & "/驗(yàn)證.XLS"

　　ActiveWorkbook.Close False

　　Exit Sub

　　100:

　　MsgBox "你無權(quán)使用該文件"

　　ThisWorkbook.Close False

　　Application.ScreenUpdating = True

　　End Sub