Panduan Membuat Menu Ribbon Custom di Ms Access 2013
Menu Ribbon sendiri atau Custom sangatlah penting karena biasanya digunakan pada tampilan utama. Setelah membuat Form dan Report dalam pembuatan aplikasi di Ms Access, maka langkah terakhir adalah membuat menu untuk tampilan awal aplikasi kalain. Pembuatan menu ini dapat dilakukan dengan menggunakan Switchboard Manager Ms Access atau Menu Ribbon.
1. Jalankan Aplikasi Access 2013 (atau versi lainnya)
2. Klik kanan pada salah satu ribbon dan pilih Customize Ribbon, atau pilih File -->> Options -->> Customize Ribbon
3. Klik tombol New Tab, pada kolom Customize the Ribbon pilih New Tab (custom) -->> Rename dan pada kotak konfirmasi ganti dengan nama baru misalkan FORM.
4. Sama seperti no.3 pilih New Group (custom) dan gantilah dengan nama lain.
Pada kolom Choose Commands pilih salah satu icon dengan melakukan perintah Drag ke kolom Customize the ribbon.
5. Untuk menambahkan tombol baru di grup ribbon lakukan hal yang sama seperti no.5 dan untuk membuat tab ribbon kedua maka ulangi langkah mulai no.3.
1. Buat tabel dengan nama apapun fungsinya agar dapat dengan mudah untuk mengedit menu Ribbon yang dibuat.
Pada contoh disini saya beri nama table1, dan buatlah strukturnya sebagai berikut:
Id : AutoNumber
RibbonName : Short Text
RibbonXML : Long Text (tipe Memo)
Fungsi tabel ini untuk menyimpan data script dari Ribbon custom tersebut.
2. Buka tabel diatas dan isikan dengan data sebagai berikut:
Perhatikan yang perlu diisi adalah kolom RibbonName misalkan custom1, dan khusus kolom RibbonXML isikan dengan coding dibawah ini:
--- Awal coding ---
<?xml version="1.0" encoding="utf-8"?>
<customUI xmlns="http://schemas.microsoft.com/office/2006/01/customui">
<ribbon startFromScratch="true">
<tabs>
<tab id="tab-1" label="DATA FORM">
<group id="group-1" label="Data" >
<button id="btnBarang" label="Data Barang" imageMso="FileBackupDatabase" size="large" onAction="=BukaForm('f_dataribbon')"/>
<button id="btnPenjualan" label="Data Penjualan" imageMso="FileDocumentInspect" size="large" onAction="=BukaForm('f_data_penjualan')"/>
<button id="btnPembelian" label="Data Pembelian" imageMso="ConvertDatabaseFormat" size="large" onAction="=BukaForm('f_data_pembelian')"/>
</group>
<group id="group-2" label="DATA TRANSAKSI">
<button id="btnJual" label="Transaksi Jual" imageMso="ProposeNewTime" size="large" onAction="=BukaForm('f_jual')"/>
<button id="btnBeli" label="Transaksi Beli" imageMso="ImportMoreMenu" size="large" onAction="=BukaForm('f_beli')"/>
</group>
<group id="group-3" label="DATA REPORT">
<button id="btnRepBarang" label="Report Barang" imageMso="PivotChartType" size="large" onAction="=BukaReport('r_barang')"/>
<button id="btnRepJual" label="Report Jual" imageMso="ProposeNewTime" size="large" onAction="=BukaReport('r_jual')"/>
<button id="btnRepBeli" label="Report Beli" imageMso="ModuleInsert" size="large" onAction="=OpenReport('Report ku')"/>
</group>
</tab>
</tabs>
</ribbon>
</customUI>
--- Akhir coding -->
Keterangan:
Pada onAction="=BukaForm('f_dataribbon') --->> silahkan ganti f_dataribbon dengan nama form kalian yang akan ditampilkan.
3. Sebelum di jalankan maka tekan tombol F11 kemudian klik menu Insert -->> Module dan masukkan coding sebagai berikut:
Option Compare Database
Function BukaForm(strForm as String)
DoCmd.OpenForm strForm, acNormal
End Function
Function BukaReport(strReport As String)
DoCmd.OpenReport strReport, acViewReport
End Function
4. Setelah itu copas Table1 dan ubah namanya menjadi UsysRibbons (silahkan klik kanan pada Table1 -->> pilih copy, dan klik kanan lagi pilih Paste)
5. Langkah terakhir pilih menu File -->> Options -- Current Database dan pada menu Ribbon Name isikan dengan Custom1 (sesuai dengan nama di table1 kolom RibbonName)
6. Tutup aplikasi, dan jalankan kembali maka menu Ribbon akan berubah menjadi :
Jika kalian ingin memodifikasi dari satu menu ribbon menjadi beberapa menu ribbon maka perhatikan script yang dirubah seperti contoh dibawah.
Contoh modifikasi menu ribbon 2 tab yaitu Custom Tab dan Custom Tab1
sebagai berikut:
<customUI xmlns=""http://schemas.microsoft.com/office/2009/07/customui"">
<ribbon startFromScratch=""false"">
<tabs>
<tab id=""customTab"" label=""Custom Tab"">
<group id=""customGroup1"" label=""Custom Group1"">
<button id=""customButton"" label=""FORM JUAL"" imageMso=""icon-gambar-1"" size=""large"" onAction=""openform"" />
</group>
<group id=""customGroup2"" label=""Custom Group2"">
<button id=""customButton1"" label=""FORM BELI"" imageMso=""icon_gambar-2"" size=""large"" onAction=""Callback"" />
</group>
</tab>
<tab id=""customTab1"" label=""Custom Tab1"">
<group id=""customGroup11"" label=""Custom Group11"">
<button id=""customButton11"" label=""FORM JUAL"" imageMso=""logo-icon"" size=""large"" onAction=""openform"" />
</group>
</tab>
</tabs>
</ribbon>
</customUI>
Jika kalian ingin merubah icon yang tampil pada menu ribbon, Silahkan download dahulu icon galery microsoft word, atau yang ada pada microsoft Excel. Pada script imageMso="ganti nama file gambar icon baru".
Pembuatan menu ribbon sendiri sebenarnya dapat kalian buat sendiri dengan menggunakan aplikasi Custom UI Editor for Microsoft Office.
Pembuatan menu Ribbon ini dapat di buat secara otomatis atau menggunakan coding. Jika kalian ingin membuat sendiri menu ribbon dengan aplikasi Custom UI Editor silahkan lihat videonya disini.
Cara Membuat Menu Ribbon Otomatis
Inilah Cara yang mudah dalam membuat menu ribbon secara lengkap sebagai berikut:1. Jalankan Aplikasi Access 2013 (atau versi lainnya)
2. Klik kanan pada salah satu ribbon dan pilih Customize Ribbon, atau pilih File -->> Options -->> Customize Ribbon
4. Sama seperti no.3 pilih New Group (custom) dan gantilah dengan nama lain.
Pada kolom Choose Commands pilih salah satu icon dengan melakukan perintah Drag ke kolom Customize the ribbon.
Membuat Menu Ribbon Sendiri (Custom) dengan Coding
Ikuti langkah-langkah membuat menu ribbon sendiri (custom) dengan coding sebagai berikut:1. Buat tabel dengan nama apapun fungsinya agar dapat dengan mudah untuk mengedit menu Ribbon yang dibuat.
Pada contoh disini saya beri nama table1, dan buatlah strukturnya sebagai berikut:
Id : AutoNumber
RibbonName : Short Text
RibbonXML : Long Text (tipe Memo)
2. Buka tabel diatas dan isikan dengan data sebagai berikut:
--- Awal coding ---
<?xml version="1.0" encoding="utf-8"?>
<customUI xmlns="http://schemas.microsoft.com/office/2006/01/customui">
<ribbon startFromScratch="true">
<tabs>
<tab id="tab-1" label="DATA FORM">
<group id="group-1" label="Data" >
<button id="btnBarang" label="Data Barang" imageMso="FileBackupDatabase" size="large" onAction="=BukaForm('f_dataribbon')"/>
<button id="btnPenjualan" label="Data Penjualan" imageMso="FileDocumentInspect" size="large" onAction="=BukaForm('f_data_penjualan')"/>
<button id="btnPembelian" label="Data Pembelian" imageMso="ConvertDatabaseFormat" size="large" onAction="=BukaForm('f_data_pembelian')"/>
</group>
<group id="group-2" label="DATA TRANSAKSI">
<button id="btnJual" label="Transaksi Jual" imageMso="ProposeNewTime" size="large" onAction="=BukaForm('f_jual')"/>
<button id="btnBeli" label="Transaksi Beli" imageMso="ImportMoreMenu" size="large" onAction="=BukaForm('f_beli')"/>
</group>
<group id="group-3" label="DATA REPORT">
<button id="btnRepBarang" label="Report Barang" imageMso="PivotChartType" size="large" onAction="=BukaReport('r_barang')"/>
<button id="btnRepJual" label="Report Jual" imageMso="ProposeNewTime" size="large" onAction="=BukaReport('r_jual')"/>
<button id="btnRepBeli" label="Report Beli" imageMso="ModuleInsert" size="large" onAction="=OpenReport('Report ku')"/>
</group>
</tab>
</tabs>
</ribbon>
</customUI>
--- Akhir coding -->
Keterangan:
Pada onAction="=BukaForm('f_dataribbon') --->> silahkan ganti f_dataribbon dengan nama form kalian yang akan ditampilkan.
3. Sebelum di jalankan maka tekan tombol F11 kemudian klik menu Insert -->> Module dan masukkan coding sebagai berikut:
Option Compare Database
Function BukaForm(strForm as String)
DoCmd.OpenForm strForm, acNormal
End Function
Function BukaReport(strReport As String)
DoCmd.OpenReport strReport, acViewReport
End Function
6. Tutup aplikasi, dan jalankan kembali maka menu Ribbon akan berubah menjadi :
Jika kalian ingin memodifikasi dari satu menu ribbon menjadi beberapa menu ribbon maka perhatikan script yang dirubah seperti contoh dibawah.
Contoh modifikasi menu ribbon 2 tab yaitu Custom Tab dan Custom Tab1
sebagai berikut:
<customUI xmlns=""http://schemas.microsoft.com/office/2009/07/customui"">
<ribbon startFromScratch=""false"">
<tabs>
<tab id=""customTab"" label=""Custom Tab"">
<group id=""customGroup1"" label=""Custom Group1"">
<button id=""customButton"" label=""FORM JUAL"" imageMso=""icon-gambar-1"" size=""large"" onAction=""openform"" />
</group>
<group id=""customGroup2"" label=""Custom Group2"">
<button id=""customButton1"" label=""FORM BELI"" imageMso=""icon_gambar-2"" size=""large"" onAction=""Callback"" />
</group>
</tab>
<tab id=""customTab1"" label=""Custom Tab1"">
<group id=""customGroup11"" label=""Custom Group11"">
<button id=""customButton11"" label=""FORM JUAL"" imageMso=""logo-icon"" size=""large"" onAction=""openform"" />
</group>
</tab>
</tabs>
</ribbon>
</customUI>
Jika kalian ingin merubah icon yang tampil pada menu ribbon, Silahkan download dahulu icon galery microsoft word, atau yang ada pada microsoft Excel. Pada script imageMso="ganti nama file gambar icon baru".
Pembuatan menu ribbon sendiri sebenarnya dapat kalian buat sendiri dengan menggunakan aplikasi Custom UI Editor for Microsoft Office.
0 Response to "Panduan Membuat Menu Ribbon Custom di Ms Access 2013"
Posting Komentar
Terima kasih sudah membaca di blog BorneoTutorials, Silahkan tinggalkan komentar