让EXCEL文件指定电脑才能打开其他电脑打不开

1、新建Excel,并开启宏：点击文件颍骈城茇----选项------信任中心----信任中心设置-----宏设置-----启用所有宏

2、按alt+F11键，打开EXCEL文件的VBA编辑模式

4、代码如下：Private Sub Workbook_Open() Dim DriveID Dim a As String Set DriveID = CreateObject("Scripting.FileSystemObject") a = DriveID.GetDrive("C").SerialNumber If a <> "序列号一"and a <> "序列号二" Then ThisWorkbook.Close 0 End IfEnd Sub

5、获取自己电脑的C盘序列号，点击开始，运行，在窗口输入CMD进入命令提示符界面

6、在命令提示符里面，输入wmic volume回车会得到所有卷的信息，其中有个字符串是以负号 -开头的，就是C盘序列号

8、保存，关闭VBA窗口，可以找台电脑进行测试