วิธีการ เลิกป้องกัน (เลิกเข้ารหัส) Sheet ของ Excel

บทความวิกิฮาวนี้จะแนะนำวิธีการ unprotect หรือยกเลิกการป้องกัน sheet ใน workbook ของ Microsoft Excel ทั้งใน Windows และ macOS ถ้า sheet มีการเข้ารหัสป้องกันไว้ แล้วไม่รู้รหัส ก็ให้ใช้ Google Sheets หรือสคริปต์ VBA (ถ้าใช้ Excel เวอร์ชั่นเก่าๆ) ปลดล็อคแทน

วิธีการ 1

วิธีการ 1 ของ 3:

ใช้ Microsoft Excel

ดาวน์โหลดบทความ

ปกติคือให้ดับเบิลคลิกชื่อไฟล์ในคอม
2
คลิกขวาที่ tab ของ sheet ที่เข้ารหัส. tab ของแต่ละ sheet จะโผล่มาที่ด้านล่างของ Excel ใน Excel บางเวอร์ชั่น ถ้าเป็น sheet เข้ารหัส จะมีไอคอนแม่กุญแจ ให้คลิกขวาที่ tab (หรือไอคอนแม่กุญแจ) เพื่อเปิดเมนูใหม่^{[1]Xแหล่งข้อมูลอ้างอิง}
- ถ้ามีหลาย sheet เข้ารหัสไว้ ต้องปลดล็อคทีละ sheet
ถ้า sheet ไม่ได้เข้ารหัสไว้ ก็จะปลดล็อคอัตโนมัติ ไม่งั้นจะมีให้ใส่รหัสผ่านในหน้าต่าง pop-up
4
พิมพ์รหัสผ่าน แล้วคลิก OK. ถ้ารหัสผ่านถูกต้อง ก็จะปลดล็อค sheet สำเร็จ
- ถ้าไม่รู้รหัสผ่าน ให้อ่านวิธีการใช้ Google Sheets แทน วิธีนี้ใช้อัพโหลดไฟล์เข้า Google Sheets เท่ากับปลดบล็อกทุกอย่างใน Excel
- ถ้าใช้ Excel 2010 หรือเก่ากว่า แล้วไม่อยากอัพโหลดเข้า Google Sheets ให้อ่านวิธีการใช้โค้ด VBA ใน Excel 2010 หรือเก่ากว่าแทน
โฆษณา

วิธีการ 2

วิธีการ 2 ของ 3:

อัพโหลดเข้า Google Sheets

ดาวน์โหลดบทความ

1
เข้าเว็บ https://drive.google.com ในเบราว์เซอร์. ถ้ามีบัญชี Google ก็ใช้ Google Sheets (แอพออนไลน์ฟรี คล้ายๆ Excel) ปลดบล็อกทุก sheet ใน workbook ได้ ถึงจะไม่รู้รหัสผ่านก็เถอะ
- ถ้ายังไม่ได้ล็อกอินบัญชี Google ให้ทำตามขั้นตอนในหน้าจอเพื่อล็อกอินก่อน
- ถ้าไม่มีบัญชี Google ให้อ่านบทความวิธีการสมัคร Google Account
มุมซ้ายบนของหน้า
เพื่อเปิด Open panel ในคอม
เพื่ออัพโหลดไฟล์เข้า Google Drive
อาจจะต้องเลื่อนลงไปถึงจะเจอ ดับเบิลคลิกแล้วตัวอย่างไฟล์จะเปิดขึ้นมา
ทางด้านบนของตัวอย่าง เพื่อขยายเมนู
พอเปิดไฟล์พร้อมแก้ไขใน Google Sheets แล้ว ก็เท่ากับปลดล็อคทุกการป้องกันใน Excel
8
ดาวน์โหลดไฟล์กลับลงคอม. ถ้าจะทำงานไฟล์นี้ต่อใน Microsoft Excel ไม่ใช่ Google Sheets ให้ดาวน์โหลดไฟล์ workbook ที่ปลดล็อคแล้ว ด้วยขั้นตอนต่อไปนี้
- คลิก File menu มุมซ้ายบนของ sheet
- คลิก Download As
- คลิก Microsoft Excel (.xlsx)
- เลือกโฟลเดอร์ที่จะเซฟไฟล์. ถ้าจะเก็บไฟล์ต้นฉบับไว้ (ที่มีการป้องกัน) ให้ตั้งชื่อไฟล์ใหม่
- คลิก Save เพื่อดาวน์โหลดไฟล์
โฆษณา

วิธีการ 3

วิธีการ 3 ของ 3:

ใช้โค้ด VBA ใน Excel 2010 หรือเก่ากว่า

ดาวน์โหลดบทความ

1
เปิด workbook ที่มี sheet เข้ารหัสใน Excel. โดยดับเบิลคลิกชื่อไฟล์ในคอม ปกติไฟล์ Excel จะลงท้ายด้วย extension .xls หรือ .xlsx
- ให้ใช้วิธีการนี้ ถ้าลองวิธีปลดล็อค sheet แล้ว แต่พบว่าไฟล์เข้ารหัสไว้ (แล้วไม่รู้รหัส)
- วิธีการนี้ใช้กับ Excel 2013 หรือใหม่กว่าไม่ได้
2
เซฟไฟล์เป็นฟอร์แมต xls. ถ้าไฟล์ที่ใช้ลงท้ายด้วย ".xlsx" (ฟอร์แมตปกติของไฟล์ที่สร้างหรือแก้ไขใน Excel เวอร์ชั่นใหม่) จะใช้วิธีนี้ได้หลังแปลงไฟล์เป็นฟอร์แมต .xls ของ Excel 97 - 2003 แล้ว ขั้นตอนคือ^{[2]Xแหล่งข้อมูลอ้างอิง}
- คลิกเมนู File มุมขวาบน
- คลิก Save As
- ไปยังโฟลเดอร์ที่จะเซฟไฟล์
- เลือก Excel 97-2003 (.xls) จากในเมนู "Save as type" หรือ "File Format"
- คลิก Save
ทางด้านบนของกรอบทางซ้าย ให้คลิกขวาตัวเลือกที่มีชื่อไฟล์ (ลงท้ายด้วย ".xls") ปกติจะอยู่ด้านบน แล้วเมนูจะขยายออกมา^{[3]Xแหล่งข้อมูลอ้างอิง}
เพื่อขยายอีกเมนู
เพื่อ insert module ใหม่สำหรับ paste โค้ดส่วนหนึ่ง

7

copy โค้ด. ลากคลุมโค้ดต่อไปนี้ แล้วกด Ctrl+C (PC) หรือ ⌘ Command+C เพื่อ copy

Sub PasswordBreaker()Breaks worksheet password protection.    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 To 66: For j = 65 To 66: For k = 65 To 66    For l = 65 To 66: For m = 65 To 66: For i1 = 65 To 66    For i2 = 65 To 66: For i3 = 65 To 66: For i4 = 65 To 66    For i5 = 65 To 66: For i6 = 65 To 66: For n = 32 To 126         ActiveSheet.Unprotect Chr(i) & Chr(j) & Chr(k) & _            Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & Chr(i3) & _            Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)         If ActiveSheet.ProtectContents = False Then            MsgBox "Password is " & Chr(i) & Chr(j) & _                Chr(k) & Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & _                Chr(i3) & Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)         Exit Sub         End If    Next: Next: Next: Next: Next: Next    Next: Next: Next: Next: Next: NextEnd Sub

โค้ดที่ copy มาจะไปโผล่ในหน้าต่าง module
9
กด F5 เพื่อ run โค้ด. Excel จะ run โค้ด ซึ่งใช้เวลาหลายนาทีหน่อย พอ run โค้ดเสร็จ รหัสผ่านใหม่จะโผล่มาในหน้าต่าง pop-up
- รหัสผ่านใหม่จะสุ่มเป็น "As" จำนวนหนึ่ง ไม่ใช่รหัสผ่านจริงๆ
10
คลิก OK ใน pop-up Password. รหัสผ่านใหม่จะโผล่มา ซึ่งก็ไม่ต้องจดไว้ ให้คลิก OK เพื่อยกเลิกการป้องกัน sheet โดยอัตโนมัติ^{[4]Xแหล่งข้อมูลอ้างอิง}
- ถ้าตอนแรกต้องแปลงไฟล์ย้อนเวอร์ชั่น ตอนนี้ก็เซฟ workbook กลับเป็นไฟล์ .xlsx ได้เลย
โฆษณา