VBA Как объявить как десятичный

Question

Я оптимизирую макрос в VBA, который не был объявлен ни одним из типов данных, поэтому все было неудобно обработано компилятором в качестве варианта. Я имею дело с научными измерениями, поэтому мне нужна точность. Как объявить «Dim decAsdf как Decimal» (не так, но правильно)?

Answer 1

Вы не можете объявить переменную как Decimal - вы должны использовать Variant (вы можете использовать CDec, чтобы заполнить его с Decimal типа, хотя).

Answer 2

Лучшим способом является объявление переменной как Single или Double в зависимости от точности, в которой вы нуждаетесь. Тип данных Single использует 4 байта и имеет диапазон от -3.402823E38 до 1.401298E45. Double использует 8 байтов.

Вы можете объявить следующим образом:

Dim decAsdf as Single 

или

Dim decAsdf as Double 

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

Sub doubleDataTypeExample() 
Dim doubleTest As Double 


doubleTest = 0.0000045 * 0.005 * 0.01 

MsgBox "doubleTest = " & doubleTest 
End Sub