Hi, I've created addin with small toolbar and additional subs connected
to buttons. But when I'm opening Excel (2003) and my addin is loaded,
main menu ( File, Edit etc.) is disappearing :( How can i resolve that
problem?

Here is my code for my toolbar in ThisWorkbook:

Private Sub Workbook_BeforeClose(Cancel As Boolean)
DeleteCommandbar
End Sub
Private Sub Workbook_Open()
CreateCommandbar
End Sub
Sub CreateCommandbar()
Const CStCmdBar As String = "Platnosci"
Call DeleteCommandbar
With Application.CommandBars.Add(CStCmdBar, msoBarFloating, True, True)
..Visible = True
..Position = msoBarTop
..RowIndex = Application.CommandBars("Formatting").RowIndex
..Protection = msoBarNoChangeVisible + msoBarNoCustomize + msoBarNoMove
With .Controls
With .Add(msoControlButton) ' first button
..Style = msoButtonIcon
..FaceId = 107
..OnAction = "ThisWorkbook.Listaplat"
..TooltipText = "Lista platnosci"
End With
With .Add(msoControlButton) 'second button
..Style = msoButtonIcon
..FaceId = 144
..TooltipText = "Platnosci"
..OnAction = "ThisWorkbook.Platnosci"
End With
End With
End With
Application.CommandBars("Worksheet Menu Bar").Enabled = True
End Sub
Sub DeleteCommandbar()
On Error Resume Next
CommandBars("Platnosci").Delete
End Sub

Przemek