Re: [belajar-access] TransferSpreadsheet acExport utk worksheet yg ter-protect

waduh mas. hendra mungkin cara saya agak ribet nich...tp siapa tahu para suhu ada yang lebih simple..caranya sbb: pertama pake rumus export biasa spt ini: DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9, "Bkup_Ctrl", "G:\Stuff.xls", True   kedua secara program kita buka lagi file excelnya, baru kita kasih protect/password sheetnya spt ini: Dim oxl As Object Dim oexcel As Object Dim sfullpath As String Dim spath As String Set oxl = CreateObject("excel.application") sfullpath = "G:\Stuff.xls"     With oxl         .Visible = False         .Workbooks.Open (sfullpath)         For I = 1 To .Sheets.Count             nmsheet = .Sheets(I).Name             .Sheets(nmsheet).Protect ("cobaaja")         Next I     End With         oxl.Save     oxl.Quit silahkan disesuaikan dengan kebutuhan mas. h endra salam Nurhasim Hasan --- On Mon, 21/3/11, Hendra Agestha Hamid <the_agestha@yahoo.com> wrote: From: Hendra Agestha Hamid <the_agestha@yahoo.com> Subject: [belajar-access] TransferSpreadsheet acExport utk worksheet yg ter-protect To: belajar-access@yahoogroups.com Received: Monday, 21 March, 2011, 8:58 PM   Dear warga milis,... Bagaimana caranya kita melakukan TransferSpreadsheet acExport tapi worksheet di excel tsb kita set terprotect dgn sebuah password..? Terima kasih Regards Hendra

 

__._,_.___

SPAM IS PROHIBITED

Your email settings: Individual Email|Traditional
Change settings via the Web (Yahoo! ID required)
Change settings via email: Switch delivery to Daily Digest | Switch to Fully Featured
Visit Your Group | Yahoo! Groups Terms of Use | Unsubscribe

__,_._,___