Рет қаралды 54,847
Hi Friends,
Welcome on My channel, we provide you some new Extra Knowledge Bytes in form of small videos which boost your knowledge.
@rk_knowledgeahead
In this video you will find the solution for recovery of lost password of Word File if it is protected by Encrypted Password without using any software.
Unlock Password Protected Word Files Free No Software Needed
Code ....
Sub test()
Dim i As Long
i = 0
Dim FileName As String
Application.FileDialog(msoFileDialogOpen).Show
FileName = Application.FileDialog(msoFileDialogOpen).SelectedItems(1)
ScreenUpdating = False
Line2: On Error GoTo Line1
Documents.Open FileName, , True, , i & ""
MsgBox "Password is " & i
Application.ScreenUpdating = True
Exit Sub
Line1: i = i + 1
Resume Line2
ScreenUpdating = True
End Sub
My other videos also available on other topics like .. Advance Excel, Automatic Attendance Sheet......
Thanks
- RK Knowledge Ahead -