Как в VBA проверить, является ли число целым ?

Cook

Гость

08.09.2009 17:55:39

Добрый день,

Возник такой вопрос: а есть ли в VBA какая-нибудь функция, позволяющая проверить, является ли число целым или дробным. Чтобы выдавала просто ИСТИНА (если целое) и ЛОЖЬ (если дробное) ?
Я планирую процедуру писать только на событие, если число дробное, поэтому хотелось бы понять, как в массиве вычленить присутствие хоть одного дробного числа....

Спасибо,

lapink2000 Пользователь Сообщений: 2186 Регистрация: 01.01.2013	#2 08.09.2009 18:21:40 Int(arr(i)) = arr(i) KL

EducatedFool

Пользователь

Сообщений: 3695 Регистрация: 23.12.2012

08.09.2009 18:24:03

Ну или так:

Sub test()
Dim ЧислоЦелое As Boolean
x = 2.5
ЧислоЦелое = x = Fix(x)
Debug.Print ЧислоЦелое
End Sub

Sub test2()
Dim ЧислоЦелое As Boolean, x As Double
x = 2.5
ЧислоЦелое = x = CInt(x)
Debug.Print ЧислоЦелое
End Sub

Надстройки для Excel Парсинг сайтов Мониторинг цен конкурентов

Guest Гость	#4 08.09.2009 18:38:01 Спасибо, По 1 методу от KL все работает. Разбираюсь со вторым (от EducatedFool).

Читают тему