Sunday, September 25, 2016

Vba Excel Pemula 1 : Cara Menampilkan Isi Range/Cell Menggunakan Kotak Pesan (Message Box)

Beberapa Posting saya tentang VBA Excel tidak didasari dari tahap-tahap yang seharusnya dipaparkan  dalam sebuah tutorial yang baik. Posting terdahulu tentang VBA Excel bersifat acak dan tidak beraturan. sehingga yang mengunjungi blog ini sedikit bingung harus belajar dari mana dasarnya. Oleh yang demikian saya mencoba merangkum beberapa tutorial dari berbagai web profresional untuk saja sajikan dari tahap pemula.

Pada bagian ini untuk pemula yang memang tidak memiliki sama sekali pengetahuan tentang Excel Macro atau VBA.  Ikuti urutan yang sama seperti yang diberikan di bawah ini, mudah untuk belajar VBA Excel jika Anda mengikuti urutan ini. Karena kita menjelaskan topik ini dengan contoh-contoh yang jelas. Dan setiap topik mungkin memiliki link atau merujuk contoh topik sebelumnya. Oleh karena itu lebih baik untuk mengikuti urutan yang sama.

Berikut VBA Excel Pemula yang harus dipelajari dari tahap awal.
  1. Cara Menampilkan Isi Range/Cell Menggunakan Kotak Pesan (Message Box)

Perhatikan Gambar Format Gif diatas..!!  kita akan mencoba membuat UserForm yang menampilkan Kotak Pesan yang menampilkan yang terdapat pada isi cell A5. ikuti langkah-langkahnya sebagai berikut :
  • Buka Excel dan  Tulislah Kalimat pada Cell A5 "Data Ini Tampil Pada Kotak Pesan" atau bisa juga dengan kata-kata menurut selera anda
  • Selanjutnya Klik Developer,  dan klik Visual Basic. Bisa juga dengan jalan pintas, yaitu pencet tombol Alt+F11 secara bersamaan makan jendela Visual Basic For Application sudah muncul
  • Tambah sebuah Userform dengan Caption "Aplikasi Pemula 1", tambahakan 1 ComandButton dengan Caption "Tampilkan"
  • Masukkan kode berikut pada CommandButton1 dengan cara klik kanan pilih View Code
Private Sub CommandButton1_Click()
 'Kode ini akan menampilkan A5 dalam Kotak Pesan (Message Box)
    MsgBox Range("A5"), vbInformation, "kotak Pesan"
  End Sub

  • Atau Menggunakan Kode Berikut ini pada CommandButton1 yang merujuk pada Baris ke 5 Kolom ke 1
Private Sub CommandButton1_Click()
'Kode ini merujuk pada A5 dengan Hitungan Kolom dan Baris
     MsgBox Cells(5, 1), vbInformation, "kotak Pesan"
'Angka 5 urutan Baris dan 1 adalah urutan Kolom
  End Sub


Download : App Pemula 1
  • Uji untuk menjalankan aplikasi dengan cara klik Run atau dengan tombol F5. Jika sudah mengikuti dengan urutan yang benar makan aplikasi akan jalan sebagaimana terlihat pada gambar gif. Semoga bermanfaat untuk Pemula.




Komentar Anda Sangat Menentukan Kelangsungan Blog ini
EmoticonEmoticon