Se você abriu cada arquivo que acompanha este módulo até este ponto, você deve ter notado que os menus são removidos. É sempre uma boa idéia remover os seus menus personalizados para assegurar que o próximo usuário não tenha uma desagradável surpresa ao tentar utilizar o Excel.

Neste breve tópico mostro as diversas formas de levar isso a cabo. Um exemplo óbvio é o método utilizado até o momento, isto é, utilizar o método Delete do controle em questão para remover o menu.

Por exemplo:

O exemplo acima simplesmente remove a barra de comando “MENU” do aplicativo.

Porém, você terá situações onde deseja remover um controle que foi inserido no menu Ajuda do Excel. Neste caso, o ideal é fazer uma referência ao ID do controle que contém o controle que criamos e, então, remover o controle que desejamos. Observe a figura:

Figure 0‑6

O menu foi inserido utilizando o código:

Para remover o código, podemos fazer o seguinte:

O método acima é um tanto quanto laborioso. A grande vantagem que vejo é o fato de você estar sempre praticando os métodos e fixando o seu conhecimento de VBA. Contudo, nem sempre podemos nos dar a este luxo e o que queremos é realmente um código limpo e curto.

Neste caso, a forma mais prática de se livrar do que você fez é:

Porém, se a forma acima ainda não lhe parece prática por ter que declarar e instanciar o objeto, você pode resolver o problema com uma linha de código apenas:

O que você notará é que o método Reset é mais versátil do que o Delete, principalmente porque o método Reset não resulta em erro se o objeto realmente existe e pode ser “resetado”.

Além disso, você não precisa “resetar” exatamente o objeto onde se encontra o seu controle. Se você “resetar” o objeto pai, todos os controles sob ele serão reiniciados.

Você deve ter notado que na figura acima existe um menu popup do Adobe PDF logo após o menu Ajuda. Ao utilizar a sub-rotina resetMenu2 estou apenas “resetando” o controle de índice 10 na barra de comando 1.

Porém, eu poderia simplesmente “resetar” a barra por completo:

A figura abaixo mostra a barra de menu reiniciada:

Figure 0‑7

Desta vez não só o botão é removido como o menu do Adobe.

Uma outra forma de se remover menus no Excel é manualmente. Se você adicionou apenas um controle e não deseja criar código para removê-lo a melhor forma é utilizar a ferramenta de personalização de menu.

Para tanto, clique em Exibir > Barras de ferramentas > Personalizar. Com a janela de personalização aberta, basta clicar na barra de comando que contém o menu ou no menu que contém o botão, clicar sobre o controle e arrastá-lo para fora do controle principal.