OK gan, kali ini ane mau ngebahas cara membuat laporan atau mencetak laporan dalam bentuk excel.
langsung aja gan...
langkah ke 1:
buka dulu tampilan kerja visual basic nya (windows form app )
simpan dengan nama laporan excel
langkah ke 2:
untuk mengaktifkan objek ms excel di vb, kita harus menambahkan Reference Object Microsoft.Office.Interop.Excel
langkah ke 3 :
buat design formnya seperti gambar berikut




langkah 4:
tulis codingannya gan, berikut adalah view code dari project kali ini


Imports Excel = Microsoft.Office.Interop.Excel
Public Class Form1
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles excel.Click
        Dim excel_App As Excel.Application
        Dim excel_WorkBook As Excel.Workbook
        Dim exel_WorkSheet As Excel.Worksheet
        Dim misValue As Object = System.Reflection.Missing.Value
        excel_App = New Excel.Application
        excel_WorkBook = excel_App.Workbooks.Add(misValue)
        exel_WorkSheet = excel_WorkBook.Sheets("sheet1")
        exel_WorkSheet.Cells(1, 1) = "selamat bos anda berhasil"
        exel_WorkSheet.SaveAs("E:\latihan visual studio\vbexcel.xlsx")
        excel_WorkBook.Close()
        excel_App.Quit()
        If MsgBox("file excel sukses di cetak, silahkan cek file tersebut di drive E:\latihan visual studio", MsgBoxStyle.OkOnly) = MsgBoxResult.Ok Then
            End
        End If
    End Sub
End Class



langkah ke 5:
jalankan (run) aplikasi tersebut dan klik tombol Cetak Dokumen Excel setelah program dijalankan
hasil dari proses tersebut adalah aplikasi akan mencetak dokumen Ms Excel dan file tersebut dapat dilihat dari lokasi data yang anda buat gan




selamat mencoba gan

















0 comments:

Post a Comment

 
Cyber Code © 2014. All Rights Reserved. Powered by Blogger
Top