Wednesday, June 29, 2016

Print Preview Biodata Plus Photo Dengan UserFrom VBA Excel

Cantik Tak?? Print Preview Biodata Plus Photo Dengan UserForm VBA Excel. Sangat membantu membuat aplikasi Database siswa lengkap dengan foto saat akan di print langsung nempel dech fotonya sesuai dengan data yang ada dalam database. 

selain itu fungsi ini juga bisa dikembangkan untuk membuat Student Card. Membuat biodata lengkap siswa untuk raport, biodata karyawan dan banyak lainnya.

Print Preview Biodata Plus Photo Dengan UserFrom VBA Excel
Aplikasi yang dilengkapi dengan foto akan lebih mudah mengenal pemilik data. Walau data nama ada yang sama dengan mudah kita dapat mengenali pemilik data. Penentuannya hanya ketika memasukkan foto tidak salah data saja.

Tidak hanya aplikasi data yang di kantoran saja dapat memanfaatkan filtur foto yang disematkan didalamnya. Aplikasi kasir swalayan juga akan lebih memudahkan pengelola untuk menginput stock barang.

Langkah-Langkah membuat Print Priview Biodata Plus Photo Dengan UserForm VBA Excel :
Private Sub TombolCetak_Click()
Dim Ws As Worksheet: Set Ws = Sheet2
Dim path As String: path = ThisWorkbook.path & "\" & "Foto" & "\"
If Dir(path & UserForm1.TxtNis.Text & ".jpg") = Empty Then
MsgBox "Photo Belum Tersedia..!! Inser Photo Terlebih Dahulu..!!", 64, "Aplikasi InserPhoto"
Exit Sub
End If

UserForm1.Hide
Application.Visible = True
With Ws
.Activate
.Range("E5").Value = Me.TxtNis.Text
.Range("E6").Value = Me.TxtNama.Text
.Range("E7").Value = Me.TxtKelas.Text
.Range("E8").Value = Me.TxtWali.Text
.Range("E9").Value = Me.TxtAlamat.Text
.Shapes("Rectangle 1").Fill.UserPicture (path & UserForm1.TxtNis.Text & ".jpg")
End With
Ws.PrintPreview
Application.Visible = False
UserForm1.Show
End Sub

Demikian Kode untuk Print Preview Biodata Plus Photo Dengan UserFrom VBA Excel, Semoga dapat dikembangkan sesuai dengan kebutuhannya masing-masing.
Download File : Print Biodata Plus Photo

Semoga artikel ini dapat menjadi salah satu acuan dan referensi serta informasi bagi yang sedang mempelajari Vba Excel.

Jika artikel ini dirasakan ada manfaat dan berguna mohon dapat dishare ke media sosial agar teman-teman lainnya yang memiliki hobi yang sama dapat mempelajarinya juga.

Jika ingin menyampaikan pertanyaan, saran dan kritikan mohon dapat disampaikan pada kolom komentar yang tersedia di bawah artikel ini.

Jika anda memiliki kode Vba Excel yang berbeda namun memiliki fungsi dan alur kerja yang sama mohon dapat dishare pula di kolom komentar agar pengunjung lainnya dapat mempelajarinya.

Ibu Rumah Tangga Yang Mencoba Berbagi Melalui Tulisan. Semoga Bisa Bermanfaat Bagi Yang Membaca

6 komentar

Teurimong Geunaseh Syedara lon, sdh Sy Ikuti Sesuai dgn Petunjuk, dan hasilnya Mantap that, File Pun cukup ringan...Syukran...

Terimoeng Geunaseh cit ka neu silaturrahmi bak blog lon.... Semoga dapat dikembangkan sesuai dengan keperluan Tgk....

Maaf kak mau tanya, itu excelnya bisa dalam bentuk .exe itu gimana cara convertnya ya, makasih

Dear Ismoyo Soeharto..!! Terimakasih sudah berkunjung ke blog saya..!! Bertanya tak perlu minta maaf x...!! untuk mengubah format Excel ke Exe menggunakan Software Compiler... Coba disearching saja dengan kata kunci "Compiler Exce" pasti ketemu banyak

Oke Mas, sekalian tanya, kalu mau menampilkan foto yang berada di userform ke cell excel untuk dicetak bagaimana kodingnya ya mas ?

Saya rasa tidak jauh berbeda dengan posting ini. saya tidak bisa menerka karena tidak melihat aplikasi yang anda rancang dan permasalahan yang sedang dihadapi..

Komentar Anda Sangat Menentukan Kelangsungan Blog ini
EmoticonEmoticon