VBA untuk Setiap Sel dalam Julat dalam Excel (3 Kaedah)

  • Berkongsi Ini
Hugh West

Dalam Pangkalan Data besar, anda menghabiskan sebahagian besar masa anda berurusan dengan julat dan sel. Kadangkala anda perlu mengulangi tindakan yang sama dalam julat yang besar atau sejumlah besar sel. Ini pada masa yang sama membunuh masa anda dan mengurangkan kecekapan anda. Penyelesaian pintar untuk masalah ini ialah membina Kod Pengaturcaraan VBA yang akan dijalankan melalui setiap sel dalam julat dan melakukan tindakan yang sama yang diarahkan oleh anda. Hari ini dalam artikel ini, kita akan membincangkan cara melakukan VBA untuk Setiap Sel dalam Julat dalam Excel.

Muat Turun Buku Kerja Amalan

Muat turun buku latihan ini untuk melaksanakan tugas semasa anda membaca artikel ini.

Kod VBA untuk Setiap Sel dalam Julat dalam Excel.xlsx

3 Cara Yang Sesuai untuk Menggunakan VBA untuk Setiap Sel dalam Julat dalam Excel

Menggunakan kod VBA anda boleh melakukan formula yang sama untuk setiap sel dalam julat atau lajur atau baris. Dalam bahagian ini, kita akan melalui semua bahagian.

1. Gunakan VBA untuk Setiap Sel dalam Julat

Pertimbangkan situasi di mana anda perlu menggunakan kod VBA yang sama untuk setiap sel dalam julat yang diberikan ( B3:F12 ). Untuk melakukan ini, kami akan membina kod VBA. Arahan diberikan di bawah

Langkah 1:

  • Pertama, kami akan memasukkan butang arahan untuk memudahkan kerja kami . Pergi ke Tab Pembangun anda, pilih Sisipkan dan klik pada butang arahan untuk mendapatkannya.

  • Kami telah mendapat arahan kamibutang.

  • Klik kanan pada butang arahan untuk membuka pilihan. Pilih dan klik pada Properties untuk mengubah suai beberapa pilihan.

  • Tukar Kapsyen butang arahan. Di sini kami menukar nama kepada, " Klik Di Sini ".

Langkah 2:

  • Sekarang klik dua kali pada butang arahan untuk membuka VBA Modul . Di sini kami akan menulis kod VBA kami untuk tugas itu.

  • Pertama, kami akan mengisytiharkan dua pembolehubah. Kami memanggil objek julat CL dan Rng . Anda boleh menamakannya sesuka hati.
3183

  • Tetapkan julat khusus dengan arahan ini,

Tetapkan Rng = Worksheets(“VBA1”).Julat(“B3:F12”)

  • Di sini VBA1 ialah nama lembaran kerja kami dan B3:F12 ialah julat kami yang ditentukan.

  • Sekarang kita akan menggunakan kod untuk melaksanakan melalui setiap sel dalam julat. Kodnya ialah,
7268
  • Nilai = 100 merujuk bahawa ia akan mengembalikan 100 untuk setiap sel dalam julat yang diberikan.

  • Jadi kod terakhir kami menjadi,
5591
  • Pergi ke lembaran kerja utama anda dan klik pada butang arahan untuk menjalankan VBA untuk setiap sel dalam julat.

Langkah 3:

  • Seperti nilai angka, kita juga boleh letakkan nilai teks untuk setiap sel dalam julat. Dalam kes itu, pergi ke tetingkap VBA, dan bukannya 100, masukkan nilai teks yang anda mahu jalankan. Yang berubahbaris ialah
4223

  • Klik pada butang arahan dan kod VBA akan mengembalikan nilai teks ini untuk setiap sel dalam julat.

Langkah 4:

  • Dalam langkah ini, kita akan menggali lebih mendalam. Katakan kami mahu menyerlahkan setiap sel kosong dalam julat kami.

  • Untuk itu, tambahkan syarat baharu pada kod sedia ada anda. Formula baharu ialah,
5547
  • Kod baharu ini akan menyerlahkan sel kosong dengan warna merah. Jadi kod penuhnya ialah,
2809

  • Dapatkan hasilnya dengan mengklik butang arahan.

Bacaan Serupa:

  • Cara Menggunakan Objek Julat VBA dalam Excel (5 Properties)
  • Gunakan Offset Julat VBA (11 Cara)
  • Cara Mengira Teks dalam Excel (7 Helah Mudah)

2. Masukkan VBA Kod Untuk Setiap Sel dalam Lajur Julat

Kami juga boleh menjalankan kod VBA untuk setiap sel dalam lajur. Katakan kita mempunyai lajur yang mengandungi nombor dan kita perlu mewarnakan nilai yang lebih rendah daripada 10. Kami akan membina kod VBA untuk menjalankan setiap sel dalam lajur.

Langkah 1:

  • Buat butang arahan mengikut arahan yang telah kita bincangkan.

Langkah 2:

  • Klik dua kali pada butang arahan untuk membuka tetingkap VBA.
  • Kami akan mengisytiharkan pembolehubah yang dipanggil " c " jenis panjang. Kami menggunakan pembolehubah jenis Long di sini kerana Longpembolehubah mempunyai kapasiti yang lebih besar daripada pembolehubah Integer.
2385

  • Seterusnya, tambahkan baris kod yang menukar warna fon semua sel dalam lajur kami kepada hitam.
5666

  • Masukkan gelung untuk kod ini.
1367

  • Dalam langkah ini, kami akan memasukkan syarat untuk mewarnakan nilai yang lebih rendah daripada nilai sel C4 (10). Masukkan kod ini untuk melakukannya.
2770

  • Jadi kod terakhir ialah,
1675
  • VBA akan berjalan dan menunjukkan hasil apabila anda mengklik pada butang arahan.

3. Tulis Kod VBA Untuk Setiap Sel dalam Deretan Julat

Kami juga boleh menjalankan kod VBA untuk setiap sel berturut-turut. Dalam baris yang diberikan, kita perlu melakukan tindakan yang sama pada setiap sel baris.

Langkah 1:

  • Tambah butang arahan dan tukar namanya kepada “ Klik Di Sini!

  • Klik dua kali pada butang untuk buka tetingkap VBA. Tulis kod VBA yang disediakan di bawah.
5659
  • Kod akan dijalankan melalui setiap sel baris dan menggunakan isian warna kuning pada setiap sel.

  • Klik pada butang dan keputusan kami ada di sini.

Nota Pantas

👉 Jika anda tidak mempunyai tab pembangun anda kelihatan, anda boleh mengaktifkannya menggunakan arahan ini.

Bar Alat Akses Pantas Tersuai → Lagi Perintah → Sesuaikan Reben → Pembangun  → OK

Kesimpulan

Kami telah melalui tiga pendekatan berbeza untuk menjalankan VBA bagi setiap sel dalam julat. Anda amat dialu-alukan untuk mengulas jika anda mempunyai sebarang pertanyaan atau pertanyaan. Anda juga boleh menyemak artikel kami yang lain yang berkaitan dengan tugas Excel!

Hugh West ialah jurulatih dan penganalisis Excel yang sangat berpengalaman dengan lebih 10 tahun pengalaman dalam industri. Beliau memiliki Ijazah Sarjana Muda Perakaunan dan Kewangan serta Ijazah Sarjana dalam Pentadbiran Perniagaan. Hugh mempunyai minat untuk mengajar dan telah membangunkan pendekatan pengajaran yang unik yang mudah diikuti dan difahami. Pengetahuan pakar Excel beliau telah membantu beribu-ribu pelajar dan profesional di seluruh dunia meningkatkan kemahiran mereka dan cemerlang dalam kerjaya mereka. Melalui blognya, Hugh berkongsi pengetahuannya dengan dunia, menawarkan tutorial Excel percuma dan latihan dalam talian untuk membantu individu dan perniagaan mencapai potensi penuh mereka.