[RESOLVED] Excel VBA Add-in

I'm trying to write my first add-in for VBA. I have this code and it runs without error. Stepping through it the second time cbrWiz is not Nothing which says that it exists, but i don't see it either time in the VBA IDE. What's wrong?

Code:

---

Private Sub Workbook_Open()

Const CBR_INSERT As String = "Insert Info Wizard"
Const CTL_INSERT As String = "Insert Info"

  Dim cbrWiz      As CommandBar
  Dim ctlInsert    As CommandBarButton
  On Error Resume Next
  ' Determine whether command bar already exists.
  Set cbrWiz = Application.CommandBars(CBR_INSERT)
  ' If command bar does not exist, create it.
  If cbrWiz Is Nothing Then
      Err.Clear
      Set cbrWiz = Application.CommandBars.Add(CBR_INSERT) '.Controls.Add(Type:=msoControlPopup)
      ' Make command bar visible.
      cbrWiz.Visible = True
      ' Add button control.
      Set ctlInsert = cbrWiz.Controls.Add
      With ctlInsert
        .Style = msoButtonCaption
        .Caption = CTL_INSERT
        .Tag = CTL_INSERT
        ' Specify procedure that will run when button is clicked.
        '.OnAction = "ShowForm"
      End With

      ' Make sure the existing commandbar is visible
      cbrWiz.Visible = True
  End If
End Sub

---

Okay, mistake number 1. I want to make an add-in for the VBA IDE but the above shows up in the Add-ins tab of the workbook.

afaik you would need to make a vba addin same way as a vb6 addin, from vb6 or vb.net