Целочисленный тип данных VBA | Полное руководство по использованию целочисленного типа данных в VBA

Целое число - это тип данных в VBA, который присваивается любой переменной для хранения целочисленных значений, ограничения или скобка для количества целочисленных переменных, которые могут удерживаться, аналогичны в VBA, как и в других языках, любая переменная определяется как целое число. переменную с помощью оператора или ключевого слова DIM в VBA.

Excel VBA целое число

Типы данных так важны для любого языка программирования, потому что за всем объявлением переменных должно следовать назначение типа данных этим переменным. У нас есть несколько типов данных, с которыми мы можем работать, и каждый тип данных имеет свои преимущества и недостатки. Когда мы объявляем переменные, важно знать подробности о конкретном типе данных. Эта статья посвящена типу данных «Целое число» в VBA. Мы покажем вам полную картину типа данных «Целое число».

Что такое целочисленный тип данных?

Целые числа - это целые числа, которые могут быть положительными, отрицательными и нулем, но не дробными. В контексте VBA «Целое число» - это тип данных, который мы назначаем переменным. Это числовой тип данных, который может содержать целые числа без десятичных разрядов. Целочисленный тип данных 2 байта памяти, что составляет половину типа данных VBA LONG, то есть 4 байта.

Примеры целочисленного типа данных Excel VBA

Ниже приведены примеры целочисленного типа данных VBA.

Вы можете скачать этот шаблон целочисленного типа данных VBA здесь - Шаблон целочисленного типа данных VBA

Пример # 1

Когда мы объявляем переменную, необходимо присвоить ей тип данных и целое число, которое обычно используется всеми пользователями в зависимости от требований.

Как я уже сказал, целое число может содержать только целые числа, а не дробные числа. Выполните следующие шаги, чтобы увидеть пример целочисленного типа данных VBA.

Шаг 1. Объявите переменную как Integer.

Код:

 Sub Integer_Example () Dim k As Integer End Sub 

Шаг 2: присвоить значение 500 переменной «k».

Код:

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

Шаг 3. Покажите значение в окне сообщения VBA.

Код:

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

Когда мы запускаем код с помощью клавиши F5 или вручную, мы видим 500 в окне сообщения.

Пример # 2

Теперь я присвою значение -500 переменной «k».

Код:

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

Запустите этот код вручную или нажмите F5, тогда он также покажет значение -500 в окне сообщения.

Пример # 3

Как я уже сказал, тип данных VBA Integer может содержать только целые числа, а не дробные числа, такие как 25,655 или 47,145.

Однако я попытаюсь присвоить дробный номер целочисленному типу данных VBA. Для примера посмотрите приведенный ниже код.

Код:

 Sub Integer_Example3 () Dim k As Integer k = 85,456 MsgBox k End Sub 

Я присвоил переменной «k» 85,456. Я запущу этот код VBA, чтобы увидеть, каков результат.

  • Он вернул результат как 85, хотя я присвоил значение дробной части. Это из-за того, что VBA округляет дробные числа до ближайшего целого числа.
  • Все дробные числа меньше 0,5 будут округлены до ближайшего целого числа. Например, 2.456 = 2, 45.475 = 45.
  • Все дробные числа, превышающие 0,5, будут округлены до ближайшего целого числа. Например, 10,56 = 11, 14,789 = 15.

Чтобы еще раз взглянуть на округленное целое число, допустим, что значение «k» равно 85,58.

Код:

 Sub Integer_Example3 () Dim k As Integer k = 85,58 MsgBox k End Sub 

Когда я запускаю этот код с помощью клавиши F5 или вручную, он вернет 86, потому что все, что больше 0,5, будет округлено до следующего целого числа.

Ограничения целочисленного типа данных в Excel VBA

Ошибка переполнения: Целочисленный тип данных должен работать нормально, пока назначенное значение находится в диапазоне от -32768 до 32767. В момент пересечения предела с любой стороны это вызовет ошибку.

Для примера посмотрите приведенный ниже код.

Код:

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

Я присвоил переменной «k» значение 40000.

Поскольку у меня есть полные знания о целочисленном типе данных, я точно знаю, что он не работает, потому что целочисленный тип данных не может содержать значение, превышающее 32767.

Давайте запустим код вручную или с помощью клавиши F5 и посмотрим, что произойдет.

Ой !!!

Я получил ошибку «Переполнение», потому что тип данных Integer не может содержать ничего, кроме 32767 для положительных чисел и -32768 для отрицательных чисел.

Ошибка несоответствия типа: Целочисленные данные могут содержать только числовые значения от -32768 до 32767. Если любому числу назначено больше, чем эти числа, будет отображаться ошибка переполнения.

Теперь я попробую присвоить ему текстовые или строковые значения. В приведенном ниже примере кода я присвоил значение «Hello».

Код:

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

Я запущу этот код с помощью опции запуска или вручную и посмотрю, что произойдет.

Ошибка отображается как «Несоответствие типа», поскольку мы не можем присвоить текстовое значение переменной «целочисленный тип данных».