Tamat VBA

Fungsi Tamat dalam VBA

Akhir adalah pernyataan dalam VBA yang mempunyai pelbagai bentuk dalam aplikasi VBA, pernyataan Akhir yang mudah dapat diletakkan di mana saja dalam kod dan secara automatik akan menghentikan pelaksanaan kod, pernyataan akhir digunakan dalam banyak prosedur seperti mengakhiri subprosedur atau mengakhiri sebarang fungsi gelung seperti End if.

Untuk segalanya, ada akhir dan dalam VBA tidak berbeza. Anda pasti pernah melihat perkataan ini " Tamat " dalam semua kod di VBA anda. Kita dapat Berakhir dengan "End Sub", "End Function", "End If". Ini adalah perkara biasa kerana kita tahu setiap Akhir menunjukkan akhir prosedur. Pernyataan Akhir VBA ini tidak memerlukan pengenalan khusus kerana kami sudah biasa dalam pengekodan VBA kami.

Selain dari "Akhir" di atas, kami mempunyai satu harta "Akhir" di VBA. Dalam artikel ini, kami akan membimbing anda melalui harta itu dan cara menggunakannya dalam pengekodan kami.

Tamat Harta di VBA

"Tamat" adalah harta yang kami gunakan di VBA untuk bergerak ke arah yang disarankan. Contoh arah khas bergerak dari sel aktif ke sel terakhir yang digunakan atau sel kemasukan terakhir secara mendatar dan menegak dalam lembaran kerja.

Sebagai contoh, mari kita ingat ini dengan lembaran kerja. Lihat gambar di bawah.

Sekarang ini kita berada di sel A1.

Sekiranya kita ingin berpindah ke sel terakhir yang digunakan secara mendatar, kita menggunakan kekunci pintasan excel Ctrl + Arrow Kanan, ia akan membawa kita ke sel yang terakhir digunakan secara mendatar.

Begitu juga, jika kita ingin berpindah ke sel yang terakhir digunakan ke bawah atau secara menegak, kita tekan kekunci pintasan Ctrl + Panah Bawah.

Jadi untuk bergerak dari kiri ke kanan kita tekan Ctrl + Left Arrow, untuk bergerak dari bawah ke atas kita tekan Ctrl + Up Arrow.

Perkara serupa dapat dilakukan di VBA tetapi tidak dengan menggunakan kekunci Ctrl sebaliknya kita perlu menggunakan kata "Tamat".

Contoh Fungsi Akhir Excel VBA

Anda boleh memuat turun Templat VBA Akhir Excel ini di sini - Templat VBA Akhir Excel

Contoh # 1 - Gunakan Harta Akhir VBA untuk Bergerak dalam Lembaran Kerja

Mari lihat bagaimana menggunakan Excel VBA End untuk bergerak dalam helaian. Pertama, kita perlu memutuskan sel mana yang perlu kita bergerak. Ok, katakan kita perlu bergerak dari sel A1, jadi rujuk sel dengan menggunakan objek Rentang VBA.

Kod:

 Sub Akhir_Contoh1 () Julat ("A1") Sub Akhir 

Masukkan titik (.) Untuk melihat senarai IntelliSense. Pilih "Tamat" harta VBA dari senarai.

Kod:

 Sub End_Contoh1 () Julat ("A1"). Sub Akhir Akhir 

Setelah harta akhir dipilih terbuka kurungan.

Kod:

 Sub End_Contoh1 () Julat ("A1"). Akhir (Sub Akhir 

Sebaik sahaja anda membuka kurungan, kami dapat melihat semua pilihan yang tersedia dengan harta "Tamat". Pilih "xlToRight" untuk beralih dari sel A1 ke sel terakhir yang digunakan secara mendatar.

Kod:

 Sub Akhir_Contoh1 () Julat ("A1"). Akhir (xlToRight) Sub Akhir 

Setelah berpindah ke sel terakhir kita perlu memilih apa yang perlu kita lakukan. Masukkan titik (.) Untuk melihat senarai IntelliSense.

Kod:

Sub End_Contoh1 () Julat ("A1"). Tamat (xlToRight). Sub Akhir

Pilih kaedah "Pilih" dari senarai IntelliSense.

Kod:

 Sub End_Contoh1 () Julat ("A1"). Akhir (xlToRight). Pilih Sub Akhir 

Ini akan digunakan dari sel A1 hingga sel yang terakhir digunakan secara mendatar.

Begitu juga, gunakan tiga pilihan lain untuk bergerak ke kanan, kiri, bawah, ke atas.

Untuk Bergerak Ke Kanan dari sel A1.

Kod:

 Sub End_Contoh1 () Julat ("A1"). Akhir (xlToRight). Pilih Sub Akhir 

Untuk Melangkah Ke Bawah dari sel A1.

Kod:

 Sub End_Contoh1 () Julat ("A1"). Akhir (xlDown). Pilih End Sub 

Untuk Melangkah Ke Atas dari sel A5.

Kod:

 Sub End_Contoh1 () Julat ("A5"). Akhir (xlUp). Pilih Sub Akhir 

Untuk Melangkah ke Kiri dari sel D1.

Kod:

 Sub End_Contoh1 () Julat ("D1"). Akhir (xlToLeft). Pilih Akhir Sub 

Semua kod di atas adalah contoh contoh penggunaan harta "Akhir" untuk bergerak dalam lembaran kerja.

Sekarang kita akan melihat bagaimana memilih julat dengan menggunakan properti "Tamat".

Contoh # 2 - Pemilihan Menggunakan Harta Akhir

Kita perlu Menamatkan harta tanah untuk memilih julat sel dalam lembaran kerja. Untuk contoh ini, pertimbangkan data di bawah.

Pilih A1 hingga Sel Terpakai Terakhir

Untuk memilih sel dari A1 hingga sel yang terakhir digunakan secara mendatar, sebutkan sel A1 dalam objek Range.

Kod:

 Sub End_Example2() Range("A1", End Sub 

For the second argument open one more Range object and mention the cell as A1 only.

Code:

 Sub End_Example2() Range("A1",Range("A1") End Sub 

Close only one bracket and put a dot to select the Excel VBA End property.

Code:

 Sub End_Example2() Range("A1",Range("A1").End( End Sub 

Now select xlToRight and close two brackets.

Code:

 Sub End_Example2() Range("A1",Range("A1").End(xlToRight)) End Sub 

Now chose “Select” method.

Code:

 Sub End_Example2() Range("A1", Range("A1").End(xlToRight)).Select End Sub 

Ok, we are done.

Run this code to see the impact.

As you can see it has selected the range A1 to D1.

Similarly to select downwards use the below code.

Code:

 Sub End_Example2() Range("A1", Range("A1").End(xlDown)).Select 'To select from left to right End Sub 

Code:

 Sub End_Example2() Range("A1", Range("A1").End(xlDown)).Select 'To select from top to down End Sub 

Code:

 Sub End_Example2() Range("D1", Range("D1").End(xlToLeft)).Select 'To select from right to left End Sub 

Code:

 Sub End_Example2() Range("A5", Range("A5").End(xlUp)).Select 'To select from bottom to up End Sub 

Example #3 – Select Right to Left, Right to Bottom, & Top

We have seen how to select horizontally & vertically. To select both vertically and horizontally we need to use two “End” properties. To select the data from A1 to D5, we need to use the below code.

Code:

 Sub End_Example3() Range("A1", Range("A1").End(xlDown).End(xlToRight)).Select 'To from cell A1 to last use cell downwards & rightwards End Sub 

This will select the complete range like the below.

Like this, we can use the VBA “End” Function property to select a range of cells.