כיצד למחוק גיליונות ב- Excel (קיצורי דרך + VBA)

כאשר אתה עובד עם Excel, אתה מבלה את רוב זמנך בגליון העבודה (שהוא האזור המכיל את כל התאים וכל מה שקורה שם).

עבודה יעילה עם Excel פירושה גם שאתה צריך לעבוד עם גליונות עבודה מרובים בתוך אותו חוברת עבודה.

Excel מאפשר לך להוסיף בקלות גליונות עבודה מרובים בחוברת העבודה, יחד עם זאת תוכל גם למחוק דפי עבודה אלה בקלות.

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

הערה: במדריך זה, אני הולך להשתמש במילים 'גיליון' ו'דף עבודה 'לסירוגין. אבל כדי לספר לך את ההבדל, גיליונות יכללו גליונות עבודה כמו גם גליונות תרשים, אך מכיוון שגיליונות תרשים אינם נפוצים כל כך, בכל פעם שאני משתמש במילה גיליון אני רואה בזה גליון עבודה.

מחק גיליונות באמצעות אפשרויות לחיצה ימנית

הדרך הקלה ביותר למחוק גליון עבודה ב- Excel היא באמצעות טכניקת עכבר פשוטה זו בלחיצת שני לחיצות.

נניח שיש לך גליון עבודה הכולל שלושה גיליונות כפי שמוצג להלן, ואתה רוצה למחוק את גיליון 1.

להלן השלבים לביצוע פעולה זו:

1. לחץ לחיצה ימנית על הגיליון שברצונך למחוק
2. לחץ על אפשרות המחיקה
3. בהודעה המופיעה, לחץ על הלחצן מחק

תוכל גם להשתמש בטכניקה שלעיל בגיליונות שהם אפילו לא הגיליון הפעיל. לדוגמה, אם אני כרגע ב- Sheet1 ואני רוצה למחוק Shee3, אז אני יכול פשוט ללחוץ לחיצה ימנית על Sheet3 ולמחוק אותו.

אתה יכול גם להשתמש באותה טכניקה כדי מחק מספר גיליונות בבת אחת.

לדוגמה, אם אני רוצה למחוק את גיליונות 2 וגיליון 3 בבת אחת, אני יכול להחזיק את מקש הבקרה וללחוץ על גיליון 2 וגיליון 3 אחד אחד (תוך החזקת מקש הבקרה).

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

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

קיצורי מקשים למחיקת גליונות העבודה

אין קיצורי מקשים אחד אלא שניים וחצי בהם תוכל להשתמש כדי למחוק גליונות עבודה ב- Excel.

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

קיצור מקשים היברידי למחיקת גיליון

קליק ימני + ד

כדי למחוק את גליון העבודה או דפי העבודה שנבחרו, לחץ באמצעות לחצן העכבר הימני ולאחר מכן הקש על מקש D במקלדת.

באופן אישי, אני מוצא את זה הרבה יותר מהר מאשר רק להשתמש בעכבר כדי למחוק דף עבודה (כפי שסיקרתי בחלק לעיל)

קיצור מקשים רגיל למחיקת גיליון

ALT + H + D + S

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

עליך ללחוץ על מקשים אלה ברצף (כלומר, אחד אחרי השני)

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

קיצור מקשים מדור קודם למחיקת גליונות עבודה

כמו לכולם, גם לאקסל יש עבר, והוא לא כל כך יפה. אני מדבר על העידן בסגנון טרום סרט.

מסיבות תאימות, Excel עדיין מאפשר לחלק מאותם קיצורי מקשים ישנים לעבוד בגרסאות החדשות יותר. ובמקרים רבים, אותם קיצורי דרך קודמים הם קצרים וטובים יותר.

למרבה המזל, קיים קיצור מקשים מדור קודם הפועל למחיקת גליונות עבודה ב- Excel

ALT + E + L.

מחיקת גיליון ה- ActiveSheet באמצעות VBA

כשמדובר במחיקת גיליון אחד, או כמה דפי עבודה, עדיף להשתמש בשיטות שהוזכרו לעיל.

למרות ש- VBA יכול להפוך את התהליך לאוטומטי, התועלת שלו נכנסת כשאתה צריך לחזור על המשימה מספר פעמים.

כפי שתראה, עם VBA אתה יכול לעשות הרבה יותר בכל הנוגע למחיקת גליונות עבודה ב- Excel.

אז אני אקח אותך למקרי שימוש מתקדמים יותר, אבל לפני כן בוא נראה כיצד למחוק את דף העבודה הפעיל באמצעות VBA.

להלן קוד VBA שימחק את הגיליון הפעיל:

תת מחיקת גיליון () ActiveSheet. מחק סיום משנה

אם אתה משתמש בו בחלון המיידי, תוכל פשוט להשתמש בשורה הבאה:

ActiveSheet.Delete

כאשר אתה משתמש בקוד לעיל כדי למחוק את הגיליון הפעיל, Excel יראה לך הודעה שבה יהיה עליך ללחוץ על כפתור המחיקה כדי לאשר את הפעולה.

מחיקת הגיליון מבלי להציג את בקשת האישור

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

אבל אם אתה כבר יודע מה אתה עושה, קבלת ההודעה הזו יכולה להיות מעצבנת למדי.

אז הנה קוד VBA שיוודא שהגיליונות יימחקו אך אינך רואה תיבת הודעת אישור.

Sub DeleteSheet () Application.DisplayAlerts = False ActiveSheet.Delete Application.DisplayAlerts = תת סוף סוף

בקוד לעיל, הגדרתי את המאפיין Application.DisplayAlerts כ- false, מה שאומר ש- Excel לא יראה לך התראות תצוגה בזמן שהקוד פועל.

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

זהירות: כאשר אתה מגדיר את המאפיין Application.DisplayAlerts לשקר, Excel פשוט ימחק את גליון העבודה ולא תהיה דרך לשחזר אותו. אז אני ממליץ לך לעשות עותק גיבוי לפני שתשתמש בקוד מסוג זה.

מחיקת גיליון לפי שם (אם קיים) באמצעות VBA

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

לדוגמה, אם יש לך גליון עבודה בשם 'מכירות', תוכל להשתמש בקוד שלהלן כדי למחוק אותו:

Sub DeleteSheetByName () Sheets ("מכירות"). מחק Sub Sub

קוד זה ימחק רק את הגיליון בעל השם Sales.

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

עם הקוד לעיל, זה לא משנה כמה דפי עבודה יש ​​בחוברת העבודה זה פשוט ימחק את דף העבודה של המכירות.

ומכיוון שלא שיניתי את המאפיין Application.DisplayAlert, תראה הודעה שבה יהיה עליך ללחוץ על כפתור המחיקה כדי לאשר את משך גיליון המכירות.

במידה ותרצה למחוק גיליונות מרובים המבוססים על שמם, תוכל גם לעשות זאת.

לדוגמה, הקוד שלהלן ימחק את הגיליונות עם השם מכירות, שיווק, כספים:

Sub DeleteSheetsByName () Sheets ("מכירות"). מחק Sheets ("Marketing"). מחק Sheets ("Finance"). מחק Sub Sub

מחיקת כל הגיליונות למעט הגיליון הפעיל באמצעות VBA

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

להלן קוד VBA שימחק את כל הגיליונות למעט הגיליון הפעיל בחוברת העבודה.

תת DeleteSheetByName () Dim ws כ גליון עבודה Application.DisplayAlerts = שגוי עבור כל ws בגיליונות If ws.Name ActiveSheet.Name ואז ws.Delete סוף אם הבא ws Application.DisplayAlerts = Sub End True

שים לב שאמרתי שהנכס Application.DisplayAlerts נופל בתחילת הקוד מכיוון שאני לא רוצה לראות הודעה לכל גיליון שנמחק.

מחק את כל הגיליונות עם מחרוזת טקסט ספציפית בשם

זהו מקרה שימוש קצת יותר מתקדם של שימוש יעיל ב- VBA בעת מחיקת גליונות עבודה.

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

לדוגמה, למטה יש לי חוברת עבודה שבה אני רוצה למחוק את כל דפי העבודה שיש בהם מחרוזת הטקסט "מכירות".

להלן קוד VBA שיעשה זאת:

תת DeleteSheetByName () Dim ws כ גליון עבודה Application.DisplayAlerts = שגוי עבור כל ws בגיליונות If ws.Name Like "*" & "Sales" & "*" ואז MsgBox ws.Name ws.Delete סוף אם הבא ws Application.DisplayAlerts = True End Sub

הקוד לעיל משתמש בהצהרת if-then כדי לעבור על כל גליונות העבודה בחוברת העבודה. הוא בודק את השם של כל גליונות העבודה האלה ואם השם מכיל את המילה "מכירות", אז גליון העבודה הזה נמחק.

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

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

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

לדוגמה, אם ברצונך למחוק את הגיליונות שבהם המונח מכירות מופיעים בהתחלה, השתמש בקוד הבא בשורה החמישית.

אם ws.Name כמו "*" & "מכירות" & "*" אז

כאן, השתמשתי בתו ה- wild card רק לאחר משקה הטקסט ולא לפניו. זה יוודא שבזמן בדיקת שמות גליון העבודה, רק אלה יספקו את הקריטריונים שבהם המונח 'מכירות' נמצא בתחילת השם.

אז אלו חלק מהשיטות בהן תוכל להשתמש כאשר ברצונך למחוק גיליונות ב- Excel. ברוב המקרים, תוכל לעשות זאת בקלות בתוך גליון העבודה באמצעות העכבר או קיצור המקשים.

אבל במקרה שיש לך חוברת עבודה כבדה עם הרבה דפי עבודה ואתה רוצה למחוק במהירות סוגים ספציפיים של גיליונות, תוכל גם להשתמש ב- VBA.

אני מקווה שמצאת הדרכה שימושית.