כיצד להסיר במהירות שבירות שורה ב-Excel?

לפעמים, כאשר אתם מעתיקים נתונים מסוימים מהאתר או מפרידים את הערכים שלכם עם מקשי Alt + Enter, תקבלו כמה שבירות שורה או החזרות קרון. אם ברצונכם להסיר במהירות מספר רב של שבירות שורה ב-Excel כפי שמוצג בסcreenshots הבאים, תוכלו לעשות זאת באופן הבא:

הסרת מספר רב של שבירות שורה עם פונקציית חפש והחלף

הסרת מספר רב של שבירות שורה עם קוד VBA

הסרת מספר רב של שibirat שורה עם Kutools עבור Excel

הסרת מספר רב של שibirat שורה עם פונקציית חפש והחלף

אתם יכולים להסיר מספר רב של שibirat שורה במהירות עם פונקציית חפש והחלף ב-Excel, אנא עבדו כך:

1. בחרו את הטווח שבו ברצונכם להסיר מספר רב של שibirat שורה.

2. לחצו על בית > חפש והחלף > החלף או לחצו על קיצור המקשים Ctrl + F, ותיבת דו-שיח חפש והחלף תופיע.

3. לאחר מכן, בתיבת חפש מה, אנא החזיקו את מקש ALT, ולאחר מכן לחצו על המספרים 010 ממקלדת המספרי. השאירו את תיבת החלף ב-ריק או הזינו רווח. ראו צילום מסך:

4. ואז לחצו על כפתור החלף הכל, כל שibirat השורה הוסרו. ראו צילום מסך:

הסרת מספר רב של שibirat שורה עם קוד VBA

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

1. לחצו על מפתח > Basic חזותי או לחצו על המקשים Alt+F11 כדי לפתוח את חלון Microsoft Visual Basic עבור יישומים, ואז לחצו על הוסף > מודול, והכניסו את הקוד הבא:

קוד VBA: הסרת מספר רב של שibirat שורה בגיליון עבודה

Sub RemoveCarriage()
'Update 20131216
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each Rng In WorkRng
    Rng.Value = Replace(Rng.Value, Chr(10), "")
Next
End Sub

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

3. ואז לחצו על אישור וכל שibirat השורה של הבחירה נמחקו.

הסרת מספר רב של שibirat שורה עם Kutools עבור Excel

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

Kutools עבור Excel: עם יותר מ-300 תוספים נוחים עבור Excel, ניתן לנסות ללא הגבלה במשך 30 יום. קבלו אותו עכשיו

לאחר התקנת Kutools עבור Excel, אנא עשו כך:

1. בחרו את הטווח שבו ברצונכם להסיר את החזרות הקרון.

2. לחצו על Kutools > טקסט > הסר תווים.

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

4. ואז לחצו על אישור או החל. כל שibirat השורה יוסרו מתאיםות הנבחרות.

מאמרים קשורים:

• הסרת תווים אלפביתיים מתאיםות
• הסרת תווים שאינם מספריים מתאיםות
• הסרת תווים מספריים מתאיםות
• הסרת תווים שאינם ניתנים להדפסה מתאיםות
• הסרת תווים שאינם אלפביתיים מתאיםות