Bpk pakai Acc 2003, berarti Microsoft Office 11.0 Object Library, coba Bpk klik tools -> references, pastikan yg Bpk centang adalah:
- Visual Basic for Applications - Microsoft Access 11.0 Object Library - OLE Automation - Microsoft Office 11.0 Object Library Thank's ----- Original Message ----- From: "Cecep W" <[email protected]> To: <[email protected]> Sent: Monday, 01 March 2010 11:58 AM Subject: [belajar-access] Re: Me-non active-kan beberapa menu bar saya pake access 2003 dan Microsoft Office 11.0 Object Library -nya sudah ada dan sudah dicentang saya sudah coba buat command button dan saya masukan procedure yg mas BO sarankan tapi tetap saja setelah CBarTool As....tidak ada "CommandBar" kemudian saya ketik saja dan hasilnya error seperti yg sudah saya sebutkan. Mungkinkah saya harus menambahkan Microsoft Office 12.0 Object Library? tapi saya ga tau caranya. Regards CW ----- Original Message ----- From: "Belajar Office" <[email protected]> To: [email protected] Date: 1 Maret 2010 11:18 Subject: Me-non active-kan beberapa menu bar > > Betul Bpk, barangkali ada langkah2 yg kurang, jadi yg pertama Bpk harus > tambahkan Microsoft Office 11.0 Object Library di references dulu. Kalau > Bpk pakai 2007, pilih Microsoft Office 12.0 Object Library. Lalu Bpk buat > form baru utk coba2, tambahkan command button, tambahkan procedurenya, > misal: > > Private Sub Command1_Click() > Dim CBarTool As CommandBar > Set CBarTool = CommandBars("CustomMenuBar") > 'Kalau menunya langsung, seperti menu File: > CBarTool.Controls("Custom1").Enabled = False > 'Kalau menunya dibawah, seperti menu File -> Print: > CBarTool.Controls("New Menu1").Controls("Custom2").Enabled = False > 'Kalau menunya dibawah terus ada lagi kekanannya, seperti menu File -> > Send -> Email: > CBarTool.Controls("New Menu1").Controls("New > Menu2").Controls("Custom3").Enabled = False > End Sub > > Thank's > ----- Original Message ----- > From: Cecep W > To: [email protected] > - Perlihatkan kutipan teks - > > ------------------------------------ SPAM IS PROHIBITEDYahoo! Groups Links ------------------------------------ SPAM IS PROHIBITEDYahoo! Groups Links <*> To visit your group on the web, go to: http://groups.yahoo.com/group/belajar-access/ <*> Your email settings: Individual Email | Traditional <*> To change settings online go to: http://groups.yahoo.com/group/belajar-access/join (Yahoo! ID required) <*> To change settings via email: [email protected] [email protected] <*> To unsubscribe from this group, send an email to: [email protected] <*> Your use of Yahoo! Groups is subject to: http://docs.yahoo.com/info/terms/
