Поиск  Пользователи  Правила 
Закрыть
Логин:
Пароль:
Забыли свой пароль?
Регистрация
Войти
 
Страницы: 1
RSS
Вопрос по подстановке данных из TextBox в формулу для расчёта
 
Определяю переменную Ag1как  Double

Dim Ag1 As Double

Пытаюсь присвоить переменной Ag1 значение, вводимое в textbox tbAg1Pr

Set Ag1 = Val(tbAg1Pr.Value)

чтобы потом эту переменную использовать в формуле

Cells(i, 7).Value = 5.845 * Ag1

При запуске макроса пишет "Object required" и выделяет Val
При попытке использовать напрямую значение tbAg1Pr

Cells(i, 7).Value = 5.845 * tbAg1P.Value

выдаёт "Type mismatch"

Подскажите. пожалуйста, в чём ошибка?
 
оператор Set применяется для присвоения значения переменным типа объект. У Вас тип Double.
Ag1 = Val(tbAg1Pr.Value)

Но лично я бы советовал использовать не Val, а CDbl. Если в Текстбокс записано число с разделителем запятая между дробной и целой частью - Val её уберет, т.к. считает запятую разделителем групп разрядов.
Даже самый простой вопрос можно превратить в огромную проблему. Достаточно не уметь формулировать вопросы...
 
Спасибо, заработало
Страницы: 1
Читают тему (гостей: 1)