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

Daftar Isi

Fungsi Akhir di VBA

Fungsi Akhir di VBA

End adalah pernyataan di VBA yang memiliki beberapa bentuk dalam aplikasi VBA, pernyataan End sederhana dapat diletakkan di mana saja dalam kode dan secara otomatis akan menghentikan eksekusi kode, pernyataan akhir digunakan dalam banyak prosedur seperti mengakhiri subprocedure atau mengakhiri fungsi loop apa pun seperti End if.

Untuk semuanya, ada akhirnya, dan di VBA, tidak ada bedanya. Anda pasti pernah melihat kata " End " ini di semua kode di VBA Anda. Kita dapat Mengakhiri dengan "End Sub," "End Function", "End If". Ini biasa terjadi karena kita tahu setiap Akhir menyarankan akhir prosedur. Pernyataan Akhir VBA ini tidak memerlukan pengantar khusus karena kami sudah terbiasa dengannya dalam pengkodean VBA.

Terlepas dari "Akhir" di atas, kami memiliki satu properti, "Akhir" di VBA. Pada artikel ini, kami akan memandu Anda melalui properti itu dan cara menggunakannya dalam pengkodean kami.

Akhir Properti di VBA

"Akhir" adalah properti yang kami gunakan di VBA untuk bergerak ke arah yang disarankan. Contoh tipikal arah berpindah dari sel aktif ke sel yang terakhir digunakan atau sel entri terakhir secara horizontal dan vertikal di lembar kerja.

Misalnya, mari kita ingat ini dengan lembar kerja. Lihat gambar di bawah ini.

Saat ini, kami berada di sel A1.

Jika kita ingin pindah ke sel yang terakhir digunakan secara horizontal, kita menggunakan tombol pintas excel Ctrl + Panah Kanan, dan itu akan membawa kita ke sel yang terakhir digunakan secara horizontal.

Demikian pula, jika kita ingin pindah ke sel yang terakhir digunakan ke bawah atau vertikal, kita tekan tombol pintas Ctrl + Panah Bawah.

Jadi untuk berpindah dari kiri ke kanan, kita tekan Ctrl + Panah Kiri. Untuk berpindah dari bawah ke atas, kita tekan Ctrl + Panah Atas.

Hal serupa dapat dilakukan di VBA tetapi tidak dengan menggunakan tombol Ctrl . Sebaliknya kita perlu menggunakan kata "Akhir".

Contoh Fungsi Akhir VBA Excel

Contoh # 1 - Gunakan Properti Akhir VBA Untuk Memindahkan Lembar Kerja

Mari kita lihat cara menggunakan Excel VBA End untuk memindahkan lembar. Pertama, kita perlu memutuskan sel mana yang perlu kita pindahkan. Ok, katakanlah kita perlu pindah dari sel A1, jadi rujuk sel tersebut dengan menggunakan objek VBA Range.

Kode:

Sub End_Example1 () Range ("A1") End Sub

Letakkan titik (.) Untuk melihat daftar IntelliSense. Pilih properti "End" VBA dari daftar.

Kode:

Sub End_Example1 () Range ("A1"). End End Sub

Setelah properti akhir memilih kurung buka.

Kode:

Sub End_Example1 () Range ("A1"). End (End Sub

Segera setelah Anda membuka tanda kurung, kita dapat melihat semua opsi yang tersedia dengan properti "End". Pilih "xlToRight" untuk berpindah dari sel A1 ke sel yang terakhir digunakan secara horizontal.

Kode:

Sub End_Example1 () Range ("A1"). End (xlToRight) End Sub

Setelah pindah ke sel terakhir, kita perlu memilih apa yang perlu kita lakukan. Letakkan titik (.) Untuk melihat daftar IntelliSense.

Kode:

Sub End_Example1 () Range ("A1"). End (xlToRight). Akhiri Sub

Pilih metode "Pilih" dari daftar IntelliSense.

Kode:

Sub End_Example1 () Range ("A1"). End (xlToRight). Pilih End Sub

Ini akan menggunakan sel A1 untuk terakhir menggunakan sel secara horizontal.

Demikian pula, gunakan tiga opsi lainnya untuk bergerak ke kanan, kiri, bawah, atas.

Untuk Pindah ke Kanan dari sel A1.

Kode:

Sub End_Example1 () Range ("A1"). End (xlToRight). Pilih End Sub

Untuk Pindah ke Bawah dari sel A1.

Kode:

Sub End_Example1 () Range ("A1"). End (xlDown). Pilih End Sub

Untuk Pindah dari sel A5.

Kode:

Sub End_Example1 () Range ("A5"). End (xlUp). Pilih End Sub

Untuk Pindah ke Kiri dari sel D1.

Kode:

Sub End_Example1 () Range ("D1"). End (xlToLeft). Pilih End Sub

Semua kode di atas adalah contoh contoh penggunaan properti "End" untuk memindahkan lembar 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 horizontal & vertikal. Untuk memilih baik secara vertikal maupun horizontal, kita perlu menggunakan dua properti "End". Untuk memilih data dari A1 hingga D5, kita perlu menggunakan kode di bawah ini.

Kode:

Sub End_Example3 () Range ("A1", Range ("A1"). End (xlDown) .End (xlToRight)). Pilih 'Ke dari sel A1 ke sel yang terakhir digunakan ke bawah & ke kanan Akhiri Sub

Ini akan memilih rangkaian lengkap seperti di bawah ini.