VBA Enum

Enum é abreviado como enumeração. É um processo no qual mencionamos algo um por um. Da mesma forma, temos enumerações em todas as linguagens de programação, seja JAVA, C ou Excel VBA. No VBA, temos algumas enumerações embutidas que começam com o VB, como o VBnewLine é usado para inserir uma nova linha. É uma enumeração. No Excel VBA, também podemos criar nossas próprias enumerações personalizadas.

No VBA, o Enum é na verdade uma variável como número inteiro ou string e outros. Podemos fazer uma lista de elementos no VBA e usar as variáveis. Enums são feitos para tornar as coisas mais fáceis de usar ou fáceis de encontrar. Por exemplo, para uma empresa de motos como a enumeração Bajaj, haverá uma lista de motos que produzem, como pulsar, Avenger, dominar etc. A única coisa que precisamos ter em mente é que enum é como uma variável numérica que pode ser usada como uma representação de uma interpretação. Também há outra maneira de usar mensagens de status usando constante, mas elas podem ser cansativas porque não são agrupadas e são fornecidas com todas as outras variáveis ​​enumeradas do VBA. Mas, com o uso do VBA ENUM, podemos agrupar nossas enumerações em um grupo e usá-las sempre que quisermos.

Sintaxe de Enum no Excel VBA

A sintaxe para usar ENUM no Excel VBA é a seguinte:

 Enumeração EnumName EnumValue (= LongValue) EnumValue (= LongValue) ((_EnumValue)) (= LongValue) End Enum

É importante lembrar que os valores especificados em ENUM devem ter valores específicos, mas se não fornecermos nenhum valor, o VBA fornecerá automaticamente o primeiro valor de enumeração como 0 e o próximo como 1 e assim por diante.

Então, como eu disse acima, sobre uma empresa de motos que fabrica bicicletas, a enumeração será a seguinte.

 ENUM Bikes Pulsar Avenger = 4 Dominar End ENUM

Agora, no enum de amostra acima, designei valores apenas ao Avenger, portanto, por padrão, o pulsar é zero e o dominar é 5, pois o valor da lista anterior era 4. É assim que os valores são atribuídos aos valores ENUM.

Primeiro, vamos entender por que as enumerações são importantes no VBA. Passaremos para exemplos de como fazer enumerações personalizadas no VBA.

Para uma demonstração no código VBA, tente se referir à célula A1 e assim que usarmos o operador de ponto, podemos ver que muitas outras enumerações são exibidas, o que pode ou não ser necessário para nós. Dê uma olhada na captura de tela abaixo.

Podemos ver que, na captura de tela acima, existem muitas enumerações a partir de A. Essas são enumerações embutidas do VBA.

Agora vamos aprender como fazer enumerações personalizadas no VBA com alguns exemplos de nós mesmos.

Nota: Para usar o Excel VBA, verifique se a guia do desenvolvedor está ativada na guia arquivos e na seção de opções.

Como fazer enumerações personalizadas no Excel VBA

Aprenderemos como criar enumerações personalizadas (Enum) com alguns exemplos no Excel VBA.

Você pode fazer o download deste modelo do VBA Enum Excel aqui - Modelo do VBA Enum Excel

Excel VBA Enum - Exemplo # 1

Vamos fazer uma enumeração muito simples primeiro. Neste exemplo, definiremos os cumprimentos do dia como alguns números e os exibiremos como uma mensagem personalizada.

Siga as etapas abaixo para usar o VBA Enum:

Etapa 1: na guia do desenvolvedor, clique em Visual Basic para abrir o VB Editor.

Etapa 2: Insira um novo módulo na guia Inserir no Editor de VB.

Etapa 3: declarar a função Enum com um nome de enum.

Código:

 Enum Greetings End Enum

Etapa 4: declarar os valores de enum da seguinte maneira,

Código:

 Saudações Enum Manhã = 1 Tarde = 2 Tarde = 3 Noite = 4 Fim Enum

Etapa 5: Agora declare uma subfunção abaixo da função enum para usá-la.

Código:

 Saudações Enum Manhã = 1 Tarde = 2 Tarde = 3 Noite = 4 Fim Enum Sub UseEnum () End Sub

Etapa 6: Exiba uma mensagem personalizada usando a função msgbox.

Código:

 Saudações do Enum Manhã = 1 Tarde = 2 Tarde = 3 Noite = 4 Fim Enum Sub UseEnum () MsgBox "Greeting Number" End Sub

Etapa 7: para exibir o número da saudação, usamos a enumeração da seguinte maneira:

Código:

 Saudações Enum Manhã = 1 Tarde = 2 Noite = 3 Noite = 4 Fim Enum Sub UseEnum () MsgBox "Número da Saudação" e Saudações. End Sub

Etapa 8: escolha qualquer um dos valores de saudação da seguinte maneira.

Código:

 Saudações Enum Manhã = 1 Tarde = 2 Noite = 3 Noite = 4 Fim Enum Sub UseEnum () MsgBox "Número de Saudação" e Saudações. Fim da Tarde Sub

Etapa 9: uma vez concluído, compile e execute o código completo clicando no botão play, localizado logo abaixo da barra de menus. Quando executamos o código, vemos o seguinte resultado.

Foi muito fácil criar uma enumeração e usá-las, isso fica claro no exemplo acima.

Excel VBA Enum - Exemplo # 2

Agora, neste exemplo, vamos usar a enumeração para armazenar os dados em uma planilha do Excel. Usaremos o exemplo de motos usadas na seção de introdução.

Temos algum tipo de cálculo pré-escrito na folha 1 da seguinte maneira.

Nós preencheremos as células de uma contagem de motos usando enumerações e que calcularão o custo total dessas motos.

Para isso, siga as etapas abaixo para usar o VBA Enum:

Etapa 1: Vá para a guia do desenvolvedor e clique em Visual Basic para abrir o VB Editor.

Etapa 2: Insira um novo módulo na guia Inserir no Editor de VB.

Etapa 3: declarar a função enum como motos.

Código:

 Enum Motos End Enum

Etapa 4: declarar a lista de enum da seguinte maneira,

Código:

 Enum Pulsar para Motos = 20 Vingador = 15 Dominar = 10 Platina = 25 Enum Final

Etapa 5: Agora declare uma sub-função para usar essas enumerações.

Código:

 Enum Motos Pulsar = 20 Vingador = 15 Dominar = 10 Platina = 25 Fim Enum Sub TotalCalculation () End Sub

Etapa 6: sabemos que, para usar as propriedades da planilha 1, precisamos ativar a planilha primeiro pelo código a seguir.

Código:

 Pulsar de moto Enum = 20 Avenger = 15 Dominar = 10 platina = 25 End Enum Sub TotalCalculation () Planilhas ("Plan1"). Ativar End Sub

Etapa 7: agora atribua os valores da célula usando a enumeração da seguinte maneira:

Código:

 Pulsar Enum para motocicletas = 20 Vingador = 15 Dominar = 10 Platina = 25 End Enum Sub TotalCalculation () Planilhas ("Sheet1"). Ativar Range ("B2"). Valor = Motocicletas. .Valor do passageiro ("B4"). Valor = motocicletas.Valor do encontro ("B5"). Valor = motocicletas.Platina End Sub

Etapa 8: execute o código acima com o botão executar ou pressione F5 e veja o seguinte resultado na folha 1.

Podemos ver no exemplo acima que adicionamos valores às células usando a enumeração VBA.

Agora, pelos exemplos acima, é muito claro para nós o que é um ENUM no VBA. ENUM é uma variável numérica no VBA que é usada para criar dados e fazer referência a valores específicos facilmente. No Enum, agrupamos as mensagens para que possam ser usadas com eficiência.

Coisas para lembrar

  • ENUM é uma variável numérica que pode ser personalizada, mas também é incorporada no VBA.
  • Se não atribuirmos nenhum valor aos valores ENUM, o VBA atribui valores automaticamente a eles.
  • Para usar as enumerações VBA em nosso código, as referenciamos pelo nome do enum.

Artigos recomendados

Este foi um guia para o VBA Enum. Aqui discutimos como fazer enumerações personalizadas no Excel VBA, juntamente com exemplos práticos e modelo de excel para download. Você também pode consultar nossos outros artigos sugeridos -

  1. Gama VBA | Tutoriais do Excel
  2. Agrupando colunas no Excel
  3. Célula ativa do VBA
  4. Tutorial VLOOKUP no Excel

Categoria:

VBA