ถ้าลืม password ก็พอจะมีวิธีแก้อยู่บ้างซึ่งผมก็พอมีอยู่ แค่เอา code ข้างล่างไปใส่ไว้ที่ marco ของชีตที่ถูกล็อค จากนั้นก็สั่ง Run เป็นอันเสร็จพิธี แต่ Password ไม่ใช้ password จริงน่ะ แต่สามารถปลดล็อคได้ หวังว่าคงจะมีประโยชน์
Sub PasswordBreaker() 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
おはよう ごさいます!!どうも ありがとうごさいます。日本語は じょうずですね。
毎日べんきょうしますから 日本語能力試験で あまり よんで いません。たいへんです。
ตอนนี้กำลังนอนจมกองเอกสารงานวิจัยอยู่เลยค่ะ เหนื่อยมากเลย... พรุ่งนี้ต้องส่งอาจารย์แล้วต้องไปทำต่อแล้วค่า ขอบคุณที่แวะมาที่บล็อกนะคะ อยากเก่งแบบคุณครูเอกบ้างจังน้า..
また あいましょう。
<center>