Ide: Lòt lang yo se Google-tradui. Ou ka vizite a English vèsyon nan lyen sa a.
Ouvri yon sesyon
x
or
x
x
enskri
x

or

Kouman ekstrè lèt premye nan chak mo soti nan selil?

Sipoze ou gen yon lis non peyi nan fichye ou, epi kounye a, ou bezwen ekstrè lèt la an premye nan chak mo nan selil la kòm Ekran yo montre yo. Nòmalman, pa gen okenn karakteristik dirèk nan ranmase lèt nan premye nan chak mo nan Excel. Men, isit la, mwen ka pale sou yon fason itil yo rezoud travay sa a.

doc-ekstrè-premye-lèt1

Ekstrè premye lèt nan chak mo ki soti nan selil ak fonksyon itilizatè defini


flèch ble jarèt dwatEkstrè premye lèt nan chak mo ki soti nan selil ak fonksyon itilizatè defini


Nan Excel, ou ka kreye yon Itilizatè defini Fonksyon ekstrè lèt yo an premye nan chak mo nan yon selil. Tanpri fè tankou sa a:

1. Kenbe desann la ALT + F11 kle yo louvri a Microsoft Visual Basic pou Aplikasyon fenèt.

2. Klike sou Antre > Modil, epi kole kòd sa a nan la Modil Fenèt. </ 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. Lè sa a, sove epi fèmen kòd sa a, ale nan Fèy travay la, ak antre nan fòmil sa a = GetFirstLetters (A2) (A2 endike selil la ki ou vle ekstrè lèt la an premye, ou ka chanje li jan ou bezwen) nan yon selil vid. Al gade nan Ekran:

doc-ekstrè-premye-lèt1

4. Lè sa a, peze Antre nan kle, epi seleksyone B2 selil, lè sa a, trennen manyen la plen nan selil yo ke ou vle aplike fòmil sa a. Ak tout lèt yo an premye yo te ekstrè soti nan seri a nan mo, al gade Ekran:

doc-ekstrè-premye-lèt1


Atik ki gen rapò:

Kouman ekstrè premye / dènye / nth mo soti nan fisèl tèks nan Excel?



Rekòmande Zouti Productivity

Biwo Tab

lò star1 Pote onglè sou lamen pou Excel ak lòt biwo lojisyèl, jis tankou Chrome, Firefox ak nouvo Internet Explorer.

Kutools pou Excel

lò star1 Etonan! Ogmante pwodiktivite ou nan minit 5. Pa bezwen okenn ladrès espesyal, sove de zè de tan chak jou!

lò star1 300 karakteristik nouvo pou Excel, fè Excel anpil fasil ak pwisan:

  • Rantre selilè / ranje / Kolòn san yo pa pèdi done.
  • Konbine ak Konsolide Pliye Plizyè ak Manyèl.
  • Konpare Range, Kopi plizyè chif, Konvèti tèks nan dat, inite ak konvèsyon lajan.
  • Konte pa Koulè, Paging subtotals, Avanse Triye ak Super Filter,
  • Plis Chwazi / Insert / Efase / Tèks / Fòma / Link / Kòmantè / Workbooks / Worksheets Zouti ...

Piki ekran nan Kutools pou 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