Dènye mo a

Yon senp, nan premye gade, pwoblèm ak yon solisyon ki pa evidan: ekstrè dènye mo ki soti nan yon liy tèks. Oke, oswa, nan ka jeneral la, fragman ki sot pase a, separe pa yon karaktè delimiter bay (espas, vigil, elatriye) Nan lòt mo, li nesesè aplike yon rechèch ranvèse (depi nan fen rive nan kòmansman) nan fisèl la nan yon. karaktè bay epi answit ekstrè tout karaktè yo adwat li.

Ann gade nan tradisyonèlman plizyè fason yo chwazi nan: fòmil, makro, ak atravè Power Query.

Metòd 1. Fòmil

Pou fè li pi fasil pou konprann sans ak mekanik fòmil la, ann kòmanse yon ti kras byen lwen. Premyèman, ann ogmante kantite espas ki genyen ant mo nan tèks sous nou an pou, pa egzanp, 20 moso. Ou ka fè sa ak fonksyon an ranplase. Ranplasan (SUBSTITUTION) ak fonksyon repete yon karaktè bay N-fwa - REPETE (REPT):

Dènye mo a

Koulye a, nou koupe 20 karaktè nan fen tèks la ki kapab lakòz lè l sèvi avèk fonksyon an DWA (DWA):

Dènye mo a

Li vin pi cho, pa vre? Li rete pou retire espas siplemantè lè l sèvi avèk fonksyon an TRIM (TRIM) epi yo pral rezoud pwoblèm nan:

Dènye mo a

Nan vèsyon angle a, fòmil nou an ap gade tankou sa a:

= TAYE(DWA(RANPÒT(A1;» «;REPT(» «;20));20))

Mwen espere ke li klè ke nan prensip li pa nesesè yo mete egzakteman 20 espas - nenpòt nimewo ap fè, osi lontan ke li se pi plis pase longè mo ki pi long nan tèks sous la.

Men, si tèks sous la bezwen divize pa yon espas, men pa yon lòt karaktè separasyon (pa egzanp, pa yon vigil), Lè sa a, fòmil nou an ap bezwen yon ti kras korije:

Dènye mo a

Metòd 2. Fonksyon macro

Travay la nan ekstrè dènye mo a oswa fragman nan tèks la ka rezoud tou lè l sèvi avèk makro, sètadi, ekri yon fonksyon rechèch ranvèse nan Visual Basic ki pral fè sa nou bezwen - rechèch pou yon substring bay nan yon fisèl nan direksyon opoze a - soti nan fen nan kòmansman an.

Peze rakoursi klavye a Alt+F11 oswa bouton Vizyèl Debaz tab pwomotè (Devlopè)pou louvri editè makro a. Lè sa a, ajoute yon nouvo modil atravè meni an Mete – Modil epi kopye kòd sa a la:

 Fonksyon LastWord(txt As String, Optional delim As String = " ", Optional n As Integer = 1) As String arFragments = Split(txt, delim) LastWord = arFragments(UBound(arFragments) - n + 1) Fonksyon fen  

Koulye a, ou ka sove liv travay la (nan yon fòma makro-pèmèt!) epi sèvi ak fonksyon an kreye nan sentaks sa a:

=DènyeMo (txt ; delim ; n)

ki kote

  • txt - selil ak tèks sous
  • delim — karaktè séparateur (default — espas)
  • n - ki mo yo ta dwe ekstrè soti nan fen a (pa default - premye a soti nan fen an)

Dènye mo a

Avèk nenpòt chanjman nan tèks sous la nan lavni, fonksyon makro nou an pral rekalkile sou vole, tankou nenpòt fonksyon estanda fèy Excel.

Metòd 3. Rekèt pouvwa

Pouvwa rechèch se yon ajoute gratis nan Microsoft pou enpòte done nan Excel soti nan prèske nenpòt sous ak Lè sa a, transfòme done yo telechaje nan nenpòt fòm. Pouvwa ak frechè sipleman sa a tèlman gwo ke Microsoft te konstwi tout karakteristik li yo nan Excel 2016 pa default. Pou Excel 2010-2013 Power Query ka telechaje gratis soti isit la.

Travay nou separe dènye mo a oswa fragman atravè yon separasyon bay lè l sèvi avèk Power Query rezoud trè fasil.

Premyèman, ann vire tab done nou an nan yon tab entelijan lè l sèvi avèk rakoursi klavye. Ctrl+T oswa kòmandman Kay - Fòma kòm yon tab (Kay — Fòma kòm Tablo):

Dènye mo a

Lè sa a, nou chaje kreye "smart tab la" nan Power Query lè l sèvi avèk lòd la Soti nan tab/ranje (Soti nan tab/ranje) tab Done (si ou gen Excel 2016) oswa sou tab la Pouvwa rechèch (si ou gen Excel 2010-2013):

Dènye mo a

Nan fenèt editè rechèch la ki ouvè, sou tab la Transfòmasyon (transfòme) chwazi yon ekip Split Kolòn - Pa Delimiter (Divize kolòn - Pa delimiter) ak Lè sa a, li rete yo mete karaktè nan séparateur epi chwazi opsyon an Delimiter ki pi dwatpa koupe tout mo, men sèlman dènye a:

Dènye mo a

Apre klike sou OK dènye mo a pral separe nan yon nouvo kolòn. Premye kolòn ki pa nesesè a ka retire lè w klike sou tèt li epi chwazi li Retire (Efase). Ou kapab tou chanje non kolòn ki rete a nan tèt tab la.

Rezilta yo ka telechaje tounen nan fèy la lè l sèvi avèk kòmandman an Kay — Fèmen epi chaje — Fèmen epi chaje pou… (Kay — Fèmen & Chaje — Fèmen & Chaje pou…):

Dènye mo a

Epi kòm rezilta nou jwenn:

Dènye mo a

Tankou sa a - bon mache ak kè kontan, san fòmil ak makro, prèske san yo pa manyen klavye a 🙂

Si lis orijinal la chanje nan lavni an, li pral ase pou klike sou dwa oswa itilize yon chemen kout klavye Ctrl+Alt+F5 mete ajou demann nou an.


  • Divize tèks kolan an kolòn
  • Analize ak analiz tèks ak ekspresyon regilye
  • Ekstrè premye mo yo nan tèks la ak fonksyon SUBSTITUTE

Kite yon Reply