Dapatkan Nilai Sel dengan Excel VBA
Sel adalah sel individu dan juga merupakan bahagian dari rentang, secara teknis ada dua kaedah untuk berinteraksi dengan sel di VBA dan mereka adalah kaedah jarak dan kaedah sel, kaedah julat digunakan seperti julat ("A2") Nilai yang akan memberi kita nilai sel A2 atau kita boleh menggunakan kaedah sel sebagai sel (2,1). Nilai yang juga akan memberi kita nilai sel A2.
Baik berfungsi atau VBA berfungsi, kita semua perlu bekerja dengan sel atau sel kerana semua data akan disimpan dalam sel sehingga semuanya bermuara pada seberapa baik kita mengetahui tentang sel di VBA. Oleh itu, jika sel adalah bahagian yang sangat penting dari VBA, maka penting untuk memahaminya dengan baik dan jika anda adalah pemula berkenaan sel VBA, maka artikel ini akan membimbing anda mengenai cara mendapatkan Nilai Sel di Excel VBA secara terperinci.
Perkara pertama yang pertama kita dapat merujuk atau bekerja dengan sel dalam VBA dengan dua cara iaitu dengan menggunakan harta CELLS dan objek RANGE. Mengapa CELLS adalah harta dan mengapa RANGE adalah objek adalah analogi yang berbeza dan kemudian dalam artikel, kita akan sampai ke tahap itu.
Contoh Dapatkan Nilai Sel di Excel VBA
Berikut adalah contoh Dapatkan Nilai Sel di Excel VBA.
Anda boleh memuat turun Templat Excel Nilai Sel VBA ini di sini - Templat Excel Nilai Sel VBA DapatkanContoh # 1 - Menggunakan RANGE atau CELLS Property
Sebagai contoh, di sel A1 kita mempunyai nilai "India".
Untuk merujuk sel ini, kita dapat menggunakan harta CELLS atau objek RANGE, mari kita lihat keduanya secara terperinci.
Menggunakan Range Property
Pertama, mulakan prosedur makro.
Kod:
Sub Get_Cell_Value () Tamat Sub
Sekarang buka objek RANGE.
Kod:
Sub Get_Cell_Value () Julat (Sub Akhir
Argumen pertama objek ini adalah "Cell1" iaitu sel yang kita rujuk. Dalam kes ini, itu adalah sel A1, jadi kita perlu memberikan alamat sel dalam tanda kutip dua kali untuk objek RANGE.
Kod:
Sub Get_Cell_Value () Julat ("A1") Sub Akhir
Oleh kerana hanya satu sel yang merujuk kepada parameter lain yang tidak relevan, jadi tutup tanda kurung dan masukkan titik untuk melihat senarai intellisense.
Seperti yang anda lihat di atas saat kita meletakkan titik, kita dapat melihat semua senarai intellisense yang ada sifat dan kaedah objek jarak jauh.
Oleh kerana kita memilih sel, kita perlu memilih kaedah "PILIH" dari senarai intellisense.
Kod:
Sub Get_Cell_Value () Julat ("A1"). Pilih End Sub
Sekarang pilih sel selain A1 dan jalankan kodnya.
Tidak kira sel mana yang telah anda pilih semasa anda menjalankan kod ia telah memilih sel yang disebut iaitu sel A1.
Menggunakan Harta Sel
Begitu juga, kami menggunakan harta CELLS sekarang.
Kod:
Sub Get_Cell_Value () Julat ("A1"). Pilih Sel (End Sub
Ini tidak seperti objek RANGE di mana kita boleh memberikan alamat sel secara langsung tetapi menggunakan harta CELLS ini kita tidak boleh melakukan seperti itu.
Argumen pertama harta tanah ini adalah "Row Index" iaitu baris mana yang kita maksudkan. Oleh kerana kita memilih sel A1 kita merujuk pada baris pertama, jadi sebutkan 1.
Argumen seterusnya adalah "Indeks Lajur" iaitu lajur mana yang kita rujuk. Lajur sel A1 adalah lajur pertama, jadi masukkan 1.
Kod kami berbunyi CELLS (1, 1) iaitu baris pertama lajur pertama = A1.
Sekarang letakkan titik dan lihat sama ada anda dapat melihat senarai intellisense atau tidak.
Dengan sifat CELLS kita tidak dapat melihat senarai IntelliSense apa pun, jadi kita harus benar-benar yakin dengan apa yang kita tulis. Masukkan "Pilih" sebagai kaedah.
Kod:
Sub Get_Cell_Value () Julat ("A1"). Pilih Sel (1, 1). Pilih Sub Akhir
Ini juga akan memilih sel A1.
Contoh # 2 - Dapatkan Nilai dari Sel dalam Excel VBA
Memilih adalah perkara pertama yang telah kita pelajari, sekarang kita akan melihat bagaimana mendapatkan nilai dari sel. Sebelum kita memilih sel, kita perlu menentukan pemboleh ubah untuk menyimpan nilai dari sel.
Kod:
Sub Get_Cell_Value1 () Dim CellValue Sebagai String End Sub
Sekarang sebutkan alamat sel dengan menggunakan objek RANGE atau CELLS. Oleh kerana anda pemula gunakan objek RANGE hanya kerana dengan objek RANGE kita dapat melihat senarai intellisense.
Untuk pemboleh ubah yang ditentukan letakkan tanda yang sama dan sebutkan alamat sel.
Kod:
Sub Get_Cell_Value1 () Dim CellValue Sebagai String CellValue = Julat ("A1") Sub Akhir
Sekali lagi meletakkan titik untuk melihat senarai intellisense.
Dari senarai intellisense vba pilih harta "Nilai" untuk mendapatkan nilai dari sel yang disebutkan.
Kod:
Sub Get_Cell_Value1 () Dim CellValue Sebagai String CellValue = Range ("A1"). Nilai End Sub
Sekarang pemboleh ubah "CellValue" memegang nilai dari sel A1. Tunjukkan nilai pemboleh ubah ini di kotak mesej di VBA.
Kod:
Sub Get_Cell_Value1 () Dim CellValue Sebagai String CellValue = Range ("A1"). Nilai MsgBox CellValue End Sub
Ok, jalankan kod dan lihat hasilnya di kotak mesej.
Oleh kerana terdapat nilai "INDIA" di sel A1 perkara yang sama muncul di kotak mesej juga. Seperti ini, dengan nilai sel VBA kita dapat memperoleh nilai sel.
Contoh # 3 - Dapatkan Nilai dari Satu Sel ke Sel Lain
Kami tahu bagaimana mendapatkan nilai dari sel menggunakan vba, sekarang persoalannya adalah bagaimana memasukkan nilai ke sel. Mari kita ambil contoh yang sama sahaja, untuk sel A1 kita perlu memasukkan nilai "INDIA" dan ini dapat dilakukan dari kod di bawah.
Kod:
Sub Get_Cell_Value2 () Julat ("A1"). Nilai = "INDIA" Akhir Sub
Ini akan memasukkan nilai "INDIA" ke sel A1, sama untuk mendapatkan nilai dari satu sel ke sel lain kita dapat menulis kod seperti di bawah.
Kod:
Sub Get_Cell_Value2 () Julat ("A5"). Nilai = Julat ("A1"). Nilai Akhir Sub
Izinkan saya menerangkan kodnya kepada anda.
"Untuk sel A5 kita memerlukan nilai yang berasal dari nilai sel A1", hanya itu yang dinyatakan oleh kod ini. Jadi ini akan mendapat nilai dari sel A1 hingga A5 menggunakan kod VBA.
Perkara yang Perlu Diingat
- Memasukkan nilai ke sel dan mendapatkan nilai dari sel memerlukan harta "NILAI" VBA digunakan.
- Dengan menggunakan harta CELLS kita dapat memilih hanya satu sel tetapi menggunakan objek RANGE kita dapat memilih beberapa sel.