Suplementos

Suplementos em VBA Excel

Este repositório de Suplementos em VBA Excel foi desenvolvido com a finalidade de otimizar algumas tarefas rotineiras ao manusear planilhas. Novas funcionalidades serão integradas a este arquivo ao longo do tempo.

No arquivo Suplementos estão até o momento as seguintes macros:

Erros (Macro utilizada para colorir as células seleciondas com erros em vermelho)
Maiúsculas (Macro utilizada para converter o valor das células selecionadas em maiúsculas)
Minúsculas (Macro utilizada para converter o valor das células selecionadas em minúsculas)

Requisitos

Habilitar Macros
Habilitar Guia de Desenvolvedor

Referências às Bibliotecas

Visual Basic For Applications
Microsoft Excel 16.0 Object Library
OLE Automation
Microsoft Office 16.0 Object Library

Compatibilidade

Este arquivo de Suplementos foi desenvolvido no Excel 2019 (64 bits). Sua compatibilidade é garantida para a versão 2007 e superiores. Sua utilização em versões anteriores pode ocasionar em não funcionamento do mesmo.

Usabilidade

Para utilizar os Suplementos o usuário deverá:

Realizar o download do arquivo ZIP: Suplementos.
Salvar o arquivo Suplementos.xlam em qualquer pasta de trabalho de sua preferência.
Abrir o Microsoft Excel.
Habilitar as Macros e a Guia de Desenvolvedor.

O usuário poderá fixar o ícone de cada macro na Barra de Ferramentas de Acesso Rápido, para utilizar o suplemento.

Clicar com o botão direito do mouse sobre a Barra de Ferramentas de Acesso Rápido.
Clicar na opção Personalizar Barra de Ferramentas de Acesso Rápido.

Aparecerá a caixa Opções do Excel, nesta caixa o usuário deverá selecionar Macros no menu Escolher comandos em.

Em seguida o usuário poderá adicionar os ícones das respectivas macros a Barra de Ferramentas de Acesso Rápido.

Após selecionar as macros que deseja utilizar, o usuário deverá configurar o Excel para que o arquivo Suplementos inicialize junto com o Excel. Para isto é necessário:

Clicar em Guia de Desenvolvedor.
Clicar em Suplementos do Excel.
Na caixa de Suplementos o usuário precisará Procurar o diretório em que o arquivo Suplementos está salvo.
Após localizar o arquivo o usuário deverá marcá-lo e confirmar com OK para que o arquivo Suplementos seja inicializado junto com o Excel.

Exemplos de Macros Utilizadas

Macro utilizada para colorir as células seleciondas com erros em vermelho.

Sub Erros()
    On Error Resume Next
    Selection.SpecialCells(xlCellTypeConstants, 16).Interior.Color = 255
End Sub

Macro utilizada para converter o valor das células selecionadas em maiúsculas.

Sub Maiúsculas()
    Dim iCell As Range
        On Error Resume Next
        For Each iCell In Selection
            iCell = UCase(iCell)
        Next iCell
End Sub

Macro utilizada para converter o valor das células selecionadas em minúsculas.

Sub Minúsculas()
    Dim iCell As Range
        On Error Resume Next
        For Each iCell In Selection
            iCell = LCase(iCell)
        Next iCell
End Sub