Cara Menggunakan MsgBox dan InputBox VBA

Berinteraksi dengan user sangatlah penting dalam pemrograman, pengguna program nantinya dapat berinteraksi dengan user, salah satunya adalah dengan cara merespon pilihan dan input nilai dalam program. anda dapat menggunakan Kotak Pesan / Message Boxes (MsgBox) dan InputBox. pada latihan kali ini kita akan mempelajari Cara menggunakan MsgBox dan InputBox dalam VBA Excel.

Cara menggunakan MsgBox

Cara menggunakan MsgBox

Message Boxes adalah adalah kotak pesan yang tampil pada layar monitor yang berfungsi untuk berinteraksi dengan user. Message boxes sering disebut sebagai MsgBox dalam VBA dapat menampilkan beberapa variasi tombol, icon, dan text judul pesan. Jika dibutuhkan MsgBox juga dapat berfungsi untuk menampilkan sebuah nilai yang jika sebuah tombol diklik oleh user.

Sintax MsgBox:

MsgBox(prompt[,buttons][,title][,helpfile][,context])

Penjelasan:

  • Prompt adalah Ekspresi string yang akan di tampilkan pada kotak pesan
  • Buttons adalah Espresi nomor opsional yang mendefinisikan jenis tombol, jenis icon yang digunakan dalam MsgBox.
  • Title merupakan Ekspresi string optional yang digunakan sebagai judul kotak pesan. Default title pada MsgBox adalah “Microsoft Excel”.
  • Helpfile menambahkan help bersifat optional, anda dapat menambahkan helpfile untuk menampilkan pesan penggunaan MsgBox.
  • Context Menambahkan context bersifat optional, berisi ekspresi numeric untuk mengidentifikasi topik yang berkaitan dengan helpfile.

Menuliskan kotak pesan (MsgBox) pada VBA dapat anda gunakan didalam sebuah nama variable, atau Msgbox yang akan menampilkan Nilai dari variable tersebut.

Contoh Penulisan MsgBox:

Nilai = MsgBox(“apakah anda yakin akan menjalankan program?”,_
36, “Program inventory”)

Nilai = MsgBox(“apakah anda yakin akan menjalankan program?”,_
vbYesNo, “Program inventory”)

Jenis button (tombol) Msgbox:

Ada Berbagai jenis dan type tombol dalam MsgBox, masing-masing tombol dapat anda gunakan sesuai dengan kebutuhan program. berikut ini adalah jenis-jenis tombol dalam MsgBox

Value Konstanta Tombol
0 VbOKOnly OK
1 vbOKCancel OK dan Cancel
2 vbAbortRetryIgnore Abort, Retry, dan Ignore
3 vbYesNoCancel Yes, No, dan Cancel
4 vbYesNo Yes dan No
5 vbRetryCancel Retry dan cancel
16384 vbMsgBoxHelpButton Menampilkan dialog Help

Jenis Icon pada Msgbox

Anda juga dapat mengubah tampilan icon dalam Msgbox dengan tampilan VbCritical, VbQuestion atau yang lainya, berikut ini value dan jenis icon yang dapat anda gunakan.

Value Konstanta Icon
16 vbCritical Cara menggunakan Msgbox VbCritical
32 VbQuestion VbQuestion
48 VbExclamation VbExclamation
64 VbInformation VbInformation

MsgBox Return Value

Fungsi message boxes akan mengembalikan nilai jika tombol didalam MsgBox diklik. Anda dapat mereferensikan nilai berdasarkan nomor atau konstanta tersebut.

Tombol Konstanta Value return
OK vbOK 1
Cancel vbCancel 2
Abort vbAbort 3
Retry vbRetry 4
Ignore vbIgnore 5
Yes vbYes 6
No vbNo 7

Contoh penggunaan MsgBox

Buatlah sebuah prosedur dengan Events worksheets_activate untuk menjalankan prosedur isi data dengan menambahkan kotak pesan (MsgBox).

  1. Buka File Sample xlsm
  2. Tambahakan perintah program dalam Sheet1(DATA) module
  3. Tuliskan perintah dibawah ini
    Cara menggunakan MsgBox dalam VBA
  4. Jalan program menggunakan F5
  5. Klik OK pada Msgbox dan prosedur Isi_data akan dijalankan
  6. Jalankan kembali menggunakan F5
  7. Klik Cancel pada Msgbox maka prosedur Isi_data tidak dijalankan dan keluar dari program excel.

Cara Menggunakan InputBox 

Inputbox adalah tampilan interaksi dengan user untuk menginput informasi dan mengembalikan nilainya menjadi sebuah string.

Cara Menggunakan inputBox

Syntax InputBox

InputBox(prompt[, title][,default][,xpos, ypos[,helpfile, context])

Contoh:

strNilai = InputBox(“Masukan Nilai”)

Penjelasan:

  • Prompt adalah Ekspresi string yang akan di tampilkan pada inputBox, maksimum adalah 1024 karakter.
  • Title merupakan Ekspresi string optional yang digunakan sebagai judul kotak pesan. Default title pada MsgBox adalah “Microsoft Excel”.
  • Default merupakan ekspresi optional yang berisi respon standar. Jika anda tidak menambahkanya inputbox otomatis akan berisi blank (empty)
  • Xpos merupakan ekspresi numeric secara horizontal untuk menampilkan inputbox disisi kiri layar. Jika anda menambahkan Xpos anda juga diharuskan menambahkan Ypos.
  • Ypos merupakan ekspresi numeric secara vertikal untuk menampilkan inputbox disisi atas layar.
  • Helpfile menambahkan help bersifat optional, anda dapat menambahkan helpfile untuk menampilkan pesan penggunaan Inputbox.
  • Context Menambahkan context bersifat optional, berisi ekspresi numeric untuk mengidentifikasi topik yang berkaitan dengan helpfile.

Contoh Penggunaan InputBox

Gunakan inputbox untuk membuka file Filter.xlsm yang terletak lokasi folder yang sama dengan File Sample_data.

Langkah-langkah

  1. Buka file sample data.xlsm
  2. Tambahkan buah prosedur bernama Latihan_inputbox
  3. Tambahkan 2 variabel bernama strFilelocation dan strFile
  4. Deklarasikan variable tersebut dengan jenis data string
  5. Tuliskan perintah secara lengkap seperti dibawah ini
    Cara Menggunakan inputBox Excel Vba
  6. Jalankan menggunakan F5 atau F8

Leave a Comment