Header Ads

MEMANFAATKAN FUNGSI MACRO UNTUK MENAMPILKAN FOTO PADA PERANGKAT UJIAN


Dalam pembuatan Perangkat Ujian di sekolah diantaranya Kartu Ujian, Denah Tempat Duduk biasanya menggunakan Foto yang di tempel sesuai foto dari siswa. Dalam kesempatan ini saya akan coba membuat Kartu Ujian yang menggunakan Foto Digital dalam tampilannya. Keuntungan penggunaan Foto Digital ini adalah kita tidak repot lagi menempelkan foto ke Kartu Ujian.
            Dalam hal ini Aplikasi yang digunakan adalah Microsoft Excell. Pada Postingan terdahulu saya pernah posting “Membuat Kartu Ujian dengan Foto”, di dalam postingan itu aplikasi menggunakan Microsoft Excell 2003 dan jika digunakan untuk versi yang lebih tinggi saya sudah coba ternyata dalam pembacaan fotonya acak alias random.

            Pada Postingan ini saya akan coba menggunakan bantuan macro untuk membuat Kartu dengan Foto.
            Ada beberapa hal yang perlu disiapkan dalam pembuatan Kartu Ujian ini, disini saya coba siapkan kebutuhannya, yaitu:
1. Data Siswa dalam hal ini di beri nama tabel NAMA yang disimpan dalam Sheet DATA SISWA ALL (Optional alias sesuka anda memberi nama tabel dan nama sheet)
2. Data Foto saya siapkan dalam Folder FOTO yang di simpan dalam 1 Folder dengan file Microsoft Excell-nya
3.  Form Kartu Ujian (silahkan disesuaikan sesuai kebutuhan.

Langkah-langkah pembuatan Kartu Ujian :
1.   Beri nama tabel Data siswa dengan nama tabel NAMA, seperti gambar berikut ini


2.      Siapkan Data Foto sesuai kebutuhan, dengan mengatur posisi dari kiri ke kanan dalam 1 baris. Lihat gambar berikut :


3.      Siapkan gambar di Form Kartu dengan objek Picture

4.      Setelah siap semua kita mulai memasukkan data ke dalam Form Kartu, untuk No.Ujian, NAMA, NIS, KELAS, RUANG menggunakan fungsi Vlookup dengan cell kunci L7, dimana fungsinya adalah:
No. Ujian = VLOOKUP(L7;NAMA;2;0)
NAMA = VLOOKUP(L7;NAMA;4;0)
NIS = VLOOKUP(L7;NAMA;3;0)
KELAS = VLOOKUP(L7;NAMA;5;0)
RUANG = VLOOKUP(L7;NAMA;6;0)
5.      Untuk Foto Masukkan Tool Image di Menu Developer:

6.      Kemudian tambah Tombol Spin, dan klik kanan properties :

7.      Kemudian pada Visual Basic Editor pada sheet Kartu tulis program seperti berikut:

8.      Kemudian Klik kanan pada Spin
        
9.      Klik Ok
10.  Setelah selesai semua, silahkan dicoba, semoga berhasil.

Catatan :
-         Tampilan dari Kartu Ujian diatas adalah Kartu Ujian yang dilaksanakan di SMK N 2 Purwokerto.
-         Silahkan dicoba dengan merubah layout dan fungsi sesuai kebutuhan.

Copyright @ Mr. 2duh

Tidak ada komentar

Gambar tema oleh enot-poloskun. Diberdayakan oleh Blogger.