תוכן עניינים:

קוד VBA לפתיחת גיליון Excel נעול: 4 שלבים
קוד VBA לפתיחת גיליון Excel נעול: 4 שלבים

וִידֵאוֹ: קוד VBA לפתיחת גיליון Excel נעול: 4 שלבים

וִידֵאוֹ: קוד VBA לפתיחת גיליון Excel נעול: 4 שלבים
וִידֵאוֹ: מערכת Excel Lock - נועלת את קובץ האקסל שלכם עם שם משתמש וסיסמה 2024, נוֹבֶמבֶּר
Anonim
קוד VBA לפתיחת גיליון Excel נעול
קוד VBA לפתיחת גיליון Excel נעול
קוד VBA לפתיחת גיליון Excel נעול
קוד VBA לפתיחת גיליון Excel נעול

אם אי פעם שכחת סיסמה לאחד מדפי העבודה שלך באקסל אתה יודע כמה זה יכול להיות מתסכל. הקוד המשמש בהוראה זו הוא אחד הפשוטים שמצאתי. הוא ייצור קוד שמיש שיפתח את הגיליון המוגן שלך. אני לא יכול לקחת קרדיט לקוד כיוון שרק מצאתי אותו ברגע של צורך (ואני כבר לא יכול למצוא היכן האתר נמצא) … אז אני לא אעזור הרבה אם זה לא יעבוד לך אבל אני זכתה להצלחה עם זה וחשבתי לשתף.

שלב 1: פתח את VBA

פתח VBA
פתח VBA

פתח את דף העבודה שאתה שוכח את הסיסמה שלך. השתמש ב- Alt+F11 כדי להיכנס לעורך המאקרו. לאחר ש- VBA לחץ פעמיים על הגיליון שאתה צריך לבטל את הנעילה מרשימת התפריטים בצד שמאל. פעולה זו תפתח את דף ההצהרות הכלליות של הגיליון.

שלב 2: גזור והדבק את מפסק הקוד

גזור והדבק את מפסק הקוד
גזור והדבק את מפסק הקוד

הכנס את הקוד למטה בדף ההצהרות הכלליות שפתחת. אין צורך לשנות דבר, שם גיליון וכו '… פשוט גזור והדבק. k As IntegerDim l As Integer, m As Integer, n As Integer Dim n1 As Integer, i2 As Integer, i3 As Integer Dim i4 As Integer, i5 As Integer, i6 As Integer on Resume Resume Next For i = 65 To 66: For 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. בטל את ההגנה על Chr (i) & Chr (j) & Chr (k) & _ Chr (l) & Chr (m) & Chr (i1) & Chr (i2) & Chr (i3) & _Chr (i4) & Chr (i5) & Chr (i6) & Chr (n) אם 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) יציאה מקצה המשנה אם הבא: הבא: הבא: הבא: הבא: הבא: הבא הבא: הבא: הבא: הבא: הבא: הסוף הבא תת_

שלב 3: הפעל את המאקרו

הפעל את המאקרו
הפעל את המאקרו

לאחר הוספת הקוד הפעל את המאקרו על -ידי בחירה הפעלה מסרגל הכרטיסיות בתפריט בחלק העליון של מסך עורך VBA או הקש F5 פשוט

שלב 4: השתמש בקוד שנוצר

השתמש בקוד שנוצר
השתמש בקוד שנוצר
השתמש בקוד שנוצר
השתמש בקוד שנוצר
השתמש בקוד שנוצר
השתמש בקוד שנוצר

המאקרו יחזיר אותך לדף העבודה שברצונך לבטל את ההגנה. תיבת סגנון התראה תופיע עם קוד שמיש. בכרטיסיה בתפריט סקירה לחץ על ביטול הגנה של גיליון. הזן את הקוד שנוצר כסיסמה והסיים. הגיליון שלך צריך להיות נעול! עליך להשתמש בכוח זה בתבונה ובאחריות רק כדי לפתוח את דפי העבודה שלך.

מוּמלָץ: