Anonim

ישנן מספר דרכים למחוק עמודות ריקות בקובץ Microsoft Excel. מדוע תצטרך לעשות זאת? - פשוט.

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

מדי פעם, הנתונים שתייבא מדפי אינטרנט עשויים לגרום למספר רב של עמודות שיופיעו גם אם לא נעשה בהן שימוש. אתה רואה את זה קורה עם קבצי CSV וקבצי txt באותה תדירות.

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

באמצעות מקרו VBA

קישורים מהירים

  • באמצעות מקרו VBA
        • עבור לקובץ ה- Excel שלך
        • החזיקו את Alt ו- F11 יחד
        • המתן עד שיופיע חלון Microsoft Visual Basic for Applications
        • לחץ על הוסף
        • בחר מודול
        • הדבק את שורות הקוד הבאות בחלון
        • לחץ על F5 כדי להרכיב ולבצע את המאקרו
        • הזן את טווח העבודה המתאים בחלון הדו-שיח
        • $ A $ 1 - הפינה העליונה
        • $ J $ 12 - הפינה התחתונה
        • לחץ על אישור
  • שימוש בכלי Excel
        • ראשית בחר את טווח הנתונים
        • לחץ על F5
        • לחץ על מיוחד
        • בחר באפשרות 'ריק'
        • לחץ על אישור (בחירה זו תבטיח שכל התאים הריקים ייבחרו בטווח היעד)
        • עבור לכרטיסייה דף הבית
        • בחר בתפריט הנפתח מחק בקבוצה כלים לתאים
        • בחר מחק תאים
        • בחר Shift תאים שמאלה להסרה וסידור מחדש של עמודות
        • לחץ על אישור
        • בחר Shift תאים למעלה להסרה ושידור מחדש של שורות
  • משימות מיון אחרות קלות לביצוע
  • מחשבה אחרונה

השיטה הראשונה כוללת שימוש במאקרו VBA.

  1. עבור לקובץ ה- Excel שלך

  2. החזיקו את Alt ו- F11 יחד

  3. המתן עד שיופיע חלון Microsoft Visual Basic for Applications

  4. לחץ על הוסף

  5. בחר מודול

  6. הדבק את שורות הקוד הבאות בחלון

Sub DeleteEmptyColumns()
'Updateby20140317
Dim rng As Range
Dim InputRng As Range
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type:=8)
Application.ScreenUpdating = False
For i = InputRng.Columns.Count To 1 Step -1
Set rng = InputRng.Cells(1, i).EntireColumn
If Application.WorksheetFunction.CountA(rng) = 0 Then
rng.Delete
End If
Next
Application.ScreenUpdating = True
End Sub

  1. לחץ על F5 כדי להרכיב ולבצע את המאקרו

  2. הזן את טווח העבודה המתאים בחלון הדו-שיח

טווח העבודה או טווח הנתונים הם המרווח הספציפי בין העמודות שאליהן תרצה למקד. הפורמט הוא $ A $ 1: $ J $ 12. האותיות תואמות את העמודה והמספרים תואמים את השורות.

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

$ A $ 1 - הפינה העליונה

$ J $ 12 - הפינה התחתונה

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

לחץ על אישור

לאחר מכן יש למחוק את כל העמודות הריקות וכל העמודות הממולאות צריכות להיות זו ליד זו.

שימוש בכלי Excel

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

  1. ראשית בחר את טווח הנתונים

  2. לחץ על F5

  3. לחץ על מיוחד

  4. בחר באפשרות 'ריק'

  5. לחץ על אישור (בחירה זו תבטיח שכל התאים הריקים ייבחרו בטווח היעד)

  6. עבור לכרטיסייה דף הבית

  7. בחר בתפריט הנפתח מחק בקבוצה כלים לתאים

  8. בחר מחק תאים

  9. בחר Shift תאים שמאלה להסרה וסידור מחדש של עמודות

  10. לחץ על אישור

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

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

בחר Shift תאים למעלה להסרה ושידור מחדש של שורות

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

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

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

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

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

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

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

מחשבה אחרונה

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

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

כיצד למחוק את כל העמודות הריקות ב- Excel