Excel vba только целое число

Access для Microsoft 365 Access 2021 Access 2019 Access 2016 Access 2013 Access 2010 Access 2007 Еще…Меньше

Возвращает целую часть числа.

Синтаксис

Int
(

число

)

Fix(

число

)

Обязательный аргумент числоаргумент представляет собой значение типа Double или любое допустимое числовое выражение. Если число содержит значение NULL, возвращается NULL.

Замечания

Функции Int и Fix удаляют дробную часть числа и возвращают полученное целое значение.

Различие между функциями Int и Fix состоит в том, что при отрицательном значении числа функция Int возвращает первое отрицательное целое число, не превышающее число, а функция Fix — первое отрицательное целое число, которое больше числа или равно ему. Например, функция Int преобразует -8,4 в -9, а Fix преобразует -8,4 в -8.

Функция Fix(число) вычисляется следующим образом:

Sgn(number) * Int(Abs(number))


Примеры запросов


Выражение


Результаты:

SELECT Int([Discount]) AS Expr1 FROM ProductSales;

Удаляет дробную часть всех значений в поле «Скидка» и возвращает итоги для всех значений. Для отрицательных дробей «Int» возвращает первое отрицательное integer, меньшее или равное числу. Например, для значения скидки «-223,20» возвращается значение -224,00.

SELECT Fix([Discount]) AS Expr1 FROM ProductSales;

Удаляет дробную часть всех значений в поле «Скидка» и возвращает итоги для всех значений. Для отрицательных дробей «Исправить» возвращает первое отрицательное integer, большее или равное числу. Например, для значения скидки «-223,20» возвращается значение -223,00.

Пример VBA

Примечание: В примерах ниже показано, как использовать эту функцию в модуле Visual Basic для приложений (VBA). Чтобы получить дополнительные сведения о работе с VBA, выберите Справочник разработчика в раскрывающемся списке рядом с полем Поиск и введите одно или несколько слов в поле поиска.

В данном примере показано, как функции Int и Fix возвращают целые части чисел. Если значением аргумента является отрицательное число, функция Int возвращает первое отрицательное целое число, не превышающее его, а функция Fix — первое отрицательное целое число, которое больше этого значения или равно ему.

Dim MyNumber
MyNumber = Int(99.8)    ' Returns 99.
MyNumber = Fix(99.2)    ' Returns 99.
MyNumber = Int(-99.8)    ' Returns -100.
MyNumber = Fix(-99.8)    ' Returns -99.
MyNumber = Int(-99.2)    ' Returns -100.
MyNumber = Fix(-99.2)    ' Returns -99.

Нужна дополнительная помощь?

Источник

Возвращение целой части дробного десятичного числа с помощью функций Int и Fix в VBA Excel. Синтаксис, правила округления, примеры.

Int – это функция, которая удаляет дробную часть исходного числа и возвращает целое число меньшее или равное исходному числу.

Синтаксис:

Функция Fix

Fix – это функция, которая удаляет дробную часть исходного числа и возвращает, если число положительное, целое число меньшее или равное исходному числу или, если число отрицательное, целое число большее или равное исходному числу.

Другими словами, функция Fix просто отбрасывает дробную часть исходного числа, возвращая целую часть без каких-либо преобразований (смотрите примеры).

Синтаксис:

Примеры

Сходство и различие функций Int и Fix на примерах:

MsgBox Int(9.1) ‘Результат: 9

MsgBox Fix(9.1) ‘Результат: 9

MsgBox Int(9.9) ‘Результат: 9

MsgBox Fix(9.9) ‘Результат: 9

MsgBox Int(—9.1) ‘Результат: -10

MsgBox Fix(—9.1) ‘Результат: -9

MsgBox Int(—9.9) ‘Результат: -10

MsgBox Fix(—9.9) ‘Результат: -9
Источник

Целое число — это тип данных в 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

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

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

Источник

Главная » Функции VBA »

28 Апрель 2011              129102 просмотров

  • ABS() — эта функция возвращает абсолютное значение переданного ей числа (то же число, но без знака). Например, ABS(3) и ABS(-3) вернут одно и то же значение 3.
  • Int(), Fix() и Round()позволяют по разному округлять числа:
    • Int() возвращает ближайшее меньшее целое;
    • Fix() отбрасывает дробную часть;
    • Round() округляет до указанного количества знаков после запятой.

    Однако Round может вернуть не совсем ожидаемый результат, т.к. функция применяет финансовое округление. По правилам данного округления если за последней к округлению цифрой стоит 5, то округляемую цифру увеличивают в том случае, если она нечетная и уменьшают, если четная.
    Математическое же округление всегда округляет цифру в большую сторону, если за ней идет цифра 5 и выше, и отбрасывает остаток если 4 и меньше.
    Т.е. если мы выполним такую строку кода

    то результатом будет 2,5, хотя предполагалось получить 2,51. Поэтому порой для округления лучше использовать Format:

        MsgBox Format(2.505, "#,##0.00")

    но в этом случае мы получим не число в чистом виде, а текст. И если нужно именно число, то придется производить дополнительные преобразования:

        MsgBox CDbl(Format(2.505, "#,##0.00"))

    Так же, для математического округления, можно использовать и такой вариант:

        MsgBox Application.Round(2.505, 2)

    Но здесь стоит учитывать, что это не чистый VB и этот метод сработает только в Excel, т.к. по сути мы обращаемся к встроенной в Excel функции округления ОКРУГЛ(ROUND), которая применяет именно математическое округление.

  • Rnd и команда Randomize используются для получения случайных значений (очень удобно для генерации имен файлов и в других ситуациях). Перед вызовом функции Rnd() необходимо выполнить команду Randomize для инициализации генератора случайных чисел. 
        Dim lRundNum As Long, lMinNum As Long, lMaxNum As Long
    lMinNum = 1: lMaxNum = 100
    Randomize
    lRundNum = Int(lMinNum + (Rnd() * lMaxNum))
    MsgBox lRundNum
  • Sgn() — позволяет вернуть информацию о знаке числа. Возвращает 1, если число положительное, -1, если отрицательное и 0, если проверяемое число равно 0.
  • Mod() — Делит два числа и возвращает только остаток. Например, выражение 8 Mod 3 вернет число 2, т.к. без остатка(в виде дроби у результата деления) 8 делится на 3 только до 2-х(8 / 3 = 2,66666666666667).
    При этом функция Mod учитывает и знак числа — если первое число или оба числа отрицательные, то результатом будет отрицательное число. Если же отрицательное только второе число — то результат будет положительным числом.
    При попытке получить остаток при делении чисел с плавающей запятой результат может быть не тем, который ожидается, потому что перед выполнением деления оба числа округляются по математическим законам(5 и выше до большего, 4 и ниже — до меньшего). Например, выражение 8 Mod 3.5 вернет 0, а выражение 8 Mod 3.4 — 2.
Источник

Содержание

  1. Функции Int, Fix
  2. Примеры запросов
  3. Пример VBA
  4. Функции преобразования типов
  5. Синтаксис
  6. Возвращаемые типы
  7. Примечания
  8. Пример функции CBool
  9. Пример функции CByte
  10. Пример функции CCur
  11. Пример функции CDate
  12. Пример функции CDbl
  13. Пример функции CDec
  14. Пример функции CInt
  15. Пример функции CLng
  16. Пример функции CSng
  17. Пример функции CStr
  18. Пример функции CVar
  19. См. также
  20. Поддержка и обратная связь
  21. Int, Fix functions
  22. Синтаксис
  23. Замечания
  24. Пример
  25. См. также
  26. Поддержка и обратная связь
  27. Vba excel целая часть числа
  28. Функция Fix

Функции Int, Fix

Возвращает целую часть числа.

Обязательный аргумент числоаргумент представляет собой значение типа Double или любое допустимое числовое выражение. Если число содержит значение NULL, возвращается NULL.

Функции Int и Fix удаляют дробную часть числа и возвращают полученное целое значение.

Различие между функциями Int и Fix состоит в том, что при отрицательном значении числа функция Int возвращает первое отрицательное целое число, не превышающее число, а функция Fix — первое отрицательное целое число, которое больше числа или равно ему. Например, функция Int преобразует -8,4 в -9, а Fix преобразует -8,4 в -8.

Функция Fix( число) вычисляется следующим образом:

Примеры запросов

SELECT Int([Discount]) AS Expr1 FROM ProductSales;

Удаляет дробную часть всех значений в поле «Скидка» и возвращает итоги для всех значений. Для отрицательных дробей «Int» возвращает первое отрицательное integer, меньшее или равное числу. Например, для значения скидки «-223,20» возвращается значение -224,00.

SELECT Fix([Discount]) AS Expr1 FROM ProductSales;

Удаляет дробную часть всех значений в поле «Скидка» и возвращает итоги для всех значений. Для отрицательных дробей «Исправить» возвращает первое отрицательное integer, большее или равное числу. Например, для значения скидки «-223,20» возвращается значение -223,00.

Пример VBA

Примечание: В примерах ниже показано, как использовать эту функцию в модуле Visual Basic для приложений (VBA). Чтобы получить дополнительные сведения о работе с VBA, выберите Справочник разработчика в раскрывающемся списке рядом с полем Поиск и введите одно или несколько слов в поле поиска.

В данном примере показано, как функции Int и Fix возвращают целые части чисел. Если значением аргумента является отрицательное число, функция Int возвращает первое отрицательное целое число, не превышающее его, а функция Fix — первое отрицательное целое число, которое больше этого значения или равно ему.

Источник

Функции преобразования типов

Каждая функция приводит выражение к нужному типу данных.

Синтаксис

  • CBool(выражение)
  • CByte(выражение)
  • CCur(выражение)
  • CDate(выражение)
  • CDbl(выражение)
  • CDec(выражение)
  • CInt(выражение)
  • CLng(выражение)
  • CLngLng(выражение) (действительно только для 64-разрядных платформ).
  • CLngPtr(выражение)
  • CSng(выражение)
  • CStr(выражение)
  • CVar(выражение)

Обязательный аргумент выражение — это любое строковое или числовое выражение.

Возвращаемые типы

Тип возвращаемого значения определяется по имени функции в соответствии со следующей таблицей:

Функция Тип возвращаемых данных Диапазон выражения-аргумента
CBool Boolean Любое допустимое строковое или числовое выражение.
CByte Byte От 0 до 255.
CCur Currency От -922 337 203 685 477,5808 до 922 337 203 685 477,5807.
CDate Date Любое допустимое выражение даты.
CDbl Double От -1,79769313486231E308 до -4,94065645841247E-324 для отрицательных значений; от 4,94065645841247E-324 до 1,79769313486232E308 для положительных значений.
CDec Decimal 79 228 162 514 264 337 593 543 950 335 для чисел без десятичных знаков. Для чисел с 28 десятичными знаками диапазон составляет 7,9228162514264337593543950335. Наименьшим возможным числом, отличным от нуля, является число 0,0000000000000000000000000001.
CInt Integer От -32 768 до 32 767, дробная часть округляется.
CLng Long От -2 147 483 648 до 2 147 483 647, дробная часть округляется.
CLngLng LongLong От -9 223 372 036 854 775 808 до 9 223 372 036 854 775 807; дробная часть округляется. (Действительно только для 64-разрядных платформ).
CLngPtr LongPtr От -2 147 483 648 до 2 147 483 647 для 32-разрядных систем; от -9 223 372 036 854 775 808 до 9 223 372 036 854 775 807 для 64-разрядных систем; дробная часть округляется в обоих типах систем.
CSng Single От -3,402823E38 до -1,401298E-45 для отрицательных значений; от 1,401298E-45 до 3,402823E38 для положительных значений.
CStr String Результат, возвращаемый функцией CStr, зависит от аргумента выражение.
CVar Variant Диапазон совпадает с типом Double для числовых значений и с типом String для нечисловых значений.

Примечания

Если выражение, переданное в функцию, не входит в диапазон типа, в который преобразуются данные, происходит ошибка.

Для явного присвоения значений типа LongLong (включая тип LongPtr на 64-разрядных платформах) целочисленным типам данных меньшего размера должны использоваться функции преобразования. Неявные преобразования типа LongLong в меньшие целочисленные типы не допускаются.

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

Функции преобразования типа данных следует использовать вместо функции Val для преобразования типов данных в приложениях, поддерживающих различные региональные стандарты. Например, при использовании функции CCur десятичные разделители, разделители групп разрядов и параметры денежных единиц распознаются в соответствии с языковыми и региональными параметрами компьютера.

Если дробная часть целого числа строго равна 0,5, функции CInt и CLng всегда округляют результат до ближайшего четного числа. Например, 0,5 округляется до 0, а 1,5 — до 2. Функции CInt и CLng отличаются от функций Fix и Int, которые отбрасывают дробную часть числа, а не округляют ее. Кроме того, функции Fix и Int всегда возвращают значение того же типа, что и переданное им выражение.

Для определения возможности преобразования date в дату или время используется функция IsDate. Функция CDate распознает литералы даты и времени, а также некоторые числа, которые находятся в диапазоне допустимых дат. При преобразовании числа в дату преобразуется целая часть числа. Дробная часть преобразуется во время суток, начиная с полуночи.

Функция CDate распознает форматы даты в соответствии с национальной настройкой системы. Если формат передаваемого аргумента не соответствует распознаваемым настройкам даты, функция не сможет определить правильный порядок дней, месяцев и лет. Кроме того, длинный формат даты не распознается, если в нем содержится строка дня недели.

Функция CVDate предназначена для обеспечения совместимости с предыдущими версиями Visual Basic. Синтаксис функции CVDate не отличается от синтаксиса функции CDate; однако функция CVDate возвращает тип Variant, подтипом которого является тип Date, а не собственно тип Date. Поскольку теперь реализован встроенный тип Date, необходимость в функции CVDate отпадает. Такой же результат можно получить, если преобразовать выражение в тип Date и присвоить его типу Variant. Этот способ позволяет преобразовать все прочие встроенные типы в эквивалентные им подтипы Variant.

Функция CDec не возвращает отдельный тип данных. Вместо этого она всегда возвращает результат типа Variant, значение которого преобразовано в подтип Decimal.

Пример функции CBool

В этом примере функция CBool используется для преобразования выражения в тип Boolean. Если выражение разрешается в ненулевое значение, функция CBool возвращает значение True, в противном случае она возвращает значение False.

Пример функции CByte

В этом примере функция CByte используется для преобразования выражения в тип Byte.

Пример функции CCur

В этом примере функция CCur используется для преобразования выражения в тип Currency.

Пример функции CDate

В этом примере функция CDate используется для преобразования выражения в тип Date. Как правило, не рекомендуется определять дату и время в виде строк (как показано в этом примере). Вместо этого рекомендуется использовать литералы даты и времени, такие как #2/12/1969# и #4:45:23 PM# .

Пример функции CDbl

В этом примере функция CDbl используется для преобразования выражения в тип Double.

Пример функции CDec

В этом примере функция CDec используется для преобразования выражения в тип Decimal.

Пример функции CInt

В этом примере функция CInt используется для преобразования выражения в тип Integer.

Пример функции CLng

В этом примере функция CLng используется для преобразования выражения в тип Long.

Пример функции CSng

В этом примере функция CSng используется для преобразования выражения в тип Single.

Пример функции CStr

В этом примере функция CStr используется для преобразования выражения в тип String.

Пример функции CVar

В этом примере функция CVar используется для преобразования выражения в тип Variant.

См. также

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.

Источник

Int, Fix functions

Возвращает целую часть числа.

Синтаксис

Int(number) Fix(number)

Обязательный аргумент number — это double или любое допустимое числовое выражение. Если аргумент число содержит нулевое значение, возвращается нулевое значение.

Замечания

Функции Int и Fix удаляют дробную часть элемента число и возвращают результирующее целочисленное значение.

Разница между Int и Fix заключается в том, что если число является отрицательным, Int возвращает первое отрицательное целое число меньше или равно числу, а исправление возвращает первое отрицательное целое число больше или равно числу. Например, функция Int преобразует –8,4 в –9, а Fix преобразует –8,4 в –8.

Fix(number) эквивалентен Sgn(number) * Int(Abs(number)).

Пример

В этом примере показано, как функцииInt и Fix возвращают целые части чисел. Если используется отрицательный числовой аргумент, функция Int возвращает первое отрицательное целое число, которое меньше или равно этому числу; функция Fix возвращает первое отрицательное целое число, которое меньше или равно этому числу.

См. также

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.

Источник

Vba excel целая часть числа

Информация о сайте

Инструменты и настройки

Excel Windows
и
Excel Macintosh

Вопросы и решения

Работа и общение

Работа форума и сайта

Функции листа Excel

= Мир MS Excel/Справочники

Все функции VBA [3]
Математические функции [14]
Функции обработки массивов [4]
Функции обработки строк [27]
Функции преобразования типа данных [11]
Функции загрузки данных [8]
Функции работы с файлами [12]
Функции обработки системных параметров [16]
Функции обработки цвета [2]
Функции работы с датами и временем [21]
Функции преобразования чисел в разные системы счисления [3]
Функции работы с объектами [4]
Финансовые функции [13]
Функции форматирования [5]
Функции работы с указателями [3]

Функция Fix

Функция Fix(Fixed) отбрасывает дробную часть числа и возвращает целое значение. Функция схожа с функцией Int. Различие между функциями Int и Fix состоит в том, что для отрицательного значения аргумента число функция Int возвращает ближайшее отрицательное целое число, меньшее либо равное указанному, а Fix ближайшее отрицательное целое число, большее либо равное указанному. Например, функция Int преобразует -8.4 в -9, а функция Fix преобразует -8,4 в -8.
Выражение Fix(Number) эквивалентно следующему:
Sgn(Number) * Int(Abs(Number))

Функция возвращает значение типа, совпадающего с типом аргумента, которое содержит целую часть числа

Источник

Источник

Функция Int

Int(Number)

Функция Int(Integer) отбрасывает дробную часть числа и возвращает целое значение. Функция схожа с функцией Fix. Различие между функциями Int и Fix состоит в том, что для отрицательного значения аргумента число функция Int возвращает ближайшее отрицательное целое число, меньшее либо равное указанному, а Fix ближайшее отрицательное целое число, большее либо равное указанному. Например, функция Int преобразует -8.4 в -9, а функция Fix преобразует -8,4 в -8

Возвращаемое значение

Функция возвращает значение типа, совпадающего с типом аргумента, которое содержит целую часть числа

Параметры

Number Обязательный аргумент Number может представлять любое допустимое числовое выражение или число типа Double. Если аргумент имеет значение Null, то возвращается также Null

Примечание
Если значение аргумента не попадает в диапазон допустимых значений Double, то генерируется ошибка стадии выполнения Overflow
Если аргумент имеет тип данных String, то он должен представлять собой число, иначе генерируется ошибка стадии выполнения Type mismatch

Пример

' В данном примере 
' функции Int и Fix возвращают целые части чисел.
' В случае отрицательного аргумента Int возвращает
' ближайшее отрицательное целое число,
' меньшее либо равное указанному,
' а Fix ближайшее отрицательное целое число,
' большее либо равное указанному

Dim MyNumber
MyNumber = Int(99.8) ' Возвращает 99
MyNumber = Fix(99.2) ' Возвращает 99

MyNumber = Int(-99.8) ' Возвращает -100
MyNumber = Fix(-99.8) ' Возвращает -99

MyNumber = Int(-99.2) ' Возвращает -100
MyNumber = Fix(-99.2) ' Возвращает -99
Источник

  • VBA INT

VBA INT

В Excel VBA используются разные типы данных. По данным мы используем разные среди них. Целое число — это число, которое не является дробью, которая может быть отрицательной, положительной и равной нулю. INT называется целочисленной функцией. Это используется для преобразования данных в целое число в Excel. Это можно использовать как функцию Excel, а также функцию VBA.

Функция INT сгруппирована под функциями «Математика и тригонометрия». Целочисленная функция используется для округления определенного числа до ближайшего целого числа. Если число отрицательное, то целое число округляет число относительно нуля.

Как использовать функцию INT в Excel VBA?

Подобно функции Excel, целочисленная функция используется путем предоставления одного аргумента.

Ниже приведен синтаксис Excel VBA INT:

  • Указанное число должно быть числом (двойным) или ссылкой на ячейку.
  • Когда то же самое выражается в коде VBA.

Переменная определяется как целое число, а функция применяется к переменной.

 Dim n As Integer n = Int (34, 98)

Теперь предоставленное число будет изменено на и округлено до числа, близкого к указанному целому числу.

Примеры функции Excel VBA INT

Ниже приведены несколько практических примеров использования функции VBA INT в Excel.

Вы можете скачать этот шаблон VBA INT Excel здесь — Шаблон VBA INT Excel

Excel VBA INT — Пример № 1

Как функция INT работает с положительными числами?

Если данное число является положительным двойным числом или дробным числом, давайте посмотрим, как оно будет работать при использовании функции INT.

Для использования функции Excel VBA INT выполните следующие действия:

Шаг 1: Откройте окно кода. Чтобы начать операцию, создайте приватную функцию ‘integerconversion’, куда будет возвращаться весь код.

Код:

 Private Sub integerconversion () End Sub

Шаг 2: Поскольку результатом будет целое число, нам нужна переменная как целое число, чтобы назначить результат функции INT. Объявите переменную внутри функции ‘n’ как целое число, чтобы назначить функцию INT этой переменной.

Код:

 Private Sub integerconversion () Dim n As Integer End Sub

Шаг 3: После того, как переменная создана, присвойте формулу целочисленной функции созданной переменной ‘n’. Теперь во время работы функции результат будет сохранен в целочисленной переменной.

Код:

 Private Sub integerconversion () Dim n As Integer n = Int (End Sub

Шаг 4: положительное число дроби передается в функцию INT, чтобы увидеть, как оно будет округлено до ближайшего целого числа. «34, 98» — это используемый номер, и он передается функции INt в качестве аргумента.

Код:

 Private Sub integerconversion () Dim n As Integer n = Int (34.98) End Sub

Шаг 5: Теперь функция INT работает, и результат будет сохранен в объявленной переменной ‘n’. Чтобы увидеть результат, передайте переменную в окно сообщения, которое напечатает значение переменной в окне сообщения.

Код:

 Private Sub integerconversion () Dim n As Integer n = Int (34.98) MsgBox n End Sub

Шаг 6: Код завершен, теперь нажмите F5 или запустите код, используя кнопку запуска в окне кода, чтобы получить окончательный результат. Он покажет вывод в окне сообщения.

Проверьте сообщение внутри окна сообщения. Результат округляется до целого числа 34 с 34, 98 до целого числа ниже около 34, 98

Excel VBA INT — Пример № 2

Как функция INT работает с отрицательными числами?

В рамках одного и того же кода давайте попробуем использовать отрицательное число. Если то же число будет указано как отрицательное, давайте посмотрим, как изменится результат

Для использования функции Excel VBA INT выполните следующие действия:

Шаг 1: Здесь тот же код будет изменен, как показано ниже, где число предоставляется как отрицательное число дроби в функции INT. «-34, 98» используется с функцией INt.

Код:

 Private Sub integerconversion () Dim n As Integer n = Int (-34, 98) End Sub

Шаг 2: Используйте окно сообщения, чтобы распечатать результат в окне.

Код:

 Private Sub integerconversion () Dim n As Integer n = Int (-34, 98) MsgBox n End Sub

Шаг 3: Запустите приведенный ниже код, и результат будет изменен.

Результатом будет отрицательное целое число. И округляется до целого числа от нуля.

Здесь число -34, 98 округляется до -35 при применении к нему функции INT. Функция INT всегда округляет число до следующего младшего целого числа.

Excel VBA INT — Пример № 3

Как отделить дату и время от одной ячейки, используя VBA INT?

В одной ячейке упоминается несколько дат со временем, мы хотим разделить данные на разные ячейки.

Первый столбец содержит несколько дат со временем. Здесь мы хотим разбить данные на два разных столбца.

Чтобы разделить данные на разные столбцы даты, времени, давайте воспользуемся функцией INT. Создайте кнопку, которая может дать ожидаемый результат в один клик.

Теперь давайте напишем код VBA за этой командной кнопкой. Для этого выполните следующие действия, чтобы использовать функцию Excel VBA INT:

Шаг 1: Двойной щелчок на командной кнопке, и окно кода появится, как показано ниже.

Код:

 Частный Sub CommandButton1_Click () End Sub

Шаг 2: Создайте переменную как целое число, чтобы запустить цикл For для разделения данных по одному.

Код:

 Private Sub CommandButton1_Click () Dim i As Integer End Sub

Шаг 3: Реализация цикла For, так как у нас есть 5 строк, цикл должен работать 5 раз. Где строка начинается с 2.

Код:

 Private Sub CommandButton1_Click () Dim i As Integer для i = от 2 до 6 End Sub

Шаг 4: Используя функцию INT, разбейте дату на 2- й, где только дата будет разбита на 2- й столбец.

Код:

 Private Sub CommandButton1_Click () Dim i As Integer для i = 2–6 ячеек (i, 2) .Value = Int (Cells (i, 1) .Value) End Sub

Шаг 5: Вычитая результат функции INT из первого столбца, поместите оставшиеся данные в 3- ю ячейку.

Код:

 Private Sub CommandButton1_Click () Dim i As Integer для i = 2-6 ячеек (i, 2) .Value = Int (Cells (i, 1) .Value) Cells (i, 3) .Value = Cells (i, 1) .Value - ячейки (i, 2) .Value Next End Sub

Шаг 6: Чтобы получить результаты в правильном формате, отформатируйте ячейки, как показано ниже. Дата и время столбца устанавливаются в нужный формат. В противном случае результат будет показан в виде случайных чисел или некоторого значения мусора.

Формат даты:

Формат времени:

Шаг 7: Запустите код, нажав кнопку команды. Выход будет как ниже.

Данные, приведенные в первом столбце, будут разбиты на два столбца даты и времени.

То, что нужно запомнить

  • Если число положительное, то целочисленная функция округляет его до целого числа, близкого к нулю, для отрицательных значений оно понижает число до целого числа от нуля.
  • Функция VBA INT округляет число до целочисленного значения.
  • Сохраняйте ячейки в формате, чтобы получить правильный результат при использовании функции INT в Excel VBA.

Рекомендуемые статьи

Это было руководство к функции VBA INT. Здесь мы обсудили, как использовать функцию Excel VBA INT вместе с практическими примерами и загружаемым шаблоном Excel. Вы также можете просмотреть наши другие предлагаемые статьи —

  1. VBA Long | Как пользоваться?
  2. Добавить маркеры в Excel
  3. Учебники по сортировке VBA
  4. ИЛИ Формула в Excel

Источник

Понравилась статья? Поделить с друзьями:
  • Excel vba только уникальные значения
  • Excel vba только отфильтрованные строки
  • Excel vba только видимые ячейки в excel
  • Excel vba тип объекта
  • Excel vba тип значения в ячейке