VBA TRIM

Fungsi Excel VBA TRIM

VBA TRIM dikategorikan di bawah fungsi string dan teks, fungsi ini adalah fungsi lembar kerja di VBA dan mirip dengan referensi lembar kerja, fungsi ini digunakan untuk memangkas atau menghapus spasi yang tidak diinginkan dari sebuah string, dibutuhkan satu argumen yang merupakan string input dan mengembalikan keluaran sebagai string.

Ada beberapa situasi di mana kami mengunduh data dari server online dan kami menghadapi situasi data yang tidak terorganisir dan ruang yang tidak diinginkan di dalam sel. Berurusan dengan ruang yang tidak perlu sangat menyakitkan untuk dikerjakan. Dalam fungsi lembar kerja biasa, kami memiliki fungsi yang disebut TRIM di excel untuk menghilangkan "Spasi Terkemuka, Spasi Jejak, dan ruang di antara" . Di VBA juga kita memiliki fungsi yang disebut TRIM yang bekerja persis sama dengan fungsi excel tetapi hanya ada satu perbedaan kecil di sana, kita akan melihatnya di artikel ini nanti.

Apa Fungsi Trim?

TRIM adalah fungsi string yang menghilangkan spasi di excel dari sel yang dipilih. Dalam ruang, kami memiliki 3 jenis “Ruang Utama, Ruang Jejak, dan Ruang Antara” .

Leading Space tidak lain adalah sebelum nilai apa pun dimulai di dalam sel jika ada spasi maka itu disebut Leading Space.

Trailing Space tidak lain adalah setelah nilai akhir dalam sel jika ada spasi maka itu disebut sebagai Trailing Space.

In-Between Space tidak berarti apa-apa setelah akhir setiap kata idealnya kita harus memiliki satu karakter spasi, apapun yang lebih dari satu karakter spasi disebut In-Between Space.

Untuk mengatasi semua jenis masalah ini, kami memiliki fungsi yang disebut TRIM.

Sintaksis

String: Apa string atau nilai yang ingin Anda pangkas? Ini bisa menjadi referensi sel serta pasokan nilai langsung ke rumus.

Contoh

Anda dapat mendownload Template Fungsi VBA TRIM ini di sini - Template Fungsi VBA TRIM

Contoh 1

Sekarang kita akan melihat bagaimana menghapus spasi terdepan di excel menggunakan fungsi TRIM. Ikuti langkah-langkah di bawah ini

Langkah 1: Buat nama makro dan nyatakan variabel sebagai String.

Kode:

 Sub Trim_Example1 () Dim k Sebagai String End Sub

Langkah 2: Sekarang untuk variabel yang dideklarasikan ini tetapkan nilai dengan menggunakan TRIM.

Kode:

 Sub Trim_Example1 () Dim k Sebagai String k = Trim (End Sub

Langkah 3: Untuk string ini ketikkan kata dalam tanda kutip ganda sebagai "Selamat datang di VBA".

Kode:

 Sub Trim_Example1 () Dim k Sebagai String k = Trim ("Selamat datang di VBA") End Sub

Langkah 4: Sekarang tunjukkan hasil dari variabel ini di kotak pesan.

Kode:

 Sub Trim_Example1 () Dim k Sebagai String k = Trim ("Selamat datang di VBA") MsgBox k End Sub

Langkah 5: Jalankan kode ini menggunakan tombol F5 atau jalankan secara manual, kita harus mendapatkan string yang benar di kotak pesan.

Keluaran:

Jadi, fungsi TRIM menghapus semua spasi utama yang telah kita masukkan ke nilai string. Sekarang hasilnya adalah kalimat yang benar yaitu “Selamat datang di VBA” .

Contoh # 2

Sekarang lihat satu contoh lagi untuk menghapus spasi tambahan. Ambil kata yang sama tapi kali ini masukkan spasi.

“Selamat datang di VBA“.

Kode:

 Sub Trim_Example2 () Dim k Sebagai String k = Trim ("Selamat datang di VBA") MsgBox k End Sub

Jalankan kode ini secara manual atau melalui tombol F5. Fungsi Trim juga menghapus spasi tambahan.

Keluaran:

Contoh # 3 - Bersihkan Data di Sel

Sekarang kita akan melihat contoh praktis dari pembersihan data di sel excel. Asumsikan Anda memiliki kumpulan data seperti di bawah ini di lembar excel Anda.

Ketika kita memiliki lebih dari satu data sel, kita perlu menulis kode yang berbeda. Ikuti langkah-langkah di bawah ini untuk menulis kode.

Langkah 1: Deklarasikan variabel sebagai "Range".

Kode:

 Sub Trim_Example3 () Redupkan MyRange Sebagai Range End Sub

Langkah 2: Karena tipe data range adalah objek kita perlu mengatur range terlebih dahulu. Jadi atur rentang sebagai "pilihan".

Kode:

 Sub Trim_Example3 () Redupkan MyRange Sebagai Rentang Set MyRange = Seleksi Akhir Sub

Catatan: MyRange = Pilihan berarti apa pun sel yang saya pilih menjadi rentang. Jadi dalam kisaran itu, TRIM menghapus ruang yang tidak diinginkan.

Langkah 3: Sekarang gunakan For Each VBA Loop, terapkan fungsi TRIM.

Kode:

 Sub Trim_Example3 () Redupkan MyRange As Range Set MyRange = Pilihan Untuk Setiap sel Dalam sel MyRange. Nilai = Potong (sel) Berikutnya Akhir Sub

Step 4: Now go back to the worksheet. Go to insert and draw a rectangular shape.

Step 5: Add a word to the inserted rectangular shape as click here to clean the data.

Step 6: Right-click on the rectangular shape and select the assign macro.

Step 7: Now the macro names box will open. Select the name of the macro we just created. Click on Ok.

 

Step 8: Now select the range where we need to clean the data.

Step 9: After selecting the range click on the assigned macro rectangular box. It will clean the data.

So we got cleaned value i.e. after removing leading & trailing spaces.

Difference Between Excel & VBA Trim Function

The only difference between them is VBA function cannot remove in between spaces while the worksheet function in VBA does. For example, take a look at the below example.

In cell A3 we have in-between spaces, if select and click on the rectangular shape it will only remove trailing & leading spaces, not in-between spaces.

To overcome this problem we need to use the trim function as a worksheet function in the code.

Code:

 Sub Trim_Example3() Dim MyRange As Range Set MyRange = Selection For Each cell In MyRange cell.Value = WorksheetFunction.Trim(cell) Next End Sub

Here we have used worksheet function not a vba function. This will remove all kinds of spaces.

Things to Remember

  • VBA Trim & Worksheet Trim syntax is exactly the same.
  • It can only remove leading & trailing spaces, not in-between spaces.
  • Excel trim function can remove all kinds of spaces.