Функция VBA ОКРУГЛ

Функция раунда Excel VBA

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

Вы можете округлить число до двузначного десятичного числа, трехзначного десятичного числа или вообще без десятичного числа. Например, если у вас есть номер 5.8697. Если округлить число до двузначного десятичного числа, получится 5,87. Если округлить до трех цифр, то получится 5,870. Если вы хотите округлить до нуля, то будет 6.-

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

Надеюсь, вы использовали Функция ОКРУГЛ на листеФункция ОКРУГЛ на рабочем листеОКРУГЛ — это встроенная функция Excel, которая вычисляет круглое число заданного числа, используя количество цифр в качестве аргумента. Число, до которого нужно округлить, и количество цифр, до которого нужно округлить, являются двумя аргументами этой формулы.читать далее. В VBA мы тоже можем использовать эту функцию, но у нас есть разница в этих функциях. Мы увидим разницу между этими двумя функциями позже в этой статье.

Вы можете использовать это изображение на своем веб-сайте, в шаблонах и т. д. Пожалуйста, предоставьте нам ссылку на авторствоКак предоставить атрибуцию?Ссылка на статью должна быть гиперссылкой
Например:
Источник: Функция VBA ROUND (wallstreetmojo.com)

Синтаксис

Взгляните на синтаксис функции Round.

Число: Это число мы пытаемся округлить.

[Number of Digits after Decimal]: Сколько цифр вам нужно после десятичного значения.

Примеры

Вы можете скачать этот шаблон Excel функции раунда VBA здесь — Шаблон Excel функции раунда VBA

Предположим, у вас есть число 4,534, и вы хотите округлить его до двух цифр.

Выполните следующие шаги.

Шаг 1: Объявите переменную как Variant.Объявите переменную как вариант.Вариантный тип данных в VBA — это универсальный тип данных, который может содержать любой тип данных, но при назначении типа данных необходимо использовать слово «Вариант».читать далее

Код:

Sub Round_Example1()

  Dim K As Variant

End Sub

Шаг 2: Для этой переменной «к,” присвойте значение через функцию ОКРУГЛ.

Код:

Sub Round_Example1()
  Dim K As Variant

  K = Round(

End Sub

Шаг 3: Число ничего, но какое число мы пытаемся округлить. В этом случае номер 4.534

Код:

Sub Round_Example1()
  Dim K As Variant

  K = Round(4.534,

End Sub

Шаг 4: Сколько цифр нам нужно округлить? В этом случае нам нужно округлить до 2 цифры.

Код:

Sub Round_Example1()
  Dim K As Variant

  K = Round(4.534, 2)

End Sub

Шаг 5: Теперь покажите значение переменной «k» в окно сообщения VBAОкно сообщений VBAФункция VBA MsgBox — это функция вывода, которая отображает обобщенное сообщение, предоставленное разработчиком. Этот оператор не имеет аргументов, и персонализированные сообщения в этой функции записываются в двойных кавычках, а для значений предоставляется ссылка на переменную.читать далее.

Код:

Sub Round_Example1()
  Dim K As Variant

  K = Round(4.534, 2)
  MsgBox K

End Sub

Запустим этот код и посмотрим, что мы получим.

Мы получили результат как 4,53 когда мы округлили до 2 цифр.

Сейчас я сменю номер с от 4,534 до 4,535. Посмотрите, что происходит сейчас.

Код:

Sub Round_Example1()
  Dim K As Variant

  K = Round(4.535, 2)
  MsgBox K

End Sub

Теперь запустите код и посмотрите, что получится.

Мы получили результат 4,54, что на один десятичный знак выше, чем предыдущее значение 4,53. Это связано с тем, что в этом примере мы предоставили число вроде 4,535, поэтому после числа 3 следующим числом будет 5, поэтому оно округляется до следующего числа, поэтому 3 становится 4.

Теперь я поставлю номер как 2.452678, и я попытаюсь округлить до 3 цифр.

Код:

Sub Round_Example2()
  Dim K As Variant

  K = Round(2.452678, 3)
  MsgBox K

End Sub

Запустите этот код, чтобы увидеть результат.

Результат 2,453.

2,452678 Здесь числа после 2^й десятичный разряд равен 2678. После числа 2 следует число 6, которое больше или равно 5, поэтому оно округляется до следующего десятичного числа.

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

Код:

Sub Round_Example3()
  Dim K As Variant

  K = Round(2.452678, 0)
  MsgBox K

End Sub

Запустим код и посмотрим, что у нас получится.

Поскольку я использовал округление до нуля, мы получили результат 2.

Причина, по которой мы получили результат 2, заключается в том, что здесь первое десятичное число равно 4, что меньше 0,5, поэтому оно округляется в меньшую сторону.

Разница между функцией Excel и VBA ROUND

Отличий в основном 2.

#1 – Синтаксис обеих функций:

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

Excel Round Syntax: Round (Number, Number of Digits After Decimal)

VBA Round Syntax: Round (Number, [Number of Digits After Decimal])

В Excel оба аргумента являются обязательными, но в VBA второй аргумент является необязательным.

В VBA, если вы игнорируете второй аргумент, он принимает аргумент по умолчанию равным нулю, поэтому мы получим целое число.

№2 – Результаты:

Результаты, полученные этими двумя функциями, различны. Ниже приведены несколько примеров

УЗНАТЬ БОЛЬШЕ >>

Post Views: 1 680

Программы для Windows, мобильные приложения, игры - ВСЁ БЕСПЛАТНО, в нашем закрытом телеграмм канале - Подписывайтесь:)