วิธีเลิกป้องกันสมุดงาน Excel

สารบัญ:

วิธีเลิกป้องกันสมุดงาน Excel
วิธีเลิกป้องกันสมุดงาน Excel
Anonim

ต้องรู้

  • Unprotect ในฐานะเจ้าของ: เปิดสเปรดชีต เลือก Review > Unprotect Sheet. ป้อนรหัสผ่านที่ใช้ป้องกันไฟล์ เลือก ตกลง.
  • Unprotect โดยไม่ใช้รหัสผ่าน: เปิดสเปรดชีต เปิด Visual Basic ตัวแก้ไขโค้ดโดยเลือก Developer > ดูรหัส.
  • จากนั้นใส่รหัสที่ให้มาในบทความนี้และเลือก Run ในไม่กี่นาที รหัสผ่านจะถูกเปิดเผย เลือก ตกลง.

บทความนี้อธิบายวิธียกเลิกการป้องกันสมุดงาน Excel ทั้งในฐานะเจ้าของสมุดงานด้วยรหัสผ่านหรือในฐานะบุคคลที่ไม่มีรหัสผ่าน ข้อมูลนี้ใช้กับเวิร์กบุ๊ก Excel ใน Microsoft Excel 365, Microsoft Excel 2019, 2016 และ 2013

วิธีปลดล็อกสมุดงาน Excel ในฐานะเจ้าของ

Microsoft Excel อัดแน่นไปด้วยคุณสมบัติ คุณลักษณะดังกล่าวประการหนึ่งคือความสามารถในการปกป้องไฟล์ Excel ของคุณในระดับเซลล์ สเปรดชีต หรือเวิร์กบุ๊ก บางครั้งจำเป็นต้องยกเลิกการป้องกันเวิร์กบุ๊ก Excel เพื่อให้แน่ใจว่าการเปลี่ยนแปลงข้อมูลมีผลอย่างถูกต้อง

วิธีนี้ถือว่าคุณจำรหัสผ่านที่ใช้ป้องกันสเปรดชีตในฐานะเจ้าของไฟล์ได้

  1. เปิดสเปรดชีตที่มีการป้องกัน แล้วเลือก รีวิว > Unprotect Sheet คุณยังสามารถคลิกขวาที่สเปรดชีตที่มีการป้องกัน จากนั้นเลือก Unprotect Sheet.

    คุณสามารถระบุสเปรดชีตที่มีการป้องกันได้ในส่วนการเปลี่ยนแปลงของแท็บรีวิวบนริบบิ้น หากสเปรดชีตได้รับการป้องกัน คุณจะเห็นตัวเลือก Unprotect Sheet

    Image
    Image
  2. ป้อนรหัสผ่านที่ใช้ป้องกันสเปรดชีต จากนั้นเลือก ตกลง.

    Image
    Image
  3. สเปรดชีตของคุณจะไม่ได้รับการป้องกันและสามารถแก้ไขได้

    Image
    Image

วิธียกเลิกการป้องกันเวิร์กบุ๊ก Excel โดยไม่ทราบรหัสผ่าน

คุณอาจปกป้องสมุดงานหรือสเปรดชีต Excel ของคุณแล้ว และไม่ต้องแก้ไขในบางครั้ง แม้แต่หลายปี ตอนนี้คุณต้องทำการเปลี่ยนแปลง คุณจำรหัสผ่านที่ใช้ป้องกันสเปรดชีตนี้ไม่ได้อีกต่อไป

โชคดีที่ขั้นตอนเหล่านี้จะช่วยให้คุณยกเลิกการป้องกันสมุดงานของคุณโดยใช้สคริปต์ Virtual Basic เป็นมาโครเพื่อระบุรหัสผ่าน

  1. เปิดสเปรดชีตที่มีการป้องกัน
  2. เข้าถึงตัวแก้ไขโค้ด Visual Basic โดยกด ALT+F11 หรือเลือก Developer > ดูรหัส.

    Image
    Image
  3. ในหน้าต่างรหัสของแผ่นงานที่มีการป้องกัน ให้ป้อนรหัสต่อไปนี้:

    Sub PasswordBreaker()

    Dim i As Integer, j As Integer, k As Integer

    Dim l As Integer, m As Integer, n As Integer

    Dim i1 เป็นจำนวนเต็ม, i2 เป็นจำนวนเต็ม, i3 เป็นจำนวนเต็ม

    Dim i4 เป็นจำนวนเต็ม, i5 เป็นจำนวนเต็ม, i6 เป็นจำนวนเต็ม

    เมื่อเกิดข้อผิดพลาด ดำเนินการต่อ ต่อไป

    สำหรับ i=65 ถึง 66: สำหรับ j=65 ถึง 66: สำหรับ k=65 ถึง 66

    สำหรับ l=65 ถึง 66: สำหรับ m=65 ถึง 66: สำหรับ i1=65 ถึง 66

    สำหรับ i2=65 ถึง 66: สำหรับ i3=65 ถึง 66: สำหรับ i4=65 ถึง 66

    สำหรับ i5=65 ถึง 66: สำหรับ i6=65 ถึง 66: สำหรับ n=32 ถึง 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 จากนั้น

    MsgBox "หนึ่งรหัสผ่านที่ใช้งานได้คือ " & 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: ถัดไป: ถัดไป: ถัดไป: ถัดไป

    End Sub

    Image
    Image
  4. Select Run หรือกด F5 เพื่อรันโค้ด

    Image
    Image
  5. โค้ดจะใช้เวลาหลายนาทีในการรัน เมื่อเสร็จแล้ว คุณจะได้รับป๊อปอัปพร้อมรหัสผ่าน เลือก OK แล้วสเปรดชีตของคุณจะไม่ได้รับการป้องกัน

    นี่ไม่ใช่รหัสผ่านเดิมและคุณไม่จำเป็นต้องจำมัน

แนะนำ: