Với tính chất các bước của một số người yên cầu tính bảo mật thông tin cao, thì đặt password cho file dữ liệu là điều rất buộc phải thiết, vào Excel cũng vậy.Bài viết sau sẽ hướng dẫn cụ thể cho bạn cách để password mang đến file Excel một cách đơn giản dễ dàng nhất bên trên nền Microsoft Excel 2013.
Bạn đang xem: Bỏ mật khẩu trong excel 2010
Xem thêm: Chuyển Đổi Xlsx Sang Xls X (Excel) Sang Xls (Excel), Chuyển Đổi Xlsx Sang Xls Trực Tuyến Miễn Phí
1.Mở files Excel cần phải bảo mật
2. Vào file, lựa chọn Info tiếp nối chọn Encrypt with Password trong Protect Workbook
3. Hộp thoại Encrypt Document xuất hiện
Bạn hãy nhập mật khẩu nhưng mà mình muốn
Và chứng thực lại mật khẩu
4. Bình chọn sự thành công
Các các bạn hãy tạm dừng hoạt động sổ trang tính đang sử dụng và mở lại, lúc này cửa sổ Password xuất hiện và bạn phải nhập mật khẩu để đăng nhập.
Vậy, sau khoản thời gian đã để password thành công, có thể bạn ko nhớ password nhưng mình đặt, cần làm núm nào?
Cũng giống như các ứng dụng khác, bọn họ cũng cần một phần mềm hỗ trợ nào đó. Mặc dù nhiên, vẫn có cách để bạn phá quăng quật password cho sheet sẽ đặt cơ mà không phải sự cung ứng nào khác
1. Mở tệp tin Excel đã biết thành khóa
2. Mở visual basic Editor bằng cách nhấn nút Alt+ F11 với excel: 2003,2007,2010. Với excel 2013 trở lên trên thì chọn Developer trên thanh cơ chế rồi chọnvisual basic Editor
3. Lựa chọn sheet yêu cầu mở khóa
4. Xào nấu mã code vào
Sub PasswordBreaker()
If ActiveSheet.ProtectContents = False Then
MsgBox "Sheet "" & ActiveSheet.Name & "" is unprotected!", vbInformation
Else
If MsgBox("Sheet "" & ActiveSheet.Name và "" is protected, vì you want to unprotect it?", _
vbYesNo + vbQuestion, "Unprotect Active Sheet") = vbNo Then Exit Sub
Dim i As Integer, j As Integer, k As Integer
Dim l As Integer, m As Integer, n As Integer
Dim i1 As Integer, i2 As Integer, i3 As Integer
Dim i4 As Integer, i5 As Integer, i6 As Integer
On Error Resume Next
For i = 65 khổng lồ 66: For j = 65 khổng lồ 66: For k = 65 to lớn 66
For l = 65 to 66: For m = 65 lớn 66: For i1 = 65 khổng lồ 66
For i2 = 65 to 66: For i3 = 65 to lớn 66: For i4 = 65 lớn 66
For i5 = 65 to lớn 66: For i6 = 65 to lớn 66: For n = 32 lớn 126
ActiveSheet.Unprotect Chr(i) & Chr(j) & Chr(k) và _
Chr(l) và Chr(m) & Chr(i1) và Chr(i2) và Chr(i3) và _
Chr(i4) & Chr(i5) & Chr(i6) và Chr(n)
Next: Next: Next: Next: Next: Next
Next: Next: Next: Next: Next: Next
If ActiveSheet.ProtectContents = False Then MsgBox "Sheet "" & ActiveSheet.Name và "" is unprotected!", vbInformation
End If
End Sub
5. Chạy chương trình bằng phím tắt F5
6. Xác nhận xóa password
Chúc chúng ta thành công !
Từ khóa tra cứu kiếm: Cách để mật khẩu mang đến Sheet trong ExcelCách phá mật khẩu mang đến Sheet vào ExcelCài đặt mật khẩu trong Excel