cari
RumahTopikexcelCara membuang / memecah teks dan nombor dalam sel excel

Tutorial ini menunjukkan beberapa kaedah untuk memisahkan teks dan nombor dalam sel Excel, menggunakan kedua-dua fungsi terbina dalam dan fungsi VBA tersuai. Anda akan belajar bagaimana untuk mengekstrak nombor semasa mengeluarkan teks, mengasingkan teks semasa membuang nombor, dan akhirnya, memecah data ke dalam dua lajur yang berbeza.

Katakan data anda mempunyai lajur di mana teks dan nombor intermingled. Untuk data yang konsisten, fungsi mudah seperti LEFT , RIGHT , dan MID mungkin cukup. Walau bagaimanapun, data dunia sebenar sering tidak konsisten, dengan nombor yang muncul sebelum, selepas, atau dalam teks. Penyelesaian di bawah menangani kerumitan ini.

Mengeluarkan teks untuk menyimpan nombor (Excel 365, 2021, 2019):

Microsoft Excel 2019 memperkenalkan fungsi TEXTJOIN , yang memudahkan tugas ini. Formula di bawah leverage TEXTJOIN , MID , ROW , INDIRECT , SEQUENCE , dan IFERROR untuk mencapai ini.

Untuk Excel 365 dan 2021:

=TEXTJOIN("",TRUE,IFERROR(MID(A2,SEQUENCE(LEN(A2)),1)*1,""))

Untuk Excel 365 - 2019:

=TEXTJOIN("",TRUE,IFERROR(MID(A2,ROW(INDIRECT("1:"&LEN(A2))),1)*1,""))

(Dalam Excel 2019, ini memerlukan CTRL Shift Enter untuk entri formula array. Dalam array dinamik Excel, mudah masuk mudah.)

Formula ini melangkah melalui setiap watak, mendarab dengan 1 untuk menukar nombor; Watak bukan angka menjadi kesilapan, dikendalikan oleh IFERROR untuk meninggalkan rentetan kosong. TEXTJOIN kemudian menggabungkan bilangan yang tinggal.

Cara Mengeluarkan / Memisahkan Teks dan Nombor Dalam Excel Cell

Fungsi VBA tersuai (semua versi Excel):

Untuk versi Excel yang lebih lama atau pendekatan yang lebih mudah, fungsi VBA tersuai menawarkan penyelesaian yang diperkemas. Dua versi disediakan:

Kod VBA 1 (watak demi watak):

 Fungsi RemoveXt (str as string)
  Dim sres sebagai rentetan
  sres = ""
  Untuk i = 1 hingga len (str)
    Jika isnumeric (mid (str, i, 1)) maka sres = sres & mid (str, i, 1)
  Seterusnya saya
  Membuangetext = sres
Fungsi akhir

Kod VBA 2 (ungkapan biasa):

 Fungsi ReveText (str as string) sebagai rentetan
  Dengan createObject ("vbscript.regexp")
    .Global = benar
    .Pattern = "[^0-9]"
    MembuangText = .Replace (str, "")
  Berakhir dengan
Fungsi akhir

Gunakan fungsi ini dengan =RemoveText(A2) . Kod 2 (menggunakan ungkapan biasa) secara amnya melakukan lebih baik pada dataset yang besar.

Mengeluarkan nombor untuk menyimpan teks (Excel 365, 2021, 2019):

Formula yang sama boleh mengekstrak teks semasa mengeluarkan nombor. Sekali lagi, menggunakan TEXTJOIN , MID , ROW , INDIRECT , SEQUENCE , IFERROR , dan ISERROR :

Untuk Excel 365 dan 2021:

=TRIM(TEXTJOIN("",TRUE,IF(ISERROR(MID(A2,SEQUENCE(LEN(A2)),1)*1),MID(A2,SEQUENCE(LEN(A2)),1),"")))

Untuk Excel 365 - 2019:

=TRIM(TEXTJOIN("",TRUE,IF(ISERROR(MID(A2,ROW(INDIRECT("1:"&LEN(A2))),1)*1),MID(A2,ROW(INDIRECT("1:"&LEN(A2))),1),"")))

Fungsi TRIM menghilangkan ruang utama/trailing.

Cara Mengeluarkan / Memisahkan Teks dan Nombor Dalam Excel Cell

Fungsi VBA tersuai untuk mengeluarkan nombor (semua versi Excel):

Sama dengan fungsi VBA sebelumnya, berikut adalah dua versi untuk mengeluarkan nombor dan menyimpan teks:

Kod VBA 1 (watak demi watak):

 Fungsi penyingkiran (str as string)
  Dim sres sebagai rentetan
  sres = ""
  Untuk i = 1 hingga len (str)
    Sekiranya tidak ada (pertengahan (str, i, 1)) maka sres = sres & pertengahan (str, i, 1)
  Seterusnya saya
  Penyingkiran = sres
Fungsi akhir

Kod VBA 2 (ungkapan biasa):

 Fungsi penyingkiran (str as string) sebagai rentetan
  Dengan createObject ("vbscript.regexp")
    .Global = benar
    .Pattern = "[0-9]"
    Penyingkiran = .replace (str, "")
  Berakhir dengan
Fungsi akhir

Gunakan ini dengan =TRIM(RemoveNumbers(A2)) .

Memisahkan teks dan nombor ke lajur berasingan:

Fungsi VBA tersuai tunggal boleh mengendalikan kedua -dua teks dan pengekstrakan nombor:

Kod VBA 1 (watak demi watak):

 Fungsi splittextNumbers (str as string, is_remove_text sebagai boolean) sebagai rentetan
  Dim Snum, Stext, Schar sebagai String
  snum = stext = ""
  Untuk i = 1 hingga len (str)
    schar = pertengahan (str, i, 1)
    Jika isnumeric (schar) maka snum = snum & schar else stext = stext & schar
  Seterusnya saya
  Jika is_remove_text kemudian spitextNumbers = snum lain splittextNumbers = stext
Fungsi akhir

Kod VBA 2 (ungkapan biasa):

 Fungsi splittextNumbers (str as string, is_remove_text sebagai boolean) sebagai rentetan
  Dengan createObject ("vbscript.regexp")
    .Global = benar
    Jika is_remove_text kemudian .pattern = "[^0-9]" else .pattern = "[0-9]"
    SplitTextNumbers = .Replace (str, "")
  Berakhir dengan
Fungsi akhir

Penggunaan =SplitTextNumbers(A2,TRUE) untuk menyimpan nombor, dan =TRIM(SplitTextNumbers(A2,FALSE)) untuk menyimpan teks.

Menggunakan alat khusus:

Pertimbangkan untuk menggunakan tambahan Excel khusus untuk penyingkiran watak jika anda lebih suka pendekatan yang lebih visual dan mesra pengguna. Tutorial menyebutkan "suite muktamad" tambahan dengan ciri "keluarkan aksara".

Panduan komprehensif ini menyediakan pelbagai penyelesaian yang memenuhi versi Excel yang berbeza dan keutamaan pengguna. Ingat untuk menyesuaikan rujukan sel seperti yang diperlukan untuk data khusus anda.

Atas ialah kandungan terperinci Cara membuang / memecah teks dan nombor dalam sel excel. Untuk maklumat lanjut, sila ikut artikel berkaitan lain di laman web China PHP!

Kenyataan
Kandungan artikel ini disumbangkan secara sukarela oleh netizen, dan hak cipta adalah milik pengarang asal. Laman web ini tidak memikul tanggungjawab undang-undang yang sepadan. Jika anda menemui sebarang kandungan yang disyaki plagiarisme atau pelanggaran, sila hubungi admin@php.cn
Cara Membuat Garis Masa dalam Excel untuk Menapis Jadual Pivot dan CartaCara Membuat Garis Masa dalam Excel untuk Menapis Jadual Pivot dan CartaMar 22, 2025 am 11:20 AM

Artikel ini akan membimbing anda melalui proses membuat garis masa untuk jadual pivot Excel dan carta dan menunjukkan bagaimana anda boleh menggunakannya untuk berinteraksi dengan data anda dengan cara yang dinamik dan menarik. Anda telah mendapat data anda di Pivo

bagaimana melakukan drop down di excelbagaimana melakukan drop down di excelMar 12, 2025 am 11:53 AM

Artikel ini menerangkan cara membuat senarai drop-down dalam Excel menggunakan pengesahan data, termasuk senarai tunggal dan bergantung. Ia memperincikan proses, menawarkan penyelesaian untuk senario biasa, dan membincangkan batasan seperti sekatan kemasukan data dan PE

Cara Jumlah Lajur di ExcelCara Jumlah Lajur di ExcelMar 14, 2025 pm 02:42 PM

Artikel ini membincangkan kaedah untuk jumlah lajur dalam Excel menggunakan fungsi SUM, ciri autosum, dan bagaimana untuk jumlah sel tertentu.

Cara membuat carta pai di ExcelCara membuat carta pai di ExcelMar 14, 2025 pm 03:32 PM

Butiran artikel langkah untuk membuat dan menyesuaikan carta pai dalam Excel, memberi tumpuan kepada penyediaan data, penyisipan carta, dan pilihan pemperibadian untuk analisis visual yang dipertingkatkan.

cara membuat meja di excelcara membuat meja di excelMar 14, 2025 pm 02:53 PM

Artikel membincangkan membuat, memformat, dan menyesuaikan jadual dalam Excel, dan menggunakan fungsi seperti jumlah, purata, dan pivottables untuk analisis data.

cara mengira min dalam excelcara mengira min dalam excelMar 14, 2025 pm 03:33 PM

Artikel membincangkan pengiraan min dalam Excel menggunakan fungsi purata. Isu utama adalah cara menggunakan fungsi ini dengan cekap untuk set data yang berbeza. (158 aksara)

cara menambah drop down dalam excelcara menambah drop down dalam excelMar 14, 2025 pm 02:51 PM

Artikel membincangkan membuat, mengedit, dan mengeluarkan senarai drop-down dalam Excel menggunakan pengesahan data. Isu Utama: Cara Mengurus Senarai Drop-Down dengan berkesan.

Semua yang anda perlu tahu untuk menyusun data di Helaian GoogleSemua yang anda perlu tahu untuk menyusun data di Helaian GoogleMar 22, 2025 am 10:47 AM

Menguasai Susun Lembaran Google: Panduan Komprehensif Menyusun data dalam lembaran Google tidak perlu menjadi kompleks. Panduan ini merangkumi pelbagai teknik, dari menyusun keseluruhan helaian ke julat tertentu, mengikut warna, tarikh, dan pelbagai lajur. Sama ada anda novi

See all articles

Alat AI Hot

Undresser.AI Undress

Undresser.AI Undress

Apl berkuasa AI untuk mencipta foto bogel yang realistik

AI Clothes Remover

AI Clothes Remover

Alat AI dalam talian untuk mengeluarkan pakaian daripada foto.

Undress AI Tool

Undress AI Tool

Gambar buka pakaian secara percuma

Clothoff.io

Clothoff.io

Penyingkiran pakaian AI

AI Hentai Generator

AI Hentai Generator

Menjana ai hentai secara percuma.

Artikel Panas

R.E.P.O. Kristal tenaga dijelaskan dan apa yang mereka lakukan (kristal kuning)
3 minggu yang laluBy尊渡假赌尊渡假赌尊渡假赌
R.E.P.O. Tetapan grafik terbaik
3 minggu yang laluBy尊渡假赌尊渡假赌尊渡假赌
R.E.P.O. Cara Memperbaiki Audio Jika anda tidak dapat mendengar sesiapa
3 minggu yang laluBy尊渡假赌尊渡假赌尊渡假赌

Alat panas

SublimeText3 versi Mac

SublimeText3 versi Mac

Perisian penyuntingan kod peringkat Tuhan (SublimeText3)

PhpStorm versi Mac

PhpStorm versi Mac

Alat pembangunan bersepadu PHP profesional terkini (2018.2.1).

Versi Mac WebStorm

Versi Mac WebStorm

Alat pembangunan JavaScript yang berguna

ZendStudio 13.5.1 Mac

ZendStudio 13.5.1 Mac

Persekitaran pembangunan bersepadu PHP yang berkuasa

MinGW - GNU Minimalis untuk Windows

MinGW - GNU Minimalis untuk Windows

Projek ini dalam proses untuk dipindahkan ke osdn.net/projects/mingw, anda boleh terus mengikuti kami di sana. MinGW: Port Windows asli bagi GNU Compiler Collection (GCC), perpustakaan import yang boleh diedarkan secara bebas dan fail pengepala untuk membina aplikasi Windows asli termasuk sambungan kepada masa jalan MSVC untuk menyokong fungsi C99. Semua perisian MinGW boleh dijalankan pada platform Windows 64-bit.