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

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
32	VbQuestion
48	VbExclamation
64	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
   
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.

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
   
6. Jalankan menggunakan F5 atau F8