Как остановить округление в случае выбора VBA?

Question

У меня есть выбор в VBA, который используется, чтобы взять значение и сделать некоторую математику от него. Затем он должен отображать разрешенное значение и исходное значение в двух разных ячейках. Когда я ввожу целое число в качестве ввода, он работает отлично. Однако, если я введу 1.2 (или некоторые другие десятичные числа), он будет использовать 1.2 для математики и даст мне правильное значение для одного выхода, но для другого выхода (который просто отображает исходный ввод) он просто говорит 1 (округленный вниз) вместо 1.2. Как я могу показать 1.2? Благодаря! (И, надеюсь, что смысл ...)

Answer 1

Вот пример:

Sub test() 

Dim lng As Long, dbl As Double, itg As Integer 

itg = 24.53 
lng = 24.53 
dbl = 24.53 

MsgBox lng & " " & " " & dbl & " " & itg 

End Sub 

если вы запустите этот код, он будет отображать окно сообщения с 25 24.53 25.
Только переменная, объявленная как Double, сохранит десятичную.
Таким образом, вам нужно только объявить свою переменную с правильным типом данных, чтобы не опускать десятичную.
Надеюсь, это поможет.