解掉打开密码

gy7898

别告诉我密码是121
弄成个没有打开密码的发上来就行了
Excel 65243264.rar (42.82 KB, 下载次数: 24)

2012-5-23 13:15 上传

点击文件名下载附件

那个那个，如何发BB我不会，如果可以50个吧，告诉我方法，我另开贴专送{:281:}

andyfeifei

可以去掉的，不过我现在上班因为公司不能下载，晚上我记得的话一定帮你搞定

gy7898

andyfeifei 发表于 2012-5-23 13:35
可以去掉的，不过我现在上班因为公司不能下载，晚上我记得的话一定帮你搞定

谢谢先{:071:}{:071:}{:071:}

excel白兔

要是确定都是数字组成的
可以用vba解决（适合简单的数字密码）
Sub sas()
On Error Resume Next
Dim ms As String
Dim x  As Long
Dim mpath As String
ms = Application.GetOpenFilename
Range("D6") = ms
For x = 1 To 300000000
Range("D8") = x
Workbooks.Open Filename:=ms, Password:=x
mpath = ActiveWorkbook.Path & "\" & ActiveWorkbook.Name
If mpath Like ms Then
MsgBox "文件打开"
Exit Sub
End If
Next


End Sub

尝试过了70000前都不是 {:161:}

gy7898

传说中的顶贴，好像就是像我这么做的