Tip berikut ini akan menjelaskan tahapan pembuatan contoh file add-in sederhana yaitu suatu kotak dialog berupa opsi perintah untuk menyembunyikan dan menampilkan semua worksheet Excel secara otomatis.

Ikutilah langkah-langkah berikut ini:

Langkah Pertama: Membuat UserForm


  1. Buka workbook baru dan buka VBE.
  2. Klik menu Insert > UserForm. Apabila panel 'Properties' tidak tampil, tekan tombol F4.
  3. Klik UserForm kemudian beri nama 'contohform' pada panel 'Properties' dan ganti Caption-nya menjadi 'Pengaturan Sheet'.
  4. Buat sebuah Label (Klik Label pada Toolbox) dan isi dengan tulisan 'Silakan pilih:'.
  5. Buat tombol 'Optionbutton' ke-1 pada Toolbox di bawah Label dengan tulisan 'Tampilkan semua sheet' lalu buat lagi tombol 'Optionbutton' ke-2 di bawahnya dengan tulisan 'Sembunyikan semua sheet kecuali yg sdg aktif.'
  6. Klik CommandButton pada Toolbox lalu buat tombol 'OK' dan tombol 'Keluar' atau 'Tutup'.

Langkah Kedua: Memprogram UserForm, Membuat Module Pembuka UserForm dan Menyimpan File Add-In



Double-klik UserForm (contohform) untuk membuka jendela kodenya kemudian tulis kode macro berikut ini:
Private Sub CommandButton1_Click()
Dim X As Integer
Select Case True
Case OptionButton1.Value = True
For X = 1 To Sheets.Count
Sheets(X).Visible = xlSheetVisible
Next X
Case OptionButton2.Value = True
For X = 1 To Sheets.Count
If Sheets(X).Name <> ActiveSheet.Name Then
Sheets(X).Visible = xlSheetHidden
End If
Next X
Case Else
MsgBox "Belum ada opsi yg dipilih.", , "Silakan pilih!"
End Select
End Sub
Private Sub CommandButton2_Click()
Unload Me
End Sub 
Selanjutnya, untuk menampilkan form tersebut diperlukan module untuk membukanya dengan contoh kode macro berikut:
Private Sub PengaturanSheet()
contohform.Show
End Sub 
Buka kembali Excel dan simpan file dengan ekstensi Excel Add-in '.xlam'. Dalam contoh saya menyimpan file dengan nama 'PengaturanSheet.xlam'.

Langkah Terakhir: Pengujian

Sekarang program add-in telah berhasil anda buat dan anda aktifkan dibalik layar (melalui Excel Options > Add-Ins), langkah berikutnya ialah menyediakan akses kepada pengguna untuk menampilkan kegunaan program add-in yang telah anda buat tersebut yakni berupa link yang dapat menampilkan menu kotak dialog 'Pengaturan Sheet'.


Menu tersebut harusnya terdapat pada tab Add-Ins, namun pada versi Excel 2007 yang saya pakai, tab tersebut tidak tampil sehingga diperlukan kode macro di bawah ini untuk ditulis dalam kode 'ThisWorkbook'. Langkah-langkahnya sebagaimana ditunjukkan dalam gambar.
Private Sub Workbook_Open()
Dim XX As CommandBarControl
Set XX = _
Application.CommandBars("Worksheet Menu Bar") _
.Controls("Tools").Controls.Add
With XX
.Caption = "Pengaturan Sheet"
.BeginGroup = True
.OnAction = "PengaturanSheet"
.FaceId = 144
End With
End Sub
Private Sub Workbook_BeforeClose(Cancel As Boolean)
On Error Resume Next
Application.CommandBars("Worksheet Menu Bar") _
.Controls("Tools").Controls("Pengaturan Sheet").Delete
Err.Clear
End Sub 
File Add-in Excel dikenal sebagai file yang sangat unik karena file yang berupa program ini tersembunyi, tidak dapat dibuka atau tidak dapat dilihat seperti halnya workbook biasa dimana sheet-sheet didalamnya dapat anda tampilkan. Pengguna Excel pemula akan lebih mudah menggunakan jenis file ini untuk melakukan suatu aktivitas dalam Excel dengan cara yang sangat cepat dan efisien, cukup dengan membuka file '.xlam' saja.