Re: [Programmer-VB] Tanya dong gmana cara create file Excel dari VB ?

[PSN - Sukamandang Factory]

Sub BuatExcel()       'Sebelumnya Tambahkan Reference => "Microsoft Excel 9.0 Object Library"     Dim xlApp As Excel.Application     Dim xlBook As Excel.Workbook     Dim xlSheet As Excel.Worksheet         Const sFile = "C:\Test.xls"          Set xlApp = New Excel.Application      Set xlBook = xlApp.Workbooks.Add      Set xlSheet = xlBook.Worksheets(1)          xlApp.Visible = True           xlSheet.Cells(1, 1) = "Ini File Excel"      xlSheet.Cells(2, 1) = "Tulisan ini dibuat Dari VB 6"           xlBook.SaveAs sFile      xlBook.Close      xlApp.Quit           Shell xlApp.Path & "\excel.exe " & sFile, vbMaximizedFocus           Set xlSheet = Nothing      Set xlBook = Nothing      Set xlApp = Nothing End Sub   ===== Referensi Dari Pak Masino Sinaga =====   ----- Original Message ----- From: Arif LukmanHakim To: Programmer-VB@yahoogroups.com Sent: Thursday, June 30, 2005 6:54 PM Subject: [Programmer-VB] Tanya dong gmana cara create file Excel dari VB ? Tanya dong, gimana cara buat file excel pake vb.....? ada ygtau gak ?   thx Do you Yahoo!? Read only the mail you want - Yahoo! Mail SpamGuard. Untuk keluar dari millis ini, kirim email kosong ke: [EMAIL PROTECTED] Untuk keluar dari millis ini, kirim email kosong ke: [EMAIL PROTECTED] YAHOO! GROUPS LINKS  Visit your group "Programmer-VB" on the web.    To unsubscribe from this group, send an email to:  [EMAIL PROTECTED]    Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service.