Habilitar e desabilitar items do menu personalizado MSACCESS 2003

Private Sub Form_Close()
On Error GoTo m

'Menu Cadastros --------------------------------------------------------------------
'Para atualizar chec box
DoCmd.RunCommand acCmdRefresh
DoCmd.RunCommand acCmdRefreshPage

'Para habilitar item do menu
If Me.Liberado1 = True Then
Me.Application.CommandBars("Nome da barra de menu personalizada").Controls(1).Controls(1).Controls(1).Enabled = True
End If

'Para desabilitar item do menu
If Me.Liberado1 = False Then
Me.Application.CommandBars("Nome da barra de menu personalizada").Controls(1).Controls(1).Controls(1).Enabled = False
End If
'Obs habilita ou desabilita o primeiro item da barra de menu cadastro
'Breve estarei postando projeto completo para download
m:
End Sub

Boa noite Alexandre


Assim como estou a usar, a Barra de menu versão 2003 fica toda bloqueada.
CommandBars("Painel").enabled = False 

Pergunto:

Se eu fizer assim o primeiro boão da barra fica Bloqueado ?
CommandBars("Painel").Controls(1).Enabled = False

Obrigado

Bom dia, Assis
Apenas procurei ajuda para o Amigo Piloto, não trabalho com este tipo de código
Para a minha necessidade, trabalho em 2007 com Ribbons
Sobre a tua pergunta, testa e verifica se funciona ou se o 1º botão tem índice 0
Bom Domingo

Bom dia Alexandre

CommandBars("Painel").Controls(1).Enabled = False ----- Bloqueia o primeiro Botão 

CommandBars("Painel").Controls(2).Enabled = False ----- Bloqueia o segundo Botão.... e por ai fora


Obrigado pela dica  



Bom domingo.

Alexandre
Não coloquei resolvido porque tópico inicial não era meu

Desculpa, foi lapso meu, apesar de saber que costumas cumprir
Abraço,