
Berbagai macam kondisi yang menyebabkan munculnya kotak pesan tentunya berbeda antara aplikasi satu dengan lainnya, namun pada intinya munculnya kotak pesan disebabkan karena terdapat sesuatu yang memicunya. Tujuan dari kotak pesan memang ingin menampilkan informasi kepada pengguna tentang apa yang ia kerjakan dan biasanya juga menampilkan bantuan yang bertujuan untuk membantu pengguna dalam mengoperasikan aplikasi yang dimaksud.
Meskipun boleh dibilang bahwa munculnya jendela kotak pesan dapat membantu pengguna dalam memutuskan apa yang seharusnya dilakukan. Namun terkadang munculnya bisa sangat menggangu dan bahkan tidak diharapkan, terlebih ketika kotak pesan disematkan dalam module pengulangan - sebut saja parameter yang digunakan adalah
Coba perhatikan pernyataan berikut :
Maka dari pernyataan di atas dapat disimpulkan bahwa pengulangan perintah terjadi selama 3 kali, yakni perintah untuk mengisi huruf ABC mulai dari baris ke-1 dan akan berhenti pada saat masuk baris ke-3.
Bahasa kode VBA sederhana untuk menerjemahkan kalimat diatas adalah :
For a = 1 to 3 Cells(a,1) = "ABC" nextNah, sekarang coba bayangkan jika sebuah parameter MsgBox ditempatkan dalam parameter ini, pasti yang terjadi adalah pesan yang sama akan dibuka secara berulang-ulang sebanyak 3 kali. dan ini jelas-jelas akan sangat menganggu. Silahkan lihat kotak pesan yang muncul pada demonstrasi berikut

Demonstrasi diatas dihasilkan dari kode Macro VBA seperti ini
For a = 1 to 3 MsgBox "Pengulangan sebanyak " & a & " kali" nextDari kode diatas, saya hanya melakukan pengulangan perintah sebanyak 3 kali saja namun saya sangat terganggu dengan munculnya kotak pesan setiap kali pengungalan dilakukan. Bagaimana jika saya ingin melakukan pengulangan lebih banyak dari ini?! Mungkin capek dan tentu kesal karena harus menekan tombol OK pada jendela kotak pesan agar bisa menuju ke pengulangan berikutnya hingga selesai.
Untungnya dengan menggunakan bantuan logika sederhana, 'kesalahan' ini bisa diatasi dan menghasilkan sesuatu yang seharusnya, yakni menampilkan kotak pesan cukup hanya sekali saja meskipun berkali-kali melakukan pengulangan perintah.
Jika ingin mencobanya, tulis baris kode Macro VBA berikut dalam sebuah Module kemudian jalankan dengan menekan tombol
Sub PesanSekali() Dim Pesan As Boolean Pesan = True For a = 1 To 3 If Pesan = True Then MsgBox "Pengulangan sebanyak " & a & " kali" Pesan = False End If Next End Sub
Pesan As Boolean
Sebuah variabel Macro VBA yang dapat digunakan untuk menyimpan nilai TRUE atau FALSEPesan = True
Digunakan untuk menentukan nilai awal dari nilai Pesan, yakni nilai TRUEFor a = ....
Berfungsi untuk melakukan pengulangan perintah sebanyak 3 kaliIf Pesan = True
Baris ini berfungsi untuk melakukan pengecekan sebelum mengeksekusi perintah-perintah setelahnya, yakni jika kondisi dari nilai Pesan adalah TRUE.
Dan karena sebelumnya kita sudah menentukan nilai Pesan dengan nilai TRUE, maka pasti perintah selanjutnya akan dieksekusiPesan = False
Nah, inilah baris perintah yang digunakan untuk menghentikan munculnya jendela kotak pesan secara berulang-ulang, karena paremeter dari Logika IF yang dituliskan sebelumnya hanya akan menjalankan perintah jika status dari nilai Pesan = TRUE

Lantas bagaimana cara mengkombinasikannya dengan kode-kode atau perintah lainnya?!
Untuk mengetahui kegunaan dan cara mengaplikasikan kedalam baris perintah yang lebih kompleks, silahkan kunjungi tutorialnya disini
Sebagai penutup untuk tutorial kali ini, saya ucapakan selamat kepada anda karena sudah berhasil mengetahui bagaimana caranya menghentikan munculnya kotak pesan agar tidak tampil secara berulang-ulang ketika di sematkan dalam parameter For..Next. Mudah-mudahan tutorial kali ada guna dan manfaatnya, dan membantu anda dalam menyelesaikan permasalah excel yang saat ini anda hadapi.
Silahkan bookmark website ini jika anda suka dengan tutorial-tutorial yang telah kami sajikan, dan jangan lupa kunjungi kami lain waktu untuk mengetahui kehebatan Microsoft Excel lainnya bersama xcelive.com.
Incoming Search Terms
Cara menghentikan tampilan MessageBox Memunculkan MessageBox hanya sekali
Kombinasi antara MessageBox dan Loop (For...Next)
Cara melakukan pengulangan tanpa harus menampilkan kotak pesan secara berulang-ulang
Logika IF untuk menutup Jendela MessageBox
Bagaimana Membuat Kotak Pesan Tampil Hanya sekali Dalam Parameter For..Next
Terimakasih sudah membaca
Tutorial: Membuat Kotak Pesan Agar Tampil Sekali Dalam Parameter For..Next
Label: Message Box - Author: excelive
Tutorial: Membuat Kotak Pesan Agar Tampil Sekali Dalam Parameter For..Next
Label: Message Box - Author: excelive
Masih mau belajar lagi !
Yuk, klik tautan berikut ini :