Sempadan dalam VBA Excel
Kami menggunakan perbatasan di excel untuk menonjolkan data kami, di papan pemuka mana pun, adalah kemahiran yang sangat penting untuk mewakili data penting dan ia dilakukan dengan sempadan, batas adalah harta di VBA yang dapat diakses dengan menggunakan kaedah jangkauan dan memberikan yang sesuai gaya sempadan seperti yang kita tahu terdapat gaya sempadan yang berbeza.
Sekiranya anda mahir dalam format di excel, anda boleh menyebut diri anda sebagai "Excel Beautician." Untuk membuat laporan kelihatan menarik bagi pengguna akhir atau pembaca, format memainkan peranan penting di dalamnya. Saya harap anda mengetahui teknik pemformatan dalam lembaran kerja biasa. Memformat melalui pengekodan VBA memerlukan sebilangan besar bahasa pengekodan VBA. Dalam artikel ini, kami akan menunjukkan kepada anda salah satu teknik pemformatan yang paling diremehkan iaitu menerapkan batas VBA excel.
Contoh Sempadan di VBA
Mari kita lihat beberapa contoh untuk memahami perkara ini dengan lebih baik.
Contoh # 1 - Terapkan Sempadan VBA dengan Pengekodan
Membuat makro untuk menerapkan batas VBA excel dengan gaya yang berbeza, menjadikannya tersedia sebagai tambahan pada pita excel, menjadikan pekerjaan lebih mudah setiap kali kita mahu menerapkan sempadan VBA.
Setiap sel dalam lembaran kerja mempunyai sempadan dan warna latar. Secara lalai, setiap sel tidak mempunyai sempadan dan warna latar.
Di lembaran kerja di bawah tab RUMAH yang kami miliki, kami mempunyai pilihan sempadan, dan jika anda mengklik senarai drop-down di excel, kami mempunyai pelbagai pilihan.
Tetapi dalam VBA perkara pertama yang perlu kita lakukan adalah menentukan sel atau julat sel yang akan kita gunakan gaya pemformatan sempadan VBA excel. Oleh itu, kita boleh merujuk kepada jarak sel atau sel menggunakan objek VBA RANGE. Contohnya, jika anda ingin menukar sempadan sel B5, anda boleh menulis kod seperti ini.
Julat ("B5")
Maka kita perlu mengakses harta " Sempadan ".
Kod:
Sub Batas_Contoh1 () Julat ("B5"). Sub Akhir Sub
Setelah menggunakan harta "Border" excel VBA, buka kurungan untuk melihat semua jenis pilihan pemformatan sempadan.
Kod:
Sub Border_Contoh1 () Julat ("B5"). Sempadan (Sub Akhir
Di sini kita mempunyai xlDiagonalDown, xlDiagonalUp, xlEdgeBottom, xlEdgeLeft, xlEdgeRight, xlEdgeTop, xlInsideHorizontal, dan xlInsideVertical.
Setelah gaya sempadan dipilih, kita perlu memilih ciri yang ingin kita bekerjasama. Salah satu watak yang perlu kita gunakan di sini adalah " Gaya Gaya", jadi pilih sifat "Gaya Garis".
Kod:
Sub Batas_Contoh1 () Julat ("B5"). Sempadan (xlEdgeBottom) .li Akhir Sub
Setelah sifat gaya garis dipilih, kita perlu menetapkan jenis gaya garis atau jenis sempadan dalam VBA yang akan kita terapkan.
Letakkan tanda sama dan pilih penghitungan "XlLineStyle" .
Kod:
Sub Border_Contoh1 () Julat ("B5"). Sempadan (xlEdgeBottom) .LineStyle = XlLineStyle. Sub Akhir
Letakkan titik untuk melihat semua gaya sempadan yang tersedia.
Kod:
Kami mempunyai banyak pilihan di sini. xlContinuous, xldash, xlDashDot, xlDashDotDot, xlDot, xlDouble, XlLineStyleNone, dan xlSlantDashDot.
Ok, sekarang saya telah memilih pilihan " xlDouble."
Kod:
Sub Batas_Contoh1 () Julat ("B5"). Sempadan (xlEdgeBottom) .LineStyle = XlLineStyle.xlDua Akhir Sub
Sekarang, jika saya menjalankan kod, ia akan menggunakan garis Ganda ke bahagian bawah sel B5 .
Jenis Garis: “ xlContinuous ”.
Kod:
Sub Batas_Contoh1 () Julat ("B5"). Sempadan (xlEdgeBottom) .LineStyle = XlLineStyle.xl Sub Akhir Berterusan
Keputusan:
Jenis Garis: "pertembungan."
Kod:
Sub Border_Contoh1 () Julat ("B5"). Sempadan (xlEdgeBottom) .LineStyle = XlLineStyle.xlDash End Sub
Keputusan:
Jenis Garis: " xlDashDot."
Kod:
Sub Border_Contoh1 () Julat ("B5"). Sempadan (xlEdgeBottom) .LineStyle = XlLineStyle.xlDashDot End Sub
Keputusan:
Jenis Garis: " xlDashDotDot ".
Kod:
Sub Border_Contoh1 () Julat ("B5"). Sempadan (xlEdgeBottom) .LineStyle = XlLineStyle.xlDashDotDot End Sub
Keputusan:
Jenis Garis: " xlDot."
Kod:
Sub Batas_Contoh1 () Julat ("B5"). Sempadan (xlEdgeBottom) .LineStyle = XlLineStyle.xlDot Akhir Sub
Keputusan:
Jenis Garis: " xlLineStyleNone ".
Kod:
Sub Batas_Contoh1 () Julat ("B5"). Sempadan (xlEdgeBottom) .LineStyle = XlLineStyle.xlLineStyleTiada Sub Akhir
Keputusan:
Ini akan menghilangkan sempadan sel yang ditentukan.
Jenis Garis: " xlSlantDashDot ".
Kod:
Sub Batas_Contoh1 () Julat ("B5"). Sempadan (xlEdgeBottom) .LineStyle = XlLineStyle.xlSlantDashDot End Sub
Keputusan:
Contoh # 2 - Tukar Sempadan Menggunakan Kaedah Sempadan VBA Sekitar
Kita juga boleh mengubah batas sel dengan menggunakan kaedah VBA Borders Around . Setelah julat sel atau sel disebut, kita perlu mengakses kaedah VBA Borders Around .
Buka kurungan untuk melihat semua parameter.
Julat ("B5"). BorderAround ((Gaya Garis), (Berat sebagai xlBorderWeight), (ColorIndex), (Warna), (Warna Tema))
Kita boleh menyebut gaya garis, warna garis, berat sempadan, dan banyak lagi perkara yang boleh kita lakukan dengan kaedah ini.
Kod:
Sub Border_Contoh1 () Julat ("B5"). Garis Sempadan Di Sekitar Gaya: = xl Berterusan, Berat: = xl Sub Akhir Tebal
Ini akan mengubah Gaya Garis menjadi xlContinuous.
LineStyle: = xl Berterusan
Berat Sempadannya tebal.
Berat: = xlTebal
Dan hasil kod ini adalah seperti di bawah.
Seperti ini dengan menggunakan kaedah dan kaedah VBA Border and Border Around excel, kita dapat mengubah batas dan elemen sempadan melalui pengekodan VBA.
Artikel yang Disyorkan
Ini telah menjadi Panduan untuk Sempadan VBA. Di sini kita belajar bagaimana menetapkan Sempadan dengan Pengekodan VBA Excel berserta contoh praktikal & templat kod yang boleh dimuat turun. Anda juga boleh melihat artikel lain yang berkaitan dengan Excel VBA -
- Apakah Pembolehubah Global dalam Excel VBA?
- Contoh Membuat Jadual Pangsi di VBA
- Tamat Excel VBA
- Pemformatan Bersyarat untuk Sel Kosong
