Fungsi Akhir VBA - Menggunakan Harta Akhir di VBA (dengan Contoh)

Isi kandungan

Fungsi Tamat dalam 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 Tamat jika.

Untuk segalanya, ada akhir, dan dalam VBA, ia 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 khas kerana kami sudah biasa dalam pengekodan VBA kami.

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

Tamat Harta di VBA

"Akhir" adalah harta yang kami gunakan di VBA untuk bergerak ke arah yang disarankan. Contoh khas arah 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, kita berada di sel A1.

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

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

Jadi untuk bergerak dari kiri ke kanan, kami tekan Ctrl + Left Arrow. Untuk bergerak dari bawah ke atas, kami tekan Ctrl + Panah Atas.

Perkara serupa boleh dilakukan di VBA tetapi tidak dengan menggunakan kekunci Ctrl . Sebaliknya, kita perlu menggunakan kata "Tamat."

Contoh Fungsi Akhir Excel VBA

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 berpindah 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 End_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 menggunakan sel A1 untuk sel yang terakhir digunakan secara mendatar.

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

Untuk Bergerak Kanan dari sel A1.

Kod:

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

Untuk Turun dari sel A1.

Kod:

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

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.

Now we will see how to select the ranges by using the “End” property.

Example #2 - Selection Using End Property

We need to End the property to select the range of cells in the worksheet. For this example, consider the below data.

Select A1 to Last Used Cell

To select the cells from A1 to the last used cell horizontally, first, mention the cell A1 in Range object.

Code:

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 the “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

Contoh # 3 - Pilih Kanan ke Kiri, Kanan ke Bawah, & Atas

Kami telah melihat bagaimana memilih secara mendatar & menegak. Untuk memilih kedua-dua menegak dan mendatar, kita perlu menggunakan dua sifat "Akhir". Untuk memilih data dari A1 hingga D5, kita perlu menggunakan kod di bawah.

Kod:

Sub End_Example3 () Range ("A1", Range ("A1"). End (xlDown). End (xlToRight)). Pilih 'Ke dari sel A1 untuk terakhir menggunakan sel ke bawah & ke kanan Akhir Sub

Ini akan memilih julat lengkap seperti di bawah.