VBA Inteiro

Um inteiro é um tipo de dados em VBA que é dado a qualquer variável para conter valores inteiros, as limitações ou o colchete para o número de uma variável inteira pode conter é semelhante em VBA a de outras linguagens, qualquer variável é definida como um inteiro variável usando a instrução DIM ou palavra-chave em VBA.

Excel VBA Inteiro

Os tipos de dados são tão importantes em qualquer linguagem de codificação porque todas as declarações de variáveis ​​devem ser seguidas pela atribuição de tipo de dados a essas variáveis. Temos vários tipos de dados com os quais trabalhar e cada tipo de dados tem suas próprias vantagens e desvantagens associadas a ele. Quando estamos declarando variáveis, é importante saber detalhes sobre o tipo de dados específico. Este é o artigo dedicado ao tipo de dados “Inteiro” em VBA. Mostraremos a imagem completa do tipo de dados “Inteiro”.

Qual é o tipo de dados inteiro?

Os inteiros são números inteiros que podem ser positivos, negativos e zero, mas não um número fracionário. No contexto do VBA, “Integer” é um tipo de dados que atribuímos às variáveis. É um tipo de dado numérico que pode conter números inteiros sem casas decimais. Tipo de dados inteiro 2 bytes de armazenamento que é metade do tipo de dados VBA LONG, ou seja, 4 bytes.

Exemplos de tipo de dados inteiro VBA do Excel

Abaixo estão os exemplos do tipo de dados VBA Integer.

Você pode baixar este modelo de tipo de dados VBA inteiro aqui - modelo de tipo de dados inteiro VBA

Exemplo 1

Quando declaramos uma variável é necessário atribuir um tipo de dado a ela e um inteiro deles, o qual é comumente usado por todos os usuários com base nos requisitos.

Como eu disse, o inteiro só pode conter números inteiros, não quaisquer números fracionários. Siga as etapas abaixo para ver o exemplo de um tipo de dados inteiro VBA.

Etapa 1: Declare a variável como Inteiro.

Código:

 Sub Integer_Example () Dim k As Integer End Sub 

Passo 2: Atribua o valor de 500 à variável “k”.

Código:

 Sub Integer_Example1 () Dim k As Integer k = 500 End Sub 

Etapa 3: Mostrar o valor na caixa de mensagem do VBA.

Código:

 Sub Integer_Example1 () Dim k As Integer k = 500 MsgBox k End Sub 

Quando executamos o código usando a tecla F5 ou manualmente, podemos ver 500 na caixa de mensagem.

Exemplo # 2

Agora atribuirei o valor de -500 à variável “k”.

Código:

 Sub Integer_Example2 () Dim k As Integer k = -500 MsgBox k End Sub 

Execute este código manualmente ou pressione F5 então, ele também mostrará o valor de -500 na caixa de mensagem.

Exemplo # 3

Como eu disse ao VBA, o tipo de dados Integer pode conter apenas números inteiros, não números fracionários como 25.655 ou 47.145.

No entanto, tentarei atribuir o número da fração a um tipo de dados VBA Integer. Para obter um exemplo, veja o código abaixo.

Código:

 Sub Integer_Example3 () Dim k As Integer k = 85.456 MsgBox k End Sub 

Atribuí 85.456 à variável “k”. Vou rodar este código VBA para ver qual é o resultado.

  • Ele retornou o resultado como 85, embora eu tenha atribuído o valor do número da fração. Isso ocorre porque o VBA arredonda os números da fração para o inteiro mais próximo.
  • Todos os números fracionários menores que 0,5 serão arredondados para o número inteiro mais próximo. Por exemplo, 2,456 = 2, 45,475 = 45.
  • Todos os números fracionários maiores que 0,5 serão arredondados para o número inteiro mais próximo. Por exemplo, 10,56 = 11, 14,789 = 15.

Para dar outra olhada no número inteiro arredondado, o valor de “k” é 85,58.

Código:

 Sub Integer_Example3 () Dim k As Integer k = 85.58 MsgBox k End Sub 

Quando executo este código usando a tecla F5 ou manualmente, ele retornará 86 porque qualquer coisa acima de 0,5 será arredondado para o próximo número inteiro.

Limitações do tipo de dados inteiro no Excel VBA

Erro de estouro: o tipo de dados inteiro deve funcionar bem, desde que o valor atribuído esteja entre -32768 a 32767. No momento em que ultrapassar o limite em um dos lados, ocorrerá um erro.

Para obter um exemplo, veja o código abaixo.

Código:

 Sub Integer_Example4 () Dim k As Integer k = 40000 MsgBox k End Sub 

Atribuí o valor de 40000 à variável “k”.

Como tenho conhecimento completo sobre tipo de dados inteiros, com certeza sei que não funciona porque o tipo de dados inteiros não pode conter o valor mais do que 32767.

Vamos rodar o código manualmente ou através da tecla F5 e ver o que acontece.

Opa !!!

Recebi o erro como “Overflow” porque o tipo de dados Integer não pode conter nada mais do que 32767 para números positivos e -32768 para números negativos.

Erro de incompatibilidade de tipo: dados inteiros podem conter apenas valores numéricos entre -32768 a 32767. Se qualquer número atribuído a mais do que esses números mostrará erro de estouro.

Agora tentarei atribuir valores de texto ou string a ele. No código de exemplo a seguir, atribuí o valor como “Hello”.

Código:

 Sub Integer_Example4 () Dim k As Integer k = "Olá" MsgBox k End Sub 

Vou rodar esse código por meio da opção run ou manualmente e ver o que acontece.

Ele está mostrando o erro como “Tipo incompatível” porque não podemos atribuir um valor de texto à variável “tipo de dados inteiro”.