saya coba di Access 2003, tapi rasanya sama saja dgn di 2007.
Private Sub Command2_click()
tabel1="i-bank"
tabel2="sms"
tabel3="phone"
filename=C:\e-banking\dbe-bank.xls
DoCmd.TransferSpreadsheet acExport, 8, tabel1, filename, False, tabel1
DoCmd.TransferSpreadsheet acExport, 8, tabel2, filename, False, tabel2
DoCmd.TransferSpreadsheet acExport, 8, tabel3, filename, False, tabel3
End Sub
kalo pake macro:
baris1:
Action : TransferSpreadsheet
Transfer type : Export
Spreedsheet Type : Microsoft Excel 97 - Excel 2003 Workbook
Table Name : i-bank
File Name :c:\e-banking\dbe_bank.xls
Range=i-bank
baris2:
Action : TransferSpreadsheet
Transfer type : Export
Spreedsheet Type : Microsoft Excel 97 - Excel 2003 Workbook
Table Name : sms
File Name :c:\e-banking\dbe_bank.xls
Range=sms
baris3:
Action : TransferSpreadsheet
Transfer type : Export
Spreedsheet Type : Microsoft Excel 97 - Excel 2003 Workbook
Table Name : phone
File Name :c:\e-banking\dbe_bank.xls
Range=phone
salam,
murid access - NRN CL BEW
----- Original Message -----
From: Ari Ferianto
To: [email protected]
Sent: Tuesday, May 05, 2009 19:37
Subject: [belajar-access] Export To Excel
Dear Suhu² Access.
Sebelum saya bertanya, perkenalkan nama saya Ari, dan baru 3 minggu ini
menggunakan Ms. Access 2007.
Saya punya kasus sebagai berikut :
Saya mempunya tabel
- i-bank
- sms
- phone
Keseluruhan tabel tersebut yang telah di input datanya oleh user harus di
export ke Ms. Excel, sampai saat ini saya hanya mampu membuat code untuk export
ke Ms. Excel dengan kondisi 1 tabel untuk satu file Ms. Excel , sedangkan yang
diminta oleh user adalah ke-3 tabel tersebut diatas diexport ke dalam 1 file
excel dengan 3 sheet di dalamnya yaitu sheet : i-bank, sms dan phone.
