Pernyataan GoTo VBA - Bagaimana cara menggunakan Pernyataan GoTo di VBA?

Pernyataan GoTo VBA Excel

Pernyataan GoTo VBA digunakan ketika terjadi kesalahan saat menjalankan kode daripada menampilkan kesalahan untuk melanjutkan baris kode berikutnya dengan mengabaikan pesan kesalahan. Ada dua jenis pernyataan GOTO, satu adalah memilih rentang lembar kerja mana pun di buku kerja yang ditentukan dan yang lainnya adalah penanganan kesalahan.

Untuk mengatasi kesalahan yang diantisipasi di VBA, kami memiliki fungsi yang disebut "GOTO". Kita akan melihat kedua jenis pernyataan GoTo di artikel ini.

2 Cara menggunakan Pernyataan GoTo dalam Kode VBA

# 1 - Metode Application.GoTo

Jika Anda ingin pergi ke buku kerja tertentu atau lembar kerja tertentu di semua buku kerja yang dibuka, kita dapat menggunakan metode pernyataan Application.GoTo.

Mari kita lihat sintaks dari metode Application.GoTo

  • (Referensi): Ini hanyalah referensi sel yang ditentukan. Jika referensi tidak disediakan secara default, ini akan membawa Anda ke rentang sel yang terakhir digunakan.
  • (Gulir): Ini pernyataan logis BENAR atau SALAH. Jika nilainya BENAR, itu akan bergulir melalui jendela. Jika nilainya SALAH, itu tidak akan bergulir melalui jendela.
Contoh

Jika Anda ingin pergi ke sel tertentu di lembar kerja tertentu, kita dapat menggunakan metode Goto. Saya memiliki 3 lembar bernama Jan, Feb, dan Mar.

Jika saya ingin pergi ke sel C5 di lembar Jan, saya akan menggunakan rangkaian kode di bawah ini.

Langkah 1: Mulai nama makro excel.

Kode:

Sub GoTo_Example1 () End Sub

Langkah 2: Mulai metode " Application.GoTo "

Kode:

Sub GoTo_Example1 ()

Aplikasi. Goto

Akhiri Sub

Langkah 3: Dalam argumen referensi, kita perlu menentukan nama lembar kerja, dan di lembar kerja itu, kita perlu menyebutkan sel tertentu.

Kode:

Sub GoTo_Example1 () Application.Goto Reference: = Worksheets ("Jan"). Range ("C5") End Sub

Langkah 4: Sebutkan gulungan sebagai BENAR.

Kode:

Sub GoTo_Example1 () Application.Goto Reference: = Worksheets ("Jan"). Range ("C5"), Scroll: = True End Sub

Langkah 5: Sekarang jalankan kode ini menggunakan tombol F5, atau Anda juga dapat menjalankan kode ini secara manual, ini akan membawa Anda ke lembar yang ditentukan dan sel yang ditentukan.

Sekarang saya akan mengubah argumen gulir menjadi FALSE dan melihat perubahan yang akan ditemuinya.

Sub GoTo_Example1 () Application.Goto Reference: = Worksheets ("Jan"). Range ("C5"), Scroll: = False End Sub

Jika Anda ingin masuk ke buku kerja tertentu, maka Anda perlu menyebutkan nama buku kerja juga sebelum nama buku kerja.

Sub GoTo_Example1 () Application.Goto Reference: = Workbooks ("Book1.xlsx"). Lembar Kerja ("Jan"). Range ("C5"), Scroll: = False End Sub

# 2 - Metode Penanganan Kesalahan

Ketika baris kode tertentu mengalami kesalahan, maka VBA berhenti mengeksekusi kode lainnya dan menampilkan pesan kesalahan.

Misalnya, lihat baris kode di bawah ini.

Sub GoTo_Example2 () Sheets ("April"). Hapus Sheets.Tambahkan End Sub

Kode di atas mengatakan untuk menghapus lembar pada bulan April dan menambahkan lembar baru. Di buku kerja yang aktif, jika ada nama sheet yang disebut April, itu akan dihapus, atau akan ditampilkan kotak dialog pesan kesalahan di bawah ini.

Ketika saya menjalankan kode ini, buku kerja saya tidak memiliki lembar yang disebut April, jadi kode VBA tidak dapat menemukan nama lembar dan melempar kesalahan. Terkadang kita perlu mengabaikan kesalahan ini karena seringkali, jika tidak ada nama sheet bernama April, maka kita perlu melanjutkan dengan baris kode lainnya.

Untuk menghilangkan kesalahan ini, kita dapat menggunakan metode GoTo sebagai penangan kesalahan.

Sekarang saya akan memodifikasi kode saat kesalahan On pergi ke baris berikutnya.

Sub GoTo_Example2 () Pada Kesalahan GoTo NextLine Sheets ("April"). Hapus NextLine: Sheets. Tambahkan End Sub

Jika Anda menjalankan ini, itu akan menambah lembar baru meskipun tidak ada nama lembar yang disebut April.

Pernyataan "On Error GoTo NextLine" memahami bahwa jika terjadi kesalahan, itu akan melompat ke baris berikutnya, dan di baris berikutnya, kode VBA adalah untuk menambahkan lembar baru.

Hal-hal untuk diingat

  • Jika Anda ingin melompat ke baris berikutnya saat kesalahan terjadi, Anda juga dapat menggunakan pernyataan On Error Resume Next VBA.
  • Untuk melompat ke berikutnya, Anda harus yakin bahwa baris kode tertentu itu diperkirakan mengalami kesalahan.
  • Jika baris penting dari kode dilewati dengan penanganan kesalahan ini, tugas Anda mungkin belum selesai dengan sempurna.

Artikel yang menarik...