טיפ: שפות אחרות הן Google-Translated. אתה יכול לבקר את English גרסה של קישור זה.
התחבר
x
or
x
x
הירשם
x

or

כיצד לחלץ את האות הראשונה של כל מילה מתא?

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

doc-extract-first-letter1

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


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


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

1. החזק את ALT + F11 מפתחות כדי לפתוח את חלון Microsoft Visual Basic עבור יישומים.

2. לחץ הַבלָעָה > מודול, והדבק את הקוד הבא חלון מודול. </ p>

Function GetFirstLetters(rng As Range) As String
'Update 20140325
    Dim arr
    Dim I As Long
    arr = VBA.Split(rng, " ")
    If IsArray(arr) Then
        For I = LBound(arr) To UBound(arr)
            GetFirstLetters = GetFirstLetters & Left(arr(I), 1)
        Next I
    Else
        GetFirstLetters = Left(arr, 1)
    End If
End Function

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

doc-extract-first-letter1

4. ולאחר מכן לחץ על זן ולאחר מכן בחר את התא B2, ולאחר מכן גרור את ידית המילוי לתאים שברצונך להחיל את הנוסחה. וכל המכתבים הראשונים הוצאו מסדרת המילים, ראה צילום מסך:

doc-extract-first-letter1


כתבות קשורות:

כיצד לחלץ מילה הראשונה / האחרונה / nth ממחרוזת טקסט ב- Excel?



כלי פרודוקטיביות מומלצים

הכרטיסייה 'משרד'

כוכב זהב תביא כרטיסיות שימושיות ל- Excel ולתוכנות Office אחרות, בדיוק כמו Chrome, Firefox ו- Internet Explorer החדש.

Kutools עבור Excel

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

כוכב זהב 300 תכונות חדשות עבור Excel, להפוך את Excel הרבה יותר קל ורב עוצמה:

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

צילום מסך של Kutools עבור Excel

Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Oleg · 9 months ago
    Подскажите пожалуйста, можно ли модифицировать код чтобы забиралась не первые а Заглавные буквы?
  • To post as a guest, your comment is unpublished.
    nawal jha · 2 years ago
    i think it has one bug, it's automatically removed from module when sheet is closed, need to again every time when open sheet same process to be required, please advice how to save this formula in excel permanently.
  • To post as a guest, your comment is unpublished.
    NoOne · 2 years ago
    Please include this part:

    If you create a function called DISCOUNT in a workbook called Personal.xlsb and you call that function from another workbook, you must type =personal.xlsb!discount(), not simply =discount().

    https://support.office.com/en-us/article/Create-Custom-Functions-in-Excel-2007-2f06c10b-3622-40d6-a1b2-b6748ae8231f
  • To post as a guest, your comment is unpublished.
    Adam Pavey · 2 years ago
    Very helpful. Exactly what I was after.
  • To post as a guest, your comment is unpublished.
    Sridhar · 3 years ago
    Thank you very much.. its working.. u rocks