Esconde Botões de Comandos

Boas Uilson, parabéns pelo trabalho, está com um visual bastante agradável

Deixarei aqui outras formas de se fazer isto tambem

Marcando uma TAG com a Letra A por exemplo tambem se esconde/exibe:

Sub TControlFunc()
On Error Resume Next
Dim TControle As Control
For Each TControle In Me.Controls
If TControle.Tag = "A" Then
If TControle.Enabled = False Then
TControle.Enabled = True
Else
TControle.Enabled = False
End If

ou ainda assim.. neste caso pode selecionar o tipo de controle...

Private Sub Comando10_Click()
Dim ctl As Control

'Dicas para os controles
For Each ctl In Me.Controls
' Percorre todos os tipos de controles
 Select Case ctl.ControlType
    Case acTextBox ', acComboBox, acListBox, acOptionGroup, acCheckBox
        MsgBox ctl.Name  'Aqui vai a sua instrução para a textBox...Nesta está colocando o nome em uma msgBox
    End Select
Next ctl
End Sub

Para enriquecer mais este tópico.

Abraços.