VBA Temukan dan Ganti

Temukan & Ganti Fungsi di VBA

Jika pekerjaan excel Anda melibatkan tugas rutin menemukan sesuatu dan menggantinya dengan sesuatu, maka Anda memerlukan artikel ini dengan biaya berapa pun. Karena setelah membaca artikel ini Anda mungkin akan menghemat 80% waktu Anda dengan mempelajari teknik pengkodean VBA ini. Temukan dan Ganti di excel adalah alat yang sering digunakan dan kami dapat menerapkan hal yang sama dengan VBA juga. Dalam artikel kami sebelumnya "Temukan VBA", kami telah menunjukkan kepada Anda bagaimana menggunakan metode FIND di VBA. Dalam artikel ini, kami akan menunjukkan cara menggunakan metode "Temukan & Ganti" VBA.

Ikuti artikel untuk mempelajari teknik ini.

VBA Temukan dan Ganti Sintaks

Untuk menggunakan metode Temukan dan Ganti di VBA, kita harus mengikuti langkah-langkah yang diberikan di bawah ini. Pertama, kami telah memilih rentang sel, jadi sebutkan rentang sel dengan menggunakan objek RANGE di VBA.

Sekarang beri titik (.) Untuk melihat daftar IntelliSense.

Pilih metode Ganti dari daftar.

Kita dapat melihat daftar parameter besar dari metode Replace. Sekarang kita akan melihat penjelasan setiap parameter di bawah ini.

  • Apa: Ini tidak lain adalah apa yang perlu kita temukan untuk menggantikan nilainya.
  • Penggantian: Dengan nilai yang ditemukan, nilai baru yang seharusnya diganti.
  • Look At: Ini untuk menyebutkan apakah kita ingin melihat keseluruhan konten atau hanya sebagian dari konten. Kami dapat menyediakan dua parameter di sini "xlWhole" & "xlPart".
  • Urutan Pencarian: Ini untuk menyebutkan urutan pencarian baik baris atau kolom. Kami dapat menyediakan dua parameter di sini "xlByRows" & "xlByColumns".
  • Cocokkan Kasus: Konten yang kami cari peka huruf besar / kecil atau tidak. Jika argumen case sensitive adalah BENAR atau SALAH.
  • Format Pencarian: Kita juga dapat mencari konten dengan format nilai yang kita cari.
  • Replace Format: Kita bisa mengganti satu format dengan format lain juga.

Contoh Temukan dan Ganti VBA di Excel

Di bawah ini adalah beberapa contoh metode Find and Replace Excel VBA.

Anda dapat mengunduh Template Temukan dan Ganti Excel VBA ini di sini - Temukan dan Ganti Template Excel VBA

Contoh # 1 - VBA Temukan dan Ganti Word

Oke, mari kita lihat contoh berikut untuk memahami Metode Temukan dan Ganti VBA. Simak datanya berikut ini.

Langkah 1: Pertama-tama, sebutkan Range sel yang akan kita ganti. Dalam contoh ini Range adalah dari A1 hingga B15, jadi kodenya adalah Range ("A1: B15").

Kode:

 Sub Replace_Example1 () Range ("A1: B15") End Sub

Langkah 2: Sekarang beri titik untuk melihat daftar IntelliSense.

Langkah 3: Pilih metode Ganti dari daftar IntelliSense.

Langkah 4: Sebutkan parameter apa sebagai “September”.

Kode:

Rentang ("A1: B15"). Ganti Apa: = "September"

Langkah 5: Selanjutnya Ganti dengan parameter harus menjadi nilai baru kita yang kita ganti dengan yaitu "Desember".

Kode:

Rentang ("A1: D4"). Ganti Apa: = "September", Penggantian: = "Desember"

Ok, mulai sekarang abaikan semua parameter lainnya. Sekarang jalankan kode VBA untuk melihat metode penggantian dengan VBA.

Jadi, itu telah menggantikan semua bulan September dengan kata "Desember".

Contoh # 2 - Penggantian Kasus Sensitif

Contoh yang lebih canggih dari metode Temukan & Ganti VBA akan menggunakan metode penggantian yang peka huruf besar / kecil. Untuk contoh ini, saya telah membuat data sampel ini seperti yang ditunjukkan pada gambar di bawah ini.

Kami memiliki dua data sel dengan huruf kapital "HELLO". Di mana pun kita memiliki huruf besar "HALO", itu harus diganti dengan kata baru "Hiii".

Seperti biasa, tulis kodenya, sebutkan apa yang harus dicari dan apa yang harus diganti terlebih dahulu.

Kode:

 Sub Replace_Example2 () Range ("A1: D4"). Replace What: = "HELLO", Penggantian: = "Hiii" End Sub

Sekarang untuk argumen selanjutnya “Match Case” tulis kondisinya sebagai BENAR.

Kode:

Range ("A1: D4"). Replace What: = "HELLO", Replacement: = "Hiii", MatchCase: = True

Sekarang jalankan kode itu hanya akan mengganti huruf besar "HELLO" menjadi "Hiii".

Bayangkan Anda belum menerapkan argumen Match Case di VBA maka itu akan mengganti semua "Hello" menjadi "Hiii".

Catatan: Saya telah menghapus argumen Match Case di sini, secara default nilai argumen MATCH CASE adalah FALSE.

Seperti yang bisa kita lihat pada gambar di atas, ini telah mengganti semua kata "halo" menjadi "hiii".

Jadi, setiap kali kita ingin menggunakan kriteria KASUS MATCH, kita harus menerapkan argumen sebagai "TRUE" dan secara default, nilai argumen ini adalah "FALSE". Seperti ini, kita dapat menggunakan metode “FIND & REPLACE” untuk menemukan sesuatu dan mengganti nilai yang ditemukan dengan yang lain.