Hogyan lehet kinyerni a kezdőbetűket az Excel nevéből?
Az ügyfélrekordok feldolgozása vagy a levelek egyesítése során az adott névből kezdőbetűk beszerzése hasznos lehet az Ön számára, például a Hal Greer HG. Tehát itt bemutatok néhány trükköt, amelyek segítségével gyorsan kivonhatja a kezdőbetűket az Excel névlistájából.
Bontsa ki a kezdőbetűket az Excel képletével
A kezdőbetűk kibontása az Defined Function funkciót használja az Excelben
Bontsa ki a kezdőbetűket az Excel képletével
Az első módszer a képlet használata a kezdőbetűk kivonására a nevekből a Microsoft Excel alkalmazásban.
Válasszon ki egy üres cellát, például Cell C2, írja be ezt a képletet =LEFT(A2)&IF(ISNUMBER(FIND(" ",A2)),MID(A2,FIND(" ",A2)+1,1),"")&IF(ISNUMBER(FIND(" ",A2,FIND(" ",A2)+1)),MID(A2,FIND(" ",A2,FIND(" ",A2)+1)+1,1),"")(A2 az Ön névlistájának első cellája), nyomja meg a gombot belép gombot, majd húzza meg a kitöltő fogantyút a tartomány kitöltéséhez. Most láthatja, hogy az egyes nevek összes kezdőbetűje kivonul a névlistából.
A kezdőbetűk kibontása az Defined Function funkciót használja az Excelben
A képlet mellett használhatja a Defined Function funkciót is, hogy a Microsoft Excel-ben egyszerűen kivonja a kezdőbetűket a megadott nevekből.
1. Jelölje ki a kiválasztani kívánt oszlop celláját, majd nyomja meg az gombot Alt + F11 megnyitni Microsoft Visual Basic for Applications ablak.
2. Az előugró ablakban kattintson a gombra betétlap > Modulok, majd illessze be a következő VBA kódot a modulba.
VBA: Bontsa ki a kezdőbetűket a nevekből
Function FirstCharacters(pWorkRng As Range) As String
'Updateby20140514
Dim arr As Variant
Dim xValue As String
Dim OutValue As String
xValue = pWorkRng.Value
arr = VBA.Split(Trim(xValue))
For i = 0 To UBound(arr)
OutValue = OutValue & VBA.Left(arr(i), 1) & "."
Next
FirstCharacters = OutValue
End Function
3. Mentse el a kódot, és zárja be az ablakot, válasszon egy üres cellát, és írja be ezt a képletet = FirstCharacters (A2), Majd nyomja meg a gombot belép gombot, és húzza a kitöltő fogantyút a kívánt tartomány kitöltéséhez. Ezt követően láthatja az egyes nevek kezdőbetűit.
típus: Megváltoztathatja az elválasztókat "" a kezdőbetűk közül, amire szüksége van a fenti VBA-ban
Relatív cikkek:
A legjobb irodai hatékonyságnövelő eszközök
Töltsd fel Excel-készségeidet a Kutools for Excel segítségével, és tapasztald meg a még soha nem látott hatékonyságot. A Kutools for Excel több mint 300 speciális funkciót kínál a termelékenység fokozásához és az időmegtakarításhoz. Kattintson ide, hogy megszerezze a leginkább szükséges funkciót...
Az Office lap füles felületet hoz az Office-ba, és sokkal könnyebbé teszi a munkáját
- Füles szerkesztés és olvasás engedélyezése Wordben, Excelben és PowerPointban, Publisher, Access, Visio és Project.
- Több dokumentum megnyitása és létrehozása ugyanazon ablak új lapjain, mint új ablakokban.
- 50% -kal növeli a termelékenységet, és naponta több száz kattintással csökkenti az egér kattintását!