Sut i dynnu llythrennau cyntaf o enwau yn Excel?
Pan fyddwch yn prosesu cofnodion cwsmeriaid neu'n uno post, gallai cael llythrennau cyntaf o enw penodol fod yn ddefnyddiol i chi, er enghraifft, HG ar gyfer Hal Greer. Felly dyma fi'n cyflwyno rhai triciau i chi dynnu llythrennau cyntaf o'r rhestr enwau yn Excel yn gyflym.
Tynnwch lythrennau cyntaf gyda fformiwla yn Excel
Mae llythrennau cyntaf dyfyniad yn defnyddio Swyddogaeth Diffiniedig yn Excel
Tynnwch lythrennau cyntaf gyda fformiwla yn Excel
Y dull cyntaf yw defnyddio fformiwla i dynnu llythrennau cyntaf o enwau yn Microsoft Excel.
Dewiswch gell wag, er enghraifft, Cell C2, teipiwch y fformiwla hon =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 yw cell gyntaf eich rhestr enwau), pwyswch Rhowch botwm, yna llusgwch yr handlen llenwi i lenwi'r amrediad. Nawr rydych chi'n gweld bod holl lythrennau blaen pob enw yn cael eu tynnu o'r rhestr enwau.
Mae llythrennau cyntaf dyfyniad yn defnyddio Swyddogaeth Diffiniedig yn Excel
Ar wahân i fformiwla, gallwch ddefnyddio'r Swyddogaeth Diffiniedig i dynnu llythrennau cyntaf o enwau penodol yn hawdd yn Microsoft Excel.
1. Dewiswch gell o'r golofn rydych chi am ei dewis a'i phwyso Alt + F11 i agor y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr.
2. Yn y ffenestr naid, cliciwch Mewnosod > Modiwlau, yna gludwch y cod VBA canlynol i'r modiwl.
VBA: Tynnu llythrennau cyntaf o enwau
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 Function3. Cadwch y cod a chau'r ffenestr, dewiswch gell wag a theipiwch y fformiwla hon = FirstCharacters (A2), yna pwyswch Rhowch botwm, a llusgwch yr handlen llenwi i lenwi'r ystod rydych chi ei eisiau. Ar ôl hynny, gallwch weld bod llythrennau cyntaf pob enw yn cael eu tynnu.
Tip: Gallwch chi newid y gwahanyddion "." o'r llythrennau cyntaf fel y mae eu hangen arnoch yn y VBA uchod.
Erthyglau Perthynas:
Offer Cynhyrchiant Swyddfa Gorau
Supercharge Eich Sgiliau Excel gyda Kutools for Excel, a Phrofiad Effeithlonrwydd Fel Erioed Erioed o'r blaen. Kutools for Excel Yn cynnig dros 300 o nodweddion uwch i hybu cynhyrchiant ac arbed amser. Cliciwch Yma i Gael Y Nodwedd Sydd Ei Angen Y Mwyaf...
Office Tab Yn dod â rhyngwyneb Tabbed i Office, ac yn Gwneud Eich Gwaith yn Haws o lawer
- Galluogi golygu a darllen tabbed yn Word, Excel, PowerPoint, Cyhoeddwr, Mynediad, Visio a Phrosiect.
- Agor a chreu dogfennau lluosog mewn tabiau newydd o'r un ffenestr, yn hytrach nag mewn ffenestri newydd.
- Yn cynyddu eich cynhyrchiant 50%, ac yn lleihau cannoedd o gliciau llygoden i chi bob dydd!
