Двойной VBA

Двойной тип данных Excel VBA

Двойной VBA — это тип данных, который мы назначаем для объявления переменных, который является улучшенной или более длинной версией переменной типа данных «Single» и обычно используется для хранения более длинных десятичных разрядов.

Целое число VBAЦелое число VBAВ VBA целое число — это тип данных, который может быть присвоен любой переменной и использоваться для хранения целочисленных значений. В VBA скобка для максимального числа целочисленных переменных, которые можно сохранить, аналогична скобке в других языках. Используя оператор DIM, любую переменную можно определить как целочисленную переменную.читать далее тип данных всегда преобразует десятичные значения в ближайшее целое значение. Одиночный тип данных может отображать до двух цифр после запятой. С другой стороны, тип данных «Double» может хранить значения из от -1,79769313486231E308 до -4,94065645841247E324 для отрицательных значений и для положительных чисел он может хранить значения из от 4,94065645841247E-324 до 1,79769313486232E308.

Что еще более важно, он потребляет 8 байт памяти.

vba-двойной

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

Примеры использования двойного типа данных VBA

Вы можете скачать этот шаблон VBA Double Excel здесь — Двойной шаблон VBA Excel

Пример №1

Прежде чем мы увидим пример типа данных «Double», давайте посмотрим на примеры кодов типов данных «Integer» и «Single» в VBA. Посмотрите на ниже Код VBAКод VBAКод VBA относится к набору инструкций, написанных пользователем на языке программирования приложений Visual Basic в редакторе Visual Basic (VBE) для выполнения определенной задачи.читать далее.

Код:

Sub Integer_Ex()

  Dim k As Integer

  k = 2.569999947164

  MsgBox k

End Sub
Двойной пример VBA 1

Я объявил переменную «k» как Integer, и для этой переменной я присвоил значение 2,569999947164.

Давайте запустим этот код вручную или с помощью Эксель сочетание клавишГорячая клавиша ExcelЯрлык Excel — это способ более быстрого выполнения ручного задания.читать далее F5, чтобы увидеть окончательное значение в окно сообщения в VBAОкно сообщения в VBAФункция VBA MsgBox — это функция вывода, которая отображает обобщенное сообщение, предоставленное разработчиком. Этот оператор не имеет аргументов, и персонализированные сообщения в этой функции записываются в двойных кавычках, а для значений предоставляется ссылка на переменную.читать далее.

Двойной пример VBA 1-1

Результат отображается как 3 вместо предоставленного числа 2,569999947164. Причина в том, что VBA преобразовал число в ближайшее целое значение, т. е. 3.

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

Теперь я изменю тип данных с Integer на Single.

Код:

Sub Integer_Ex()

  Dim k As Single

  k = 2.569999947164

  MsgBox k

End Sub
Двойной пример VBA 1-2

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

Двойной пример VBA 1-3

На этот раз мы получили результат 2,57, так что на этот раз мы получили два десятичных знака. Исходное значение, которое мы присвоили, было 2,569999947164, поэтому в этом случае третье десятичное значение равно 9, поэтому, поскольку оно больше 5, оно преобразовало десятичное значение второго разряда 6 в 7.

Теперь измените тип данных с Single на Double.

Код:

Sub Integer_Ex()

  Dim k As Double

  k = 2.569999947164

  MsgBox k

End Sub
Двойной пример VBA 1-4

Теперь запустите код вручную и посмотрите, сколько цифр мы получим в результате окна сообщения.

Двойной пример VBA 1-5

На этот раз получили все десятичные значения. Мы можем указать до 14 знаков после запятой в типе данных Double.

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

Двойной пример VBA 1-6

Я набрал 15 знаков после запятой вместо 14. Если я нажму клавишу ввода, он вернется только к 14 цифрам.

Двойной пример VBA 1-7

Вместо 59 (последние две цифры) мы получили 6, т.е. поскольку последняя цифра 9, которая больше 5, предыдущее число 5 преобразуется в следующее целое значение, т.е. 6

Пример #2

Сейчас я покажу как работать со ссылкой на ячейкуКак работать со ссылкой на ячейкуСсылка на ячейку в Excel ссылается на другие ячейки на ячейку, чтобы использовать ее значения или свойства. Например, если у нас есть данные в ячейке A2 и мы хотим использовать их в ячейке A1, используйте =A2 в ячейке A1, и это скопирует значение A2 в A1.читать далее в рабочем листе. Ниже приведены числа, которые я ввел в рабочий лист.

Пример данных 2

Давайте инициируем захват тех же значений для следующего с помощью ЦЕЛОЕ ЧИСЛО тип данных, НЕ ЗАМУЖЕМ тип данных и ДВОЙНОЙ тип.

Ниже приведен код для сохранения значений из столбцов от A до B с использованием типа данных INTEGER.

Код:

Sub Double_Ex()

  Dim k As Integer
  Dim CellValue As Integer

  For k = 1 To 6
    CellValue = Cells(k, 1).Value
    Cells(k, 2).Value = CellValue
  Next k

End Sub
Целочисленный пример 2-1

Давайте запустим код через горячую клавишу F5, чтобы увидеть, какие значения мы получаем в столбце B.

Целочисленный пример 2-2

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

Теперь просто поменяю Тип данных VBAТип данных VBAТип данных — это основной признак любой переменной. Он представляет, какой тип и диапазон значений мы можем хранить в переменной. Типы данных встроены в VBA, и пользователям или разработчикам необходимо знать, какое значение может храниться в каком типе данных.читать далее переменной от целого числа до Single.

Код:

Sub Double_Ex()

  Dim k As Integer
  Dim CellValue As Single

  For k = 1 To 6
    CellValue = Cells(k, 1).Value
    Cells(k, 2).Value = CellValue
  Next k

End Sub
Один пример 2-3

Этот код даст следующий результат.

Один пример 2-4

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

Теперь меняет тип данных с single на double.

Код:

Sub Double_Ex()

  Dim k As Integer
  Dim CellValue As Double

  For k = 1 To 6
    CellValue = Cells(k, 1).Value
    Cells(k, 2).Value = CellValue
  Next k

End Sub
Двойной пример VBA 2-5

Это вернет приведенный ниже результат.

Двойной пример VBA 2-6

Мы получили точные значения из столбца A.

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

  • Double — это улучшенный тип данных Single.
  • Он может содержать до 14 знаков после запятой.
  • Он потребляет 8 байт системной памяти.

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

Похожие записи

Добавить комментарий

Ваш адрес email не будет опубликован.