Un entier est un type de données dans VBA qui est donné à n'importe quelle variable pour contenir des valeurs entières, les limitations ou le crochet pour le nombre d'une variable entière peut contenir est similaire dans VBA à ceux des autres langues, toute variable est définie comme un entier variable à l'aide de l'instruction DIM ou du mot clé dans VBA.
Entier Excel VBA
Les types de données sont si importants dans n'importe quel langage de codage car toute la déclaration de variable doit être suivie du type de données assigné à ces variables. Nous avons plusieurs types de données avec lesquels travailler et chaque type de données a ses propres avantages et inconvénients qui lui sont associés. Lorsque nous déclarons des variables, il est important de connaître les détails du type de données particulier. Il s'agit de l'article dédié au type de données «Integer» en VBA. Nous allons vous montrer l'image complète du type de données «Integer».
Quel est le type de données entier?
Les entiers sont des nombres entiers qui peuvent être positifs, négatifs et zéro, mais pas un nombre fractionnaire. Dans le contexte VBA, «Integer» est un type de données que nous attribuons aux variables. C'est un type de données numériques qui peut contenir des nombres entiers sans décimales. Type de données entier 2 octets de stockage qui est la moitié du type de données VBA LONG soit 4 octets.
Exemples de type de données entier Excel VBA
Vous trouverez ci-dessous les exemples du type de données VBA Integer.
Vous pouvez télécharger ce modèle de type de données entier VBA ici - Modèle de type de données entier VBAExemple 1
Lorsque nous déclarons une variable, il est nécessaire de lui attribuer un type de données et d'entier l'un d'entre eux qui est couramment utilisé par tous les utilisateurs en fonction des exigences.
Comme je l'ai dit, l'entier ne peut contenir que des nombres entiers, pas de nombres fractionnaires. Suivez les étapes ci-dessous pour voir l'exemple d'un type de données entier VBA.
Étape 1: Déclarez la variable comme un entier.
Code:
Sub Integer_Example () Dim k As Integer End Sub
Étape 2: Attribuez la valeur 500 à la variable «k».
Code:
Sub Integer_Example1 () Dim k As Integer k = 500 End Sub
Étape 3: affichez la valeur dans la boîte de message VBA.
Code:
Sub Integer_Example1 () Dim k As Integer k = 500 MsgBox k End Sub
Lorsque nous exécutons le code à l'aide de la touche F5 ou manuellement, nous pouvons voir 500 dans la boîte de message.
Exemple # 2
Je vais maintenant attribuer la valeur -500 à la variable «k».
Code:
Sub Integer_Example2 () Dim k As Integer k = -500 MsgBox k End Sub
Exécutez ce code manuellement ou appuyez sur F5 puis, il affichera également la valeur -500 dans la boîte de message.
Exemple # 3
Comme je l'ai dit, le type de données VBA Integer ne peut contenir que des nombres entiers et non des nombres de fraction comme 25,655 ou 47,145.
Cependant, j'essaierai d'attribuer le nombre de fraction à un type de données VBA Integer. Pour un exemple, regardez le code ci-dessous.
Code:
Sub Integer_Example3 () Dim k As Integer k = 85,456 MsgBox k End Sub
J'ai attribué 85,456 à la variable «k». Je vais exécuter ce code VBA pour voir quel est le résultat.
- Il a renvoyé le résultat comme 85 même si j'ai attribué la valeur du nombre de fraction. Cela est dû au fait que VBA arrondit les nombres de fraction à l'entier le plus proche.
- Tous les nombres de fractions inférieurs à 0,5 seront arrondis à l'entier inférieur le plus proche. Pour un exemple 2.456 = 2, 45.475 = 45.
- Tous les nombres de fractions supérieurs à 0,5 seront arrondis à l'entier supérieur le plus proche. Pour un exemple 10,56 = 11, 14,789 = 15.
Pour jeter un autre regard sur l'entier arrondi, la valeur de «k» est 85,58.
Code:
Sub Integer_Example3 () Dim k As Integer k = 85,58 MsgBox k End Sub
Lorsque j'exécute ce code à l'aide de la touche F5 ou manuellement, il renvoie 86 car tout ce qui est supérieur à 0,5 sera arrondi au nombre entier suivant.
Limitations du type de données entier dans Excel VBA
Erreur de dépassement de capacité: le type de données Integer devrait fonctionner correctement tant que la valeur attribuée est comprise entre -32768 et 32767. Au moment où il franchit la limite de chaque côté, il vous causera une erreur.
Pour un exemple, regardez le code ci-dessous.
Code:
Sub Integer_Example4 () Dim k As Integer k = 40000 MsgBox k End Sub
J'ai attribué la valeur de 40000 à la variable «k».
Puisque j'ai une connaissance complète du type de données entier, je sais que cela ne fonctionne pas car le type de données entier ne peut pas contenir plus de 32767.
Exécutons le code manuellement ou via la touche F5 et voyons ce qui se passe.
Oups !!!
J'ai eu l'erreur «Overflow» car le type de données Integer ne peut contenir rien de plus que 32767 pour les nombres positifs et -32768 pour les nombres négatifs.
Erreur de non-concordance de type: les données entières ne peuvent contenir que des valeurs numériques comprises entre -32768 et 32767. Si un nombre attribué plus que ces nombres affichera une erreur de dépassement de capacité.
Maintenant, je vais essayer de lui attribuer des valeurs de texte ou de chaîne. Dans l'exemple de code ci-dessous, j'ai attribué la valeur «Bonjour».
Code:
Sub Integer_Example4 () Dim k As Integer k = "Hello" MsgBox k End Sub
Je vais exécuter ce code via l'option d'exécution ou manuellement et voir ce qui se passe.
Il affiche l'erreur comme "Type non concordant" car nous ne pouvons pas attribuer une valeur de texte à la variable "type de données entier".
