Loncat ke daftar isi utama

Excel menghapus karakter, kata, angka dari string teks

Misalkan, Anda memiliki daftar panjang string teks yang berisi karakter, angka, atau simbol spesifik lainnya. Dalam kasus tertentu, Anda mungkin perlu menghapus beberapa karakter berdasarkan posisi, seperti dari kanan, kiri atau tengah dari string teks, atau menghapus beberapa karakter yang tidak diinginkan, angka dari daftar string. Menemukan solusi satu per satu akan membuat Anda pusing, tutorial ini mengumpulkan semua jenis metode untuk menghapus karakter, kata, atau angka di Excel.

Daftar Isi:

1. Hapus karakter dari kiri, kanan atau tengah string teks

2. Hapus karakter yang tidak diinginkan / khusus dari string teks

3. Hapus karakter / teks sebelum atau sesudah karakter tertentu

4. Hapus kata-kata dari string teks


Hapus karakter dari kiri, kanan atau tengah string teks

Mungkin pekerjaan umum bagi kebanyakan dari kita untuk menghapus beberapa karakter dari kiri, kanan atau tengah string teks di lembar kerja Excel. Bagian ini akan memperkenalkan beberapa trik cepat dan mudah untuk menyelesaikan tugas ini.

1.1 Hapus n karakter pertama dari string teks

Jika Anda perlu menghapus n karakter pertama dari daftar string teks, metode berikut mungkin bisa membantu Anda.

 Dengan menggunakan rumus

Biasanya, untuk menghapus karakter dari awal string teks, Anda dapat menggunakan fungsi REPLACE atau kombinasi fungsi RIGHT dan LEN.

Fungsi REPLACE untuk menghapus N karakter pertama:

=REPLACE(string, 1, num_chars, "")
  • tali: String teks yang ingin Anda hapus karakternya;
  • jumlah_karakterchar: Jumlah karakter yang ingin Anda hapus.

Misalnya, untuk menghapus 2 karakter pertama dari sel, gunakan rumus di bawah ini, lalu seret gagang isian untuk menyalin rumus ke sel lain, lihat tangkapan layar:

=REPLACE(A4, 1, 2, "")

RIGHT dan LEN berfungsi untuk menghapus N karakter pertama:

=RIGHT(string, LEN(string) - num_chars)
  • tali: String teks yang ingin Anda hapus karakternya;
  • jumlah_karakterchar: Jumlah karakter yang ingin Anda hapus.

Untuk menghapus 2 karakter pertama dari sel, harap terapkan rumus berikut:

=RIGHT(A4,LEN(A4)-2)


 Dengan menggunakan Fungsi Buatan Pengguna

Untuk menghapus n karakter pertama dari sel, Anda juga dapat membuat Fungsi Buatan Pengguna untuk menyelesaikan tugas ini. Silakan lakukan dengan langkah-langkah berikut:

1. Tahan Alt + F11 kunci untuk membuka Microsoft Visual Basic untuk Aplikasi jendela.

2. Klik Menyisipkan > Modul, dan tempel kode berikut di Module Window.

Kode VBA: Hapus n karakter pertama dari string teks

Function removeFirstx(rng As String, cnt As Long)
'Updateby Extendoffice
removeFirstx = Right(rng, Len(rng) - cnt)
End Function

3. Lalu kembali ke lembar kerja, lalu masukkan rumus ini: = hapus pertamax (A4,2) ke dalam sel kosong, lalu seret gagang isian ke bawah untuk mendapatkan hasil yang Anda butuhkan, lihat tangkapan layar:

Note: Dalam rumus ini: A4 adalah sel yang ingin Anda hapus karakternya; Nomor 2 menunjukkan jumlah karakter yang ingin Anda hapus dari awal string teks.


1.2 Hapus n karakter terakhir dari string teks

Untuk menghapus jumlah karakter tertentu dari sisi kanan string teks, Anda juga dapat menggunakan rumus atau Fungsi Buatan Pengguna.

 Dengan menggunakan rumus

Untuk menghapus n karakter terakhir dari string teks, Anda dapat menggunakan rumus berdasarkan fungsi LEFT dan LEN.

LEFT dan LEN berfungsi untuk menghapus N karakter terakhir:

=LEFT(string, LEN(string) - num_chars)
  • tali: String teks yang ingin Anda hapus karakternya;
  • jumlah_karakterchar: Jumlah karakter yang ingin Anda hapus.

Untuk menghapus 3 karakter dari akhir string teks, gunakan rumus ini, lalu seret gagang isian untuk menyalin rumus ke sel lain, lihat tangkapan layar:

=LEFT(A4, LEN(A4) - 3)


 Dengan menggunakan Fungsi Buatan Pengguna

Di sini, Fungsi yang Ditentukan Pengguna juga dapat membantu Anda menghapus n karakter terakhir dari daftar sel, lakukan seperti ini:

1. Tahan Alt + F11 kunci untuk membuka Microsoft Visual Basic untuk Aplikasi jendela.

2. Klik Menyisipkan > Modul, dan tempel kode berikut di Module Window.

Kode VBA: Hapus n karakter terakhir dari string teks

Function removeLastx(rng As String, cnt As Long)
'Updateby Extendoffice
removeLastx = Left(rng, Len(rng) - cnt)
End Function

3. Kemudian kembali ke lembar kerja, dan masukkan rumus ini: = removelastx (A4,3) ke dalam sel kosong, lalu seret gagang isian ke bawah untuk mendapatkan hasil yang Anda butuhkan, lihat tangkapan layar:

Note: Dalam rumus ini: A4 adalah sel yang ingin Anda hapus karakternya; Nomor 3 menunjukkan jumlah karakter yang ingin Anda hapus dari akhir string teks.


1.3 Hapus karakter pertama, terakhir n atau karakter posisi tertentu dengan menggunakan fitur yang kuat

Mungkin menyakitkan bagi Anda untuk mengingat berbagai rumus, untuk menghapus karakter dari kiri, kanan atau posisi tertentu dari string teks, Kutools untuk Excel mendukung fitur yang kuat - Hapus berdasarkan Posisi. Dengan alat kecil ini, Anda dapat menangani tugas-tugas ini dengan beberapa klik tanpa mengingat rumus apa pun.

Setelah menginstal Kutools untuk Excel, lakukan seperti ini:

1. Pilih sel yang ingin Anda hapus karakternya, lalu klik Kutools > Teks > Hapus berdasarkan Posisi, lihat tangkapan layar:

2. di Hapus berdasarkan Posisi kotak dialog, lakukan operasi berikut:

2.1 Hapus n karakter pertama dari sel:

  • In Bilangan kotak teks, ketik jumlah karakter yang ingin Anda hapus dari string. Dalam contoh ini, saya akan menghapus 2 karakter pertama.
  • Pilih Dari kiri pilihan dalam Posisi bagian.
  • Lalu klik Ok or Mendaftar tombol untuk mendapatkan hasil seperti gambar di bawah ini ditampilkan.

2.2 Hapus n karakter terakhir dari sel:

  • In Bilangan kotak teks, ketik jumlah karakter yang ingin Anda hapus dari string. Dalam contoh ini, saya akan menghapus 3 karakter terakhir.
  • Pilih Dari kanan pilihan dalam Posisi bagian.
  • Lalu klik Ok or Mendaftar tombol untuk mendapatkan hasil seperti gambar di bawah ini ditampilkan.

2.3 Hapus n karakter dari posisi sel tertentu:

Jika Anda perlu menghapus sejumlah karakter tertentu dari posisi tertentu dari string teks, misalnya, menghapus 3 karakter mulai dari karakter ketiga string.

  • In Bilangan kotak teks, ketik jumlah karakter yang ingin Anda hapus dari string. Dalam contoh ini, saya akan menghapus 3 karakter dari posisi tertentu.
  • Pilih Menentukan pilihan, dan ketik nomor yang ingin Anda hapus karakternya mulai dari dalam kotak teks dari Posisi bagian. Di sini, saya akan menghapus karakter dari karakter ketiga.
  • Lalu klik Ok or Mendaftar tombol untuk mendapatkan hasil seperti gambar di bawah ini ditampilkan.

Unduh dan uji coba gratis Kutools untuk Excel Sekarang!


1.4 Hapus n karakter pertama dan n terakhir dari string teks dengan rumus

Saat Anda perlu menghapus beberapa karakter di kedua sisi string teks di Excel, Anda bisa menggabungkan fungsi MID dan LEN untuk membuat rumus untuk menangani tugas ini.

=MID(string, left_chars + 1, LEN(string) - (left_chars + right_chars)
  • tali: String teks yang ingin Anda hapus karakternya;
  • kiri_chars: Jumlah karakter yang akan dihapus dari kiri;
  • karakter_kanan: Jumlah karakter yang akan dihapus dari kanan.

Misalnya, Anda perlu menghapus 7 karakter pertama dan 5 karakter terakhir dari string teks secara bersamaan, masukkan rumus berikut ke dalam sel kosong:

=MID(A4, 7+1, LEN(A4) - (7+5))

Note: Dalam rumus ini: A4 adalah sel yang ingin Anda hapus karakternya; Nomor 7 adalah jumlah karakter yang ingin Anda hapus dari sisi kiri; Nomor 5 adalah jumlah karakter yang ingin Anda hapus dari sisi kanan.

Dan kemudian, seret gagang isian ke tempat Anda ingin menerapkan rumus ini, dan Anda akan mendapatkan hasil seperti gambar di bawah ini:


Hapus karakter yang tidak diinginkan / khusus dari string teks

Saat mengimpor data dari tempat lain ke Excel, banyak karakter khusus atau yang tidak diinginkan mungkin ditempelkan ke lembar kerja Anda. Untuk menghapus karakter yang tidak diinginkan seperti #@$%^&, spasi, angka, angka non-numerik, jeda baris, dll., bagian ini akan memberikan beberapa metode yang berguna untuk membantu Anda.

2.1 Hapus beberapa karakter khusus dari string teks

Jika ada beberapa karakter khusus seperti %^&*() dalam string teks, untuk menghapus jenis karakter ini, Anda dapat menerapkan tiga trik di bawah ini.

 Hapus beberapa karakter khusus dari string teks dengan fungsi SUBSTITUTE

Biasanya, di Excel, Anda dapat membuat beberapa fungsi SUBSTITUTE untuk mengganti setiap karakter tertentu tanpa apa-apa, sintaks generiknya adalah:

=SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(string_cell, char1, ""), char2, ""), char3, "")
  • string_sel: Sel berisi string teks yang ingin Anda hapus karakter khususnya;
  • karakter1, karakter2, karakter3: Karakter yang tidak diinginkan yang ingin Anda hapus.

Sekarang, silakan salin atau masukkan rumus di bawah ini ke dalam sel kosong:

=SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(A2, "#", ""), "&", ""), "*", ""), "%", "")

Dan kemudian, seret gagang isian ke sel tempat Anda ingin menerapkan rumus ini, dan semua karakter yang tidak diinginkan yang Anda tentukan akan dihapus sekaligus, lihat tangkapan layar:

Tips: Jika ada lebih banyak karakter yang ingin Anda hapus, Anda hanya perlu menyarangkan lebih banyak fungsi SUBSTITUTE di dalam rumus.


 Hapus beberapa karakter khusus dari string teks dengan Fungsi Buatan Pengguna

Fungsi SUBSTITUTE bersarang di atas berfungsi dengan baik jika ada beberapa karakter khusus yang harus dihapus, tetapi jika Anda memiliki lusinan karakter yang harus dihapus, rumusnya akan menjadi terlalu panjang dan sulit diatur. Dalam hal ini, Fungsi Buatan Pengguna berikut dapat membantu Anda menyelesaikan tugas ini dengan cepat dan mudah.

1. Tahan Alt + F11 kunci untuk membuka Microsoft Visual Basic untuk Aplikasi jendela.

2. Klik Menyisipkan > Modul, dan rekatkan kode berikut ke dalam Jendela Modul.

Kode VBA: Hapus beberapa karakter khusus dari string teks

Function RemoveUnwantedChars(Str As String, xchars As String)
'Updateby Extendoffice
    For Index = 1 To Len(xchars)
        Str = Replace(Str, Mid(xchars, Index, 1), "")
    Next
    RemoveUnwantedChars = Str
End Function

3. Kemudian, tutup jendela kode dan kembali ke lembar kerja, masukkan rumus ini =Hapus Karakter yang Tidak Diinginkan(A2, $D$2) ke dalam sel kosong tempat menampilkan hasilnya, lalu seret gagang isian ke bawah untuk mendapatkan hasil sesuai kebutuhan, lihat tangkapan layar:

Note: Dalam rumus di atas: A2 adalah sel yang ingin Anda hapus karakternya; $ D $ 2 berisi karakter khusus yang ingin Anda hapus (Anda dapat mengetikkan karakter khusus lainnya yang Anda perlukan).


 Hapus beberapa karakter khusus dari string teks dengan fitur luar biasa

Jika sudah terpasang Kutools untuk Excel, Dengan yang Hapus Karakter fitur, Anda dapat menghapus semua jenis karakter, seperti karakter numerik, karakter alfa, karakter non-cetak…dari daftar sel yang Anda butuhkan.

Setelah menginstal Kutools untuk Excel, lakukan seperti ini:

1. Pilih rentang sel yang ingin Anda hapus karakter khusus, lalu klik Kutools > Teks > Hapus Karakter, lihat tangkapan layar:

2. di Hapus Karakter kotak dialog:

  • Memeriksa Kustom pilihan di bawah Hapus Karakter bagian.
  • Dan kemudian masukkan karakter khusus ke dalam kotak teks yang ingin Anda hapus.
  • Lalu klik Ok or Mendaftar tombol untuk menghapus karakter yang Anda tentukan sekaligus. Lihat tangkapan layar:

Unduh dan uji coba gratis Kutools untuk Excel Sekarang!


2.2 Hapus semua nomor dari string teks

Jika Anda memiliki daftar string teks yang bercampur dengan angka, huruf, dan karakter khusus, dan sekarang, Anda hanya ingin menghapus semua angka dan menyimpan karakter lain. Bagian ini akan memberikan beberapa cara praktis untuk membantu Anda.

 Hapus angka dari string teks dengan fungsi SUBSTITUTE

Di Excel, fungsi SUBSTITUTE bersarang dapat membantu mengganti semua angka dengan nol, jadi, Anda dapat menggunakan rumus di bawah ini untuk menghapus semua angka dari sel:

=SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(A2,1,""),2,""),3,""),4,""),5,""),6,""),7,""),8,""),9,""),0,"")

Kemudian seret gagang isian ke sel tempat Anda ingin menerapkan rumus ini, dan semua nomor akan dihapus dari daftar string teks, lihat tangkapan layar:


 Hapus angka dari string teks dengan fungsi TEXTJOIN

Jika Anda memiliki Excel 2019, 2021 atau 365, fungsi TEXTJOIN baru juga dapat membantu menghapus angka dari string teks.

Silakan salin rumus berikut ke dalam sel kosong, lalu tekan Ctrl + Shift + Enter secara bersamaan untuk mendapatkan hasil pertama:

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

Dan kemudian salin rumus ke sel lain di bawah tempat Anda ingin menerapkan rumus ini, lihat tangkapan layar:

Note: TEXTJOIN ini hanya tersedia di Excel 2019, 2021 dan Office 365.


 Hapus nomor dari string teks dengan User Defined Function

Selain dua rumus di atas, Fungsi Buatan Pengguna juga dapat membantu Anda, lakukan dengan langkah-langkah berikut:

1. Tahan Alt + F11 kunci untuk membuka Microsoft Visual Basic untuk Aplikasi jendela.

2. Klik Menyisipkan > Modul, dan rekatkan kode berikut ke dalam Jendela Modul.

Kode VBA: Hapus angka dari string teks

Function RemoveNumbers(Txt As String) As String
'Updateby Extendoffice
With CreateObject("VBScript.RegExp")
.Global = True
.Pattern = "[0-9]"
RemoveNumbers = .Replace(Txt, "")
End With
End Function

3. Kemudian, tutup dan keluar dari jendela kode, kembali ke lembar kerja, dan masukkan rumus ini: = RemoveNumbers (A2) ke dalam sel kosong, lalu seret gagang isian ke sel tempat Anda ingin menerapkan rumus ini, lihat tangkapan layar:


 Hapus angka dari string teks dengan opsi praktis

Jika Anda lelah dengan rumus yang rumit, sekarang, izinkan saya menunjukkan alat yang mudah – Kutools untuk Excel'S Hapus Karakter. Dengan fitur praktis ini, Anda dapat menyelesaikan tugas ini hanya dengan beberapa klik.

Setelah menginstal Kutools untuk Excel, lakukan seperti ini:

1. Pilih rentang sel tempat Anda ingin menghapus angka, lalu klik Kutools > Teks > Hapus Karakter.

2. di Hapus Karakter kotak dialog, lakukan operasi berikut:

  • Memeriksa Numeric pilihan di bawah Hapus Karakter bagian.
  • Lalu klik Ok or Mendaftar tombol untuk segera menghapus nomor. Lihat tangkapan layar:

Unduh dan uji coba gratis Kutools untuk Excel Sekarang!


2.3 Hapus karakter non-numerik dari string teks

Untuk menghapus semua karakter non-numerik dan hanya menyimpan angka dari string teks, bagian ini akan membahas beberapa cara untuk menyelesaikan tugas ini di Excel.

 Hapus karakter non-numerik dari string teks dengan rumus di Excel 2016 dan versi sebelumnya

Jika Anda menggunakan Excel 2016 atau versi sebelumnya, Anda harus menerapkan rumus kompleks untuk mencapai pekerjaan ini, silakan salin atau masukkan rumus di bawah ini ke dalam sel kosong:

=SUMPRODUCT(MID(0&A2, LARGE(INDEX(ISNUMBER(--MID(A2, ROW(INDIRECT("1:"&LEN(A2))), 1)) * ROW(INDIRECT("1:"&LEN(A2))), 0), ROW(INDIRECT("1:"&LEN(A2))))+1, 1) * 10^ROW(INDIRECT("1:"&LEN(A2)))/10)

Dan kemudian salin rumus ke sel lain di bawah tempat Anda ingin menerapkan rumus ini, lihat tangkapan layar:

Note: Jika angka dalam string teks dimulai dengan 0, 0 akan hilang.


 Hapus karakter non-numerik dari string teks dengan fungsi TEXTJOIN di Excel 2019, 2021, 365

Rumus di atas mungkin terlalu sulit untuk dipahami bagi kebanyakan dari kita. Jika Anda memiliki Excel 2019, 2021 atau 365, ada rumus rapi yang dapat membantu Anda.

Silakan salin atau masukkan rumus berikut ke dalam sel kosong, dan tekan Ctrl + Shift + Enter kunci bersama untuk mendapatkan hasil pertama yang benar:

=TEXTJOIN("",TRUE,IFERROR(MID(A2,ROW(INDIRECT("1:100")),1)+0,""))

Kemudian, seret gagang isian ke sel tempat Anda akan menerapkan rumus ini, dan Anda akan mendapatkan hasil seperti gambar di bawah ini:

Note: Dengan rumus ini, Anda dapat melihat 0 di depan akan disimpan karena angka dikembalikan sebagai teks.


 Hapus karakter non-numerik dari string teks dengan Fungsi Buatan Pengguna

Tentu saja, Anda juga dapat membuat Fungsi Buatan Pengguna Anda sendiri dengan sintaks yang lebih sederhana, lakukan seperti ini:

1. Tahan Alt + F11 kunci untuk membuka Microsoft Visual Basic untuk Aplikasi jendela.

2. Klik Menyisipkan > Modul, dan rekatkan kode berikut ke dalam Jendela Modul.

Kode VBA: Hapus karakter non-numerik dari string teks

Function Removenonnumeric(str As String) As String
'Updateby Extendoffice
    With CreateObject("VBScript.RegExp")
        .Global = True
        .Pattern = "[^0-9]"
        Removenonnumeric = .Replace(str, "")
    End With
End Function

3. Kemudian, tutup dan keluar dari jendela kode, kembali ke lembar kerja, dan masukkan rumus ini: =Hapusnonnumerik(A2) ke dalam sel kosong, lalu seret gagang isian ke sel tempat Anda ingin menerapkan rumus ini, hanya angka yang akan diekstraksi seperti gambar di bawah ini:


 Hapus karakter non-numerik dari string teks dengan fitur sederhana

Untuk menghapus karakter non-numerik dalam rentang sel secara langsung, Kutools untuk Excel'S Hapus Karakter utilitas dapat menyelesaikannya hanya dengan beberapa klik.

Setelah menginstal Kutools untuk Excel, lakukan seperti ini:

1. Pilih rentang sel yang ingin Anda hapus karakter non-numeriknya, lalu klik Kutools > Teks > Hapus Karakter.

2. di Hapus Karakter kotak dialog, setel operasi berikut:

  • Memeriksa Non-numerik pilihan di bawah Hapus Karakter bagian.
  • Lalu klik Ok or Mendaftar tombol untuk segera menghapus semua karakter non-numerik. Lihat tangkapan layar:

Unduh dan uji coba gratis Kutools untuk Excel Sekarang!


2.4 Pisahkan teks dan angka dari satu sel menjadi dua kolom

Terkadang, Anda mungkin ingin mengekstrak teks dan angka dari string teks menjadi dua kolom terpisah, dengan bantuan metode berikut, Anda dapat menyelesaikan tugas ini dengan cepat dan mudah.

 Pisahkan teks dan angka dari satu sel menjadi dua kolom dengan Fungsi Buatan Pengguna

Dengan menggunakan Fungsi Buatan Pengguna berikut, Anda dapat mengekstrak teks dan angka sekaligus, lakukan dengan langkah-langkah di bawah ini:

1. Tahan Alt + F11 kunci untuk membuka Microsoft Visual Basic untuk Aplikasi jendela.

2. Klik Menyisipkan > Modul, dan rekatkan kode berikut ke dalam Jendela Modul.

Kode VBA: Pisahkan teks dan angka dari string teks menjadi dua kolom

Function SplitText(pWorkRng As Range, pIsNumber As Boolean) As String
'Updateby Extendoffice
Dim xLen As Long
Dim xStr As String
xLen = VBA.Len(pWorkRng.Value)
For i = 1 To xLen
    xStr = VBA.Mid(pWorkRng.Value, i, 1)
    If ((VBA.IsNumeric(xStr) And pIsNumber) Or (Not (VBA.IsNumeric(xStr)) And Not (pIsNumber))) Then
        SplitText = SplitText + xStr
    End If
Next
End Function

3. Kemudian, tutup dan keluar dari jendela kode, kembali ke lembar kerja, dan masukkan rumus ini: = SplitText (A2, FALSE) ke dalam sel kosong, lalu seret gagang isian ke sel yang ingin Anda isi rumus ini untuk mendapatkan semua teks, lihat tangkapan layar:

4. Dan kemudian, lanjutkan mengetik rumus ini: = SplitText (A2, TRUE) ke sel lain dan seret gagang isian ke sel yang ingin Anda isi rumus ini untuk mendapatkan nomornya, lihat tangkapan layar:


 Pisahkan teks dan angka dari satu sel menjadi dua kolom dengan fitur yang mudah

Jika Anda memiliki Kutools untuk Excel, nya Pisahkan Sel utilitas dapat membantu Anda untuk membagi sel menjadi beberapa kolom atau baris berdasarkan pemisah apa pun, lebar atau teks dan nomor yang ditentukan.

Setelah menginstal Kutools untuk Excel, lakukan seperti ini:

1. Pilih rentang sel yang ingin Anda pisahkan, lalu klik Kutools > Gabungkan & Pisahkan > Pisahkan Sel, lihat tangkapan layar:

2. di Pisahkan Sel kotak dialog, pilih Pisahkan ke Kolom pilihan di bawah Tipe bagian, lalu periksa Teks dan angka dari Pisahkan dengan bagian, lihat tangkapan layar:

3. Lalu klik Ok tombol, dan lainnya Pisahkan Sel kotak dialog akan muncul, pilih sel untuk menampilkan teks dan angka yang dipisahkan, lalu klik tombol OK tombol. Sekarang, Anda dapat melihat teks dan angka di sel yang dipilih dibagi menjadi dua kolom sekaligus seperti yang ditunjukkan demo di bawah ini:

Unduh dan uji coba gratis Kutools untuk Excel Sekarang!


2.5 Hapus karakter jeda baris dari string teks

Pemutusan baris adalah sesuatu yang memungkinkan Anda memiliki beberapa baris dalam sel yang sama di Excel. Terkadang, saat Anda menyalin data dari situs web atau memisahkan konten seluler Anda dengan Alt + Enter kunci secara manual, Anda akan mendapatkan jeda baris atau pengembalian kereta. Dalam kasus tertentu, Anda mungkin ingin menghapus jeda baris untuk membuat konten sel satu baris seperti gambar di bawah ini. Di sini, saya akan memperkenalkan beberapa cara untuk menyelesaikan tugas ini di Excel.

 Hapus karakter jeda baris dari string teks dengan fitur Temukan dan Ganti

Di Excel, Anda dapat menggunakan file Cari dan Ganti fitur untuk menghapus jeda baris, lakukan seperti ini:

1. Pilih rentang data dari mana Anda ingin menghapus jeda baris.

2. Lalu klik Beranda > Temukan & Pilih > menggantikan (atau tekan Ctrl + H kunci) untuk pergi ke Cari dan Ganti kotak dialog, lihat tangkapan layar:

3. Di muncul keluar Cari dan Ganti kotak dialog, lakukan operasi berikut:

  • Tempatkan kursor di Temukan apa lapangan dan tekan Ctrl + J pada keyboard, Anda mungkin tidak melihat apa pun, tetapi karakter pemisah baris telah dimasukkan.
  • Dalam majalah Ganti dengan bidang, biarkan bidang ini kosong untuk menghapus jeda baris atau tekan tombol ruang bar sekali untuk mengganti jeda baris dengan yang kosong.

4. Lalu klik Ganti Semua tombol, semua jeda baris di sel yang dipilih akan dihapus atau diganti dengan yang kosong sekaligus. Lihat tangkapan layar:


 Hapus karakter jeda baris dari string teks dengan fungsi SUBSTITUTE

Anda juga dapat membuat rumus berdasarkan fungsi SUBSTITUTE dan CHAR untuk menghapus jeda baris dari string teks.

Silakan terapkan rumus di bawah ini untuk mendapatkan hasilnya:

=SUBSTITUTE(A2,CHAR(10),"")

Tips: Fungsi SUBSTITUTE menemukan dan mengganti karakter CHAR(10) yang mewakili karakter pemisah baris tanpa apa-apa. Jika Anda ingin hasilnya dipisahkan dengan koma dan spasi, Anda dapat menggunakan rumus di bawah ini:

=SUBSTITUTE(A2,CHAR(10),", ")


 Hapus karakter jeda baris dari string teks dengan kode VBA

Jika Anda sudah nyaman menggunakan kode VBA, di sini juga menyediakan kode untuk Anda, silakan lakukan dengan langkah-langkah berikut:

1. Tahan Alt + F11 kunci untuk membuka Microsoft Visual Basic untuk Aplikasi jendela.

2. Klik Menyisipkan > Modul, dan rekatkan kode berikut ke dalam Jendela Modul.

Kode VBA: Hapus jeda baris dari string teks

Sub RemoveCarriage()
'Updateby Extendoffice
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each Rng In WorkRng
    Rng.Value = Replace(Rng.Value, Chr(10), "")
Next
End Sub

3. Lalu tekan F5 kunci untuk menjalankan kode ini, dan kotak prompt akan muncul, pilih rentang yang ingin Anda hapus jeda barisnya, lihat tangkapan layar:

4. Dan kemudian, klik OK tombol, semua jeda baris akan dihapus dari rentang data yang dipilih.


 Hapus karakter jeda baris dari string teks dengan opsi cerdas

Di sini, Kutools untuk Excel'S Hapus Karakter fitur ini juga dapat membantu Anda menghapus jeda baris dengan mudah.

Setelah menginstal Kutools untuk Excel, lakukan seperti ini:

1. Pilih rentang sel tempat Anda ingin menghapus jeda baris, lalu klik Kutools > Teks > Hapus Karakter.

2. di Hapus Karakter kotak dialog, setel operasi berikut:

  • Memeriksa Non-pencetakan pilihan di bawah Hapus Karakter bagian.
  • Lalu klik Ok or Mendaftar untuk menghapus semua jeda baris dari rentang data yang dipilih. Lihat tangkapan layar:

Unduh dan uji coba gratis Kutools untuk Excel Sekarang!


2.6 Hapus spasi (awal, akhir, ekstra, atau semua spasi) dari string teks

Mengatasi dan menempelkan teks dari sumber eksternal ke lembar kerja Excel sering kali membawa beberapa spasi putih yang mengganggu, akan membosankan untuk menghapus spasi awal, akhir, atau spasi tambahan lainnya secara manual. Untungnya, Excel menyediakan beberapa trik mudah untuk menangani tugas ini.

 Hapus spasi ekstra (awal, akhir, kelebihan) dari string teks dengan fungsi TRIM

Di Excel, untuk menghapus spasi awal, akhir, dan ekstra dari string teks, fungsi TRIM sederhana dapat membantu Anda. Fungsi ini menghapus semua spasi kecuali spasi tunggal antar kata.

Harap masukkan rumus di bawah ini ke dalam sel kosong:

=TRIM(A2)

Dan kemudian seret gagang isian ke bawah untuk menyalin rumus untuk sel lain, sekarang, Anda dapat melihat semua spasi awal, spasi tambahan, dan spasi ekstra di antara kata-kata dihapus sekaligus dari tangkapan layar:


 Hapus semua spasi dari string teks

Jika Anda ingin menghapus semua spasi putih dari string teks, fungsi SUBSTITUTE berikut dan fitur Temukan & Ganti dapat membantu Anda.

Dengan menggunakan fungsi SUBSTITUTE

Anda dapat menggunakan fungsi SUBSTITUTE untuk mengganti semua spasi tanpa apa-apa, silakan terapkan rumus di bawah ini ke dalam sel kosong:

=SUBSTITUTE(A2," ","")

Kemudian, seret gagang isian ke bawah untuk menyalin rumus ini ke sel lain yang Anda butuhkan, dan semua spasi akan dihapus seperti gambar di bawah ini:


Dengan menggunakan fitur Temukan dan Ganti

Bahkan, Temukan & Ganti Fitur di Excel juga dapat membantu menghilangkan semua spasi dari sel yang dipilih, lakukan dengan langkah-langkah berikut:

1. Pilih rentang data yang semua spasinya ingin Anda hapus.

2. Lalu klik Beranda > Temukan & Pilih > menggantikan (atau tekan Ctrl + H kunci) untuk pergi ke Cari dan Ganti kotak dialog, di buka Cari dan Ganti kotak dialog, lakukan operasi di bawah ini:

  • Tekan Bilah luar angkasa dalam Temukan apa bidang;
  • Dalam majalah Ganti dengan bidang, biarkan bidang ini kosong.

3. Dan kemudian, klik Ganti Semua tombol, semua spasi di sel yang dipilih akan dihapus sekaligus. Lihat tangkapan layar:


 Hapus semua jenis spasi dari string teks dengan fitur canggih

Kutools untuk Excel memiliki fitur yang kuat - Hapus Spaces, dengan utilitas ini, Anda tidak hanya dapat menghapus spasi awal, spasi tambahan, spasi berlebih, tetapi juga semua spasi dari rentang yang dipilih dalam satu kotak dialog, yang akan meningkatkan produktivitas kerja Anda.

Setelah menginstal Kutools untuk Excel, lakukan seperti ini:

1. Pilih rentang data yang akan Anda hapus spasinya, lalu klik Kutools > Teks > Hapus Spaces. Lihat tangkapan layar:

2. di Hapus Spaces kotak dialog, pilih satu jenis spasi yang ingin Anda hapus dari Jenis Spasi:

  • Hapus spasi di depan, pilih Ruang terdepan pilihan;
  • Hapus spasi tambahan, silakan pilih Ruang tertinggal pilihan;
  • Hapus spasi awal dan spasi tambahan sekaligus, silakan pilih Ruang terdepan & tertinggal pilihan;
  • Hapus semua spasi tambahan, silakan pilih Semua ruang berlebih pilihan;
  • Hapus semua spasi, silakan pilih Semua spasi .

3. Lalu klik Ok or Mendaftar tombol, Anda akan mendapatkan hasil yang Anda butuhkan.

Unduh dan uji coba gratis Kutools untuk Excel Sekarang!


Hapus karakter / teks sebelum atau sesudah karakter tertentu

Di bagian ini, saya akan memperkenalkan beberapa operasi untuk menghapus teks atau karakter sebelum atau setelah kemunculan pertama, terakhir, atau ke-n dari karakter tertentu.

3.1 Hapus teks sebelum atau setelah karakter spesifik pertama

Jika Anda ingin menghapus teks sebelum atau sesudah karakter spesifik pertama, seperti spasi, koma dari daftar string teks seperti gambar di bawah ini, di sini saya akan memposting dua metode untuk Anda.

 Hapus teks sebelum karakter spesifik pertama dengan formula

Untuk menghapus teks atau karakter sebelum karakter spesifik pertama, Anda dapat membuat rumus berdasarkan fungsi RIGHT, LEN dan FIND, sintaks generiknya adalah:

=RIGHT(cell, LEN(cell)-FIND("char", cell))
  • sel: Referensi sel atau string teks yang ingin Anda hapus teksnya;
  • tangki: Pemisah tertentu yang ingin Anda hapus teksnya.

Misalnya, untuk menghapus semuanya sebelum koma pertama dari string daftar, Anda harus menerapkan rumus berikut ke dalam sel kosong, lalu seret ke bawah ke sel yang Anda butuhkan, lihat tangkapan layar:

=RIGHT(A2,LEN(A2)-FIND(",",A2))

Note:Dalam rumus di atas: A2 adalah sel yang ingin Anda hapus teksnya; , adalah karakter spesifik yang ingin Anda hapus teksnya, Anda dapat mengubahnya ke karakter lain sesuai kebutuhan.


 Hapus teks setelah karakter spesifik pertama dengan formula

Untuk menghapus semuanya setelah karakter spesifik pertama, Anda dapat menggunakan fungsi LEFT dan FIND untuk mendapatkan hasilnya, sintaks generiknya adalah:

=LEFT(cell,FIND("char",cell)-1)
  • sel: Referensi sel atau string teks yang ingin Anda hapus teksnya;
  • tangki: Pemisah tertentu yang ingin Anda hapus teksnya.

Sekarang, masukkan rumus di bawah ini ke dalam sel kosong, lalu seret gagang isian ke sel lain tempat Anda ingin menerapkan rumus ini, dan semua karakter setelah koma pertama akan dihapus sekaligus, lihat tangkapan layar:

=LEFT(A2,FIND(",",A2)-1)


3.2 Hapus teks sebelum atau setelah kemunculan karakter ke-N

Kadang-kadang, string teks berisi beberapa contoh pembatas tertentu, Anda mungkin ingin menghapus semua karakter sebelum atau setelah contoh tertentu, seperti yang kedua, ketiga atau keempat yang Anda butuhkan. Untuk mengatasi jenis penghapusan ini, Anda dapat menggunakan trik berikut:

 Hapus teks sebelum kemunculan karakter ke-N dengan rumus

Untuk menghapus teks sebelum kemunculan ke-N dari karakter tertentu, rumus berikut dapat membantu Anda, sintaks generiknya adalah:

=RIGHT(cell,LEN(cell)-FIND("#",SUBSTITUTE(cell,"char","#",N)))
  • sel: Referensi sel atau string teks yang ingin Anda hapus teksnya;
  • tangki: Pemisah khusus yang ingin Anda hapus teksnya;
  • N: Kemunculan karakter sebelum menghapus teks.

Misalnya, untuk menghapus semuanya sebelum koma kedua dari string teks, Anda harus menerapkan rumus di bawah ini:

=RIGHT(A2,LEN(A2)-FIND("#",SUBSTITUTE(A2,",","#",2)))

Note:Dalam rumus di atas: A2 adalah sel yang ingin Anda hapus teksnya; , adalah karakter spesifik yang ingin Anda hapus teksnya, Anda dapat mengubahnya ke karakter lain sesuai kebutuhan; 2 menunjukkan koma ke-n sebelum Anda ingin menghapus teks.

Dan kemudian, seret gagang isian untuk menyalin rumus ke sel lain, lihat tangkapan layar:


 Hapus teks setelah kemunculan karakter ke-N dengan rumus

Untuk menghapus teks setelah kemunculan ke-N dari pemisah tertentu, fungsi LEFT, SUBSTITUTE, dan FIND dapat membantu Anda. Sintaks generiknya adalah:

=LEFT(cell, FIND("#", SUBSTITUTE(cell, "char", "#", N)) -1)
  • sel: Referensi sel atau string teks yang ingin Anda hapus teksnya;
  • tangki: Pemisah khusus yang ingin Anda hapus teksnya;
  • N: Kemunculan karakter setelah itu untuk menghapus teks.

Setelah Anda memahami sintaks dasar, silakan salin atau masukkan rumus di bawah ini ke dalam sel kosong:

=LEFT(A2, FIND("#", SUBSTITUTE(A2, ",", "#", 2)) -1)

Note:Dalam rumus di atas: A2 adalah sel yang ingin Anda hapus teksnya; , adalah karakter spesifik yang ingin Anda hapus teksnya, Anda dapat mengubahnya ke karakter lain sesuai kebutuhan; 2 menunjukkan koma ke-n setelah Anda ingin menghapus teks.

Kemudian, seret gagang isian untuk menyalin rumus ke sel lain, dan semua karakter setelah koma kedua akan dihapus sekaligus, lihat tangkapan layar:


 Hapus teks sebelum atau setelah kemunculan karakter ke-N dengan fungsi yang Ditentukan Pengguna

Seperti yang Anda lihat, Anda bisa memecahkan kasus untuk menghapus teks sebelum atau setelah kemunculan karakter ke-N dengan menggunakan fungsi asli Excel dalam kombinasi yang berbeda. Masalahnya adalah Anda perlu mengingat formula rumit ini. Dalam hal ini, saya akan membuat Fungsi Buatan Pengguna untuk mencakup semua skenario, lakukan seperti ini:

1. Tahan Alt + F11 kunci untuk membuka Microsoft Visual Basic untuk Aplikasi jendela.

2. Klik Menyisipkan > Modul, dan rekatkan kode berikut ke dalam Jendela Modul.

Kode VBA: Hapus teks sebelum atau setelah kemunculan karakter ke-N

Function RemoveTextOccurrence(Str As String, Delimiter As String, Occurrence As Integer, IsAfter As Boolean)
Dim xStr As String
Dim xStrLen, xF, xIntStart As Integer
xStr = Str
xStrLen = Len(xStr)
xIntStart = 1
For xF = 1 To Occurrence
xIntStart = InStr(xIntStart + 1, xStr, Delimiter, vbTextCompare)
If (xIntStart = 0) Or (xIntStart < 0) Then
    If IsAfter Then
    RemoveTextOccurrence = xStr
    Else
    RemoveTextOccurrence = ""
    End If
    Exit Function
End If
Next
If IsAfter Then
    RemoveTextOccurrence = Mid(Str, 1, xIntStart - 1)
Else
    RemoveTextOccurrence = Mid(Str, xIntStart + 1)
End If
End Function

3. Kemudian, tutup dan keluar dari jendela kode, kembali ke lembar kerja, gunakan rumus berikut:

Hapus teks sebelum kemunculan koma kedua:

=RemoveTextOccurrence(A2, ", ", 2, FALSE)

Hapus teks setelah kemunculan kedua koma

=RemoveTextOccurrence(A2, ", ", 2, TRUE)


3.3 Hapus teks sebelum atau setelah kemunculan karakter terakhir

Jika Anda perlu menghapus semua teks sebelum atau setelah karakter spesifik terakhir, dan hanya meninggalkan substring setelah atau sebelum karakter spesifik terakhir seperti gambar di bawah ini, bagian ini akan membahas beberapa rumus untuk memecahkan masalah ini.

 Hapus teks sebelum kemunculan terakhir karakter dengan rumus

Untuk menghapus semua karakter sebelum kemunculan karakter terakhir, sintaks generiknya adalah:

=RIGHT(cell,LEN(cell)-SEARCH("#",SUBSTITUTE(cell,"char","#",LEN(cell)-LEN(SUBSTITUTE(cell,"char","")))))
  • sel: Referensi sel atau string teks yang ingin Anda hapus teksnya;
  • tangki: Pemisah khusus yang ingin Anda hapus teksnya;

Sekarang, jika Anda perlu menghapus teks sebelum kemunculan koma terakhir, silakan salin atau masukkan rumus di bawah ini ke dalam sel kosong:

=RIGHT(A2,LEN(A2)-SEARCH("#",SUBSTITUTE(A2,",","#",LEN(A2)-LEN(SUBSTITUTE(A2,",","")))))

Note:Dalam rumus di atas: A2 adalah sel yang ingin Anda hapus teksnya; , adalah karakter spesifik yang ingin Anda hapus teksnya, Anda dapat mengubahnya ke karakter lain sesuai kebutuhan.

Kemudian, seret gagang isian untuk menyalin rumus ke sel lain, dan semua karakter sebelum koma terakhir akan dihapus seperti gambar di bawah ini:


 Hapus teks setelah kemunculan terakhir karakter dengan rumus

Jika nilai sel dipisahkan dengan sejumlah variabel pembatas, sekarang, Anda ingin menghapus semuanya setelah contoh terakhir pembatas itu, sintaks generiknya adalah:

=LEFT(cell,FIND("#",SUBSTITUTE(cell,"char","#",LEN(cell)-LEN(SUBSTITUTE(cell,"char",""))))-1)
  • sel: Referensi sel atau string teks yang ingin Anda hapus teksnya;
  • tangki: Pemisah khusus yang ingin Anda hapus teksnya;

Silakan salin atau masukkan rumus di bawah ini ke dalam sel kosong, lalu seret gagang isian ke bawah untuk mendapatkan hasil lain yang Anda butuhkan, lihat tangkapan layar:

=LEFT(A2,FIND("#",SUBSTITUTE(A2,",","#",LEN(A2)-LEN(SUBSTITUTE(A2,",",""))))-1)

Note:Dalam rumus di atas: A2 adalah sel yang ingin Anda hapus teksnya; , adalah karakter spesifik yang ingin Anda hapus teksnya, Anda dapat mengubahnya ke karakter lain sesuai kebutuhan.


3.4 Hapus teks di antara tanda kurung

Jika Anda memiliki daftar string teks dengan bagian karakter yang diapit tanda kurung, sekarang, Anda mungkin ingin menghapus semua karakter di dalam tanda kurung termasuk tanda kurung itu sendiri seperti gambar di bawah ini. Bagian ini akan berbicara tentang beberapa trik untuk menyelesaikan tugas ini di Excel.

 Hapus teks di antara tanda kurung dengan fitur Temukan dan Ganti

Di Excel, fitur Temukan dan Ganti bawaan dapat membantu Anda menemukan semua teks di dalam tanda kurung, lalu menggantinya dengan apa pun. Silakan lakukan seperti ini:

1. Pilih daftar data yang ingin Anda hapus teksnya di antara tanda kurung.

2. Lalu klik Beranda > Temukan & Pilih > menggantikan (atau tekan Ctrl + H kunci) untuk membuka kotak dialog Temukan dan Ganti, di Cari dan Ganti kotak dialog, lakukan operasi berikut:

  • Dalam majalah Temukan apa lapangan, jenis (*) ke dalam kotak teks;
  • Dalam majalah Ganti dengan bidang, biarkan bidang ini kosong.

3. Lalu klik Ganti Semua tombol, semua karakter dalam tanda kurung (termasuk tanda kurung) di sel yang dipilih akan dihapus sekaligus. Lihat tangkapan layar:

Tips: Para Cari dan Ganti fitur juga berfungsi untuk dua atau lebih pasang tanda kurung di dalam string teks.


 Hapus teks di antara tanda kurung dengan rumus

Selain fitur Temukan dan Ganti, Anda juga dapat menggunakan rumus untuk menyelesaikan tugas ini di Excel, sintaks umum adalah:

=SUBSTITUTE(text,MID(LEFT(text,FIND(")",text)),FIND("(",text),LEN(text)),"")
  • teks: String teks atau referensi sel yang ingin Anda hapus karakternya.

Sekarang, silakan salin atau masukkan rumus berikut ke dalam sel kosong tempat Anda ingin mendapatkan hasilnya:

=SUBSTITUTE(A2,MID(LEFT(A2,FIND(")",A2)),FIND("(",A2),LEN(A2)),"")

Kemudian, seret gagang isian ke sel tempat Anda ingin menerapkan rumus ini, dan semua teks dalam tanda kurung termasuk tanda kurung akan dihapus sekaligus, lihat tangkapan layar:

Tips: Jika tidak ada tanda kurung dalam nilai sel, kesalahan akan ditampilkan setelah menerapkan rumus di atas, untuk mengabaikan kesalahan, gunakan rumus di bawah ini:

=IFERROR(SUBSTITUTE(A2,MID(LEFT(A2,FIND(")",A2)),FIND("(",A2),LEN(A2)),""),A2)


 Hapus teks di antara tanda kurung dengan Fungsi Buatan Pengguna

Rumus di atas berfungsi dengan baik untuk menghapus teks dari satu pasang tanda kurung, jika Anda perlu menghapus teks dari beberapa pasang tanda kurung di dalam string teks, rumus tidak akan berfungsi dengan benar. Di sini, saya akan membuat Fungsi Buatan Pengguna sederhana untuk menyelesaikan tugas ini.

1. Tahan Alt + F11 kunci untuk membuka Microsoft Visual Basic untuk Aplikasi jendela.

2. Klik Menyisipkan > Modul, dan rekatkan kode berikut ke dalam Jendela Modul.

Kode VBA: Hapus teks di antara tanda kurung

Function remtxt(ByVal str As String) As String
'Updateby Extendoffice
  While InStr(str, "(") > 0 And InStr(str, ")") > InStr(str, "(")
    str = Left(str, InStr(str, "(") - 1) & Mid(str, InStr(str, ")") + 1)
  Wend
  remtxt = Trim(str)
End Function

3. Kemudian, kembali ke lembar kerja, dan masukkan rumus ini ke dalam sel kosong: = remtxt (A2), lalu seret gagang isian ke sel tempat Anda ingin menerapkan rumus ini, semua teks di dalam semua tanda kurung termasuk tanda kurung akan dihapus seperti gambar di bawah ini:


Hapus kata-kata dari string teks

Dalam kasus tertentu, Anda mungkin ingin menghapus beberapa kata dari daftar sel, seperti kata pertama atau terakhir, kata duplikat dari sel. Untuk mengatasi jenis penghapusan ini, bagian ini akan memperkenalkan beberapa metode untuk Anda.

4.1 Hapus kata pertama atau terakhir dari string teks

Untuk menghapus kata pertama atau terakhir dari daftar string teks, rumus berikut mungkin bisa membantu Anda.

 Hapus kata pertama dari string teks dengan rumus

Hapus kata-kata pertama dari daftar string teks, Anda dapat membuat rumus sederhana berdasarkan fungsi RIGHT, LEN dan FIND, sintaks generiknya adalah:

=RIGHT(text,LEN(text)-FIND(" ",text))
  • teks: String teks atau referensi sel yang kata pertama ingin Anda hapus.

Sekarang, masukkan atau salin rumus berikut ke dalam sel kosong:

=RIGHT(A2,LEN(A2)-FIND(" ",A2))

Dan kemudian, seret gagang isian ke bawah untuk menerapkan rumus ke sel lain, lihat tangkapan layar:

Tips: Jika Anda perlu menghapus N kata pertama dari sel, gunakan rumus di bawah ini:

=MID(TRIM(text),1+FIND("~",SUBSTITUTE(TRIM(text)," ","~",N)),255)
  • teks: String teks atau referensi sel yang n kata pertama ingin Anda hapus;
  • N: Menunjukkan berapa banyak kata yang ingin Anda hapus dari awal string teks.

Misalnya, untuk menghapus dua kata pertama dari sel, silakan salin atau masukkan rumus di bawah ini ke dalam sel kosong untuk mendapatkan hasil yang Anda butuhkan, lihat tangkapan layar:

=MID(TRIM(A2),1+FIND("~",SUBSTITUTE(TRIM(A2)," ","~",2)),255)


  Hapus kata terakhir dari string teks dengan rumus

Untuk menghapus kata terakhir dari string teks, Anda juga dapat menggunakan rumus untuk menyelesaikan tugas ini, sintaks umum adalah:

=LEFT(TRIM(text),FIND("~",SUBSTITUTE(text," ","~",LEN(TRIM(text))-LEN(SUBSTITUTE(TRIM(text)," ",""))))-1)
  • teks: String teks atau referensi sel yang ingin Anda hapus kata terakhirnya;

Silakan gunakan rumus di bawah ini ke dalam sel kosong, lalu seret gagang isian ke bawah untuk menerapkan rumus ke sel lain, lihat tangkapan layar:

=LEFT(TRIM(A2),FIND("~",SUBSTITUTE(A2," ","~",LEN(TRIM(A2))-LEN(SUBSTITUTE(TRIM(A2)," ",""))))-1)

Tips: Untuk menghapus N kata terakhir dari daftar sel, sintaks generiknya adalah:

=LEFT(text,FIND("~",SUBSTITUTE(text," ","~",LEN(text)-LEN(SUBSTITUTE(text," ",""))-(N-1))))
  • teks: String teks atau referensi sel yang ingin Anda hapus n kata terakhirnya;
  • N: Menunjukkan jumlah kata yang ingin Anda hapus dari akhir string teks.

Misalkan, untuk menghapus 3 kata terakhir dari daftar sel, gunakan rumus di bawah ini untuk mengembalikan hasilnya, lihat tangkapan layar:

=LEFT(A2,FIND("~",SUBSTITUTE(A2," ","~",LEN(A2)-LEN(SUBSTITUTE(A2," ",""))-(3-1))))


4.2 Hapus karakter atau kata duplikat di dalam sel

Saat menghapus nilai atau baris duplikat, Excel menawarkan beberapa opsi berbeda, tetapi, saat menghapus beberapa karakter atau kata duplikat dalam sel tertentu, mungkin tidak ada fitur bawaan yang bagus untuk menyelesaikannya. Dalam hal ini, bagian ini akan membantu membuat beberapa Fungsi Buatan Pengguna untuk menangani teka-teki ini.

 Hapus karakter duplikat dalam sel dengan menggunakan Fungsi Buatan Pengguna

Jika Anda memiliki beberapa kemunculan karakter yang sama dalam sel, untuk menghapus karakter duplikat di dalam sel dan hanya menyimpan kemunculan pertama seperti gambar di bawah ini, Anda dapat menggunakan Fungsi Buatan Pengguna berikut.

1. Tahan Alt + F11 kunci untuk membuka Microsoft Visual Basic untuk Aplikasi jendela.

2. Klik Menyisipkan > Modul, dan rekatkan kode berikut ke dalam Jendela Modul.

Kode VBA: Hapus karakter duplikat di dalam sel

Function RemoveDupeschars(pWorkRng As Range) As String
'Updateby Extendoffice
Dim xValue As String
Dim xChar As String
Dim xOutValue As String
Set xDic = CreateObject("Scripting.Dictionary")
xValue = pWorkRng.Value
For i = 1 To VBA.Len(xValue)
    xChar = VBA.Mid(xValue, i, 1)
    If xDic.Exists(xChar) Then
    Else
        xDic(xChar) = ""
        xOutValue = xOutValue & xChar
    End If
Next
RemoveDupeschars = xOutValue
End Function

3. Kemudian tutup jendela kode, kembali ke lembar kerja, dan masukkan rumus ini =HapusDupeschars(A2) ke dalam sel kosong selain data Anda, lalu seret gagang isian ke sel yang ingin Anda terapkan rumus ini, lihat tangkapan layar:

NoteA2 adalah sel data tempat Anda ingin menghapus karakter duplikat.

jenis: Fungsi peka huruf besar/kecil, jadi perlakukan huruf kecil dan huruf besar sebagai karakter yang berbeda.


 Hapus kata-kata duplikat di dalam sel dengan menggunakan Fungsi Buatan Pengguna

Dengan asumsi, Anda memiliki kata atau string teks yang sama di dalam sel dan ingin menghapus semua kata yang sama dari sel seperti gambar di bawah ini. Anda dapat menggunakan Fungsi Buatan Pengguna berikut untuk menyelesaikan tugas ini di Excel.

1. Tahan Alt + F11 kunci untuk membuka Microsoft Visual Basic untuk Aplikasi jendela.

2. Klik Menyisipkan > Modul, dan rekatkan kode berikut ke dalam Jendela Modul.

Kode VBA: Hapus kata-kata duplikat di dalam sel

Function RemoveDupeswords(txt As String, Optional delim As String = " ") As String
'Updateby Extendoffice
    Dim x
    With CreateObject("Scripting.Dictionary")
        .CompareMode = vbTextCompare
        For Each x In Split(txt, delim)
            If Trim(x) <> "" And Not .exists(Trim(x)) Then .Add Trim(x), Nothing
        Next
        If .Count > 0 Then RemoveDupeswords = Join(.keys, delim)
    End With
End Function

3. Kemudian tutup jendela kode, kembali ke lembar kerja, dan masukkan rumus ini =HapusDupeswords(A2,", ") ke dalam sel kosong selain data Anda, lalu seret gagang isian ke sel yang ingin Anda terapkan rumus ini, lihat tangkapan layar:

Note: A2 adalah sel yang ingin Anda hapus kata duplikatnya, serta koma dan spasi (, ) adalah pembatas untuk memisahkan string teks, Anda dapat mengubahnya ke pembatas lain sesuai kebutuhan Anda.

jenis: Fungsi ini tidak peka huruf besar/kecil, huruf kecil dan huruf besar diperlakukan sebagai karakter yang sama.


4.3 Pangkas string teks menjadi N kata

Jika Anda memiliki string teks panjang dalam sel, terkadang, Anda mungkin ingin memangkas string teks menjadi sejumlah kata tertentu, yang berarti hanya menyimpan n kata pertama dan memotong kata lainnya. Bagian ini akan berbicara tentang beberapa trik untuk membantu Anda mencapai pekerjaan ini di Excel.

 Pangkas string teks menjadi N kata dengan rumus

Untuk memangkas string teks menjadi N kata, Anda dapat membuat rumus berdasarkan fungsi LEFT, FIND dan SUBSTITUTE, sintaks generiknya adalah:

=LEFT(text,FIND("~",SUBSTITUTE(text," ","~",N))-1)
  • teks: String teks atau referensi sel yang ingin Anda potong;
  • N: Jumlah kata yang ingin Anda simpan dari sisi kiri string teks yang diberikan.

Untuk menangani pekerjaan ini, silakan salin atau masukkan rumus di bawah ini ke dalam sel kosong:

=LEFT(A2,FIND("~",SUBSTITUTE(A2," ","~",B2))-1)

Dan kemudian, seret gagang isian ke bawah untuk menerapkan rumus ini ke sel lain, lihat tangkapan layar:


 Pangkas string teks menjadi N kata dengan Fungsi Buatan Pengguna

Kecuali rumus di atas, Anda juga dapat membuat Fungsi Buatan Pengguna untuk menyelesaikan tugas ini, lakukan seperti ini:

1. Tahan Alt + F11 kunci untuk membuka Microsoft Visual Basic untuk Aplikasi jendela.

2. Klik Menyisipkan > Modul, dan rekatkan kode berikut ke dalam Jendela Modul.

Kode VBA: Pangkas string teks menjadi N kata

Function GetNWords(StrWords As String, Num_of_Words As Integer) As String
'Updateby Extendoffice
Dim xArr
Dim xRes As String
Dim xF As Integer
xStr = StrWords
If (Num_of_Words < 1) Then
    GetNWords = ""
    Exit Function
End If
xArr = Split(xStr, " ")
xRes = ""
On Error Resume Next
For xF = 0 To UBound(xArr)
    If Trim(xArr(xF)) <> "" Then
    Num_of_Words = Num_of_Words - 1
        If xRes = "" Then
            xRes = Trim(xArr(xF))
        Else
            xRes = xRes & " " & Trim(xArr(xF))
        End If
    End If
    If Num_of_Words = 0 Then Exit For
Next
If Num_of_Words = 0 Then
    GetNWords = xRes & "..."
Else
    GetNWords = xRes & "..."
End If
End Function

3. Kemudian tutup dan keluar dari jendela kode, kembali ke lembar kerja, dan masukkan rumus ini: =DapatkanNWords(A2,B2) ke dalam sel kosong, lalu seret gagang isian ke bawah untuk menerapkan rumus ini ke sel lain, hanya jumlah kata tertentu pertama yang disimpan seperti gambar di bawah ini:


  • Bilah Formula Super (dengan mudah mengedit beberapa baris teks dan rumus); Membaca Tata Letak (membaca dan mengedit sel dalam jumlah besar dengan mudah); Tempel ke Rentang yang Difilter...
  • Gabungkan Sel / Baris / Kolom dan Menyimpan Data; Pisahkan Konten Sel; Gabungkan Baris Duplikat dan Jumlah / Rata-rata... Mencegah Sel Duplikat; Bandingkan Rentang...
  • Pilih Duplikat atau Unik Baris; Pilih Baris Kosong (semua sel kosong); Temukan Super dan Temukan Fuzzy di Banyak Buku Kerja; Pilih Acak ...
  • Salinan Tepat Beberapa Sel tanpa mengubah referensi rumus; Buat Referensi Otomatis ke Beberapa Lembar; Sisipkan Poin, Kotak Centang, dan lainnya ...
  • Favorit dan Sisipkan Rumus dengan Cepat, Rentang, Grafik dan Gambar; Enkripsi Sel dengan kata sandi; Buat Milis dan mengirim email ...
  • Ekstrak Teks, Tambahkan Teks, Hapus berdasarkan Posisi, Hapus Space; Membuat dan Mencetak Subtotal Paging; Konversi Konten Antar Sel dan Komentar...
  • Filter Super (simpan dan terapkan skema filter ke sheet lain); Penyortiran Lanjutan menurut bulan / minggu / hari, frekuensi dan lainnya; Filter Khusus dengan huruf tebal, miring ...
  • Gabungkan Workbooks dan WorkSheets; Gabungkan Tabel berdasarkan kolom kunci; Pisahkan Data menjadi Beberapa Lembar; Konversi Batch xls, xlsx dan PDF...
  • Pengelompokan Tabel Pivot menurut nomor minggu, hari dalam seminggu dan banyak lagi ... Tampilkan Sel yang Tidak Terkunci dan Terkunci dengan warna berbeda; Sorot Sel Yang Memiliki Rumus / Nama...
tab kte 201905
  • Aktifkan pengeditan dan pembacaan tab di Word, Excel, PowerPoint, Publisher, Access, Visio, dan Project.
  • Buka dan buat banyak dokumen di tab baru di jendela yang sama, bukan di jendela baru.
  • Meningkatkan produktivitas Anda sebesar 50%, dan mengurangi ratusan klik mouse untuk Anda setiap hari!
officetab bawah
Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations