Технический форум
Вернуться   Технический форум > Программирование > Форум программистов > Помощь студентам


Ответ
 
Опции темы Опции просмотра
Старый 20.01.2013, 21:13   #1 (permalink)
YEJ
Новичок
 
Регистрация: 20.01.2013
Сообщений: 8
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 10
По умолчанию Некоторые вопросы по VBA

Здравствуйте.
Первый мой вопрос касается создания макроса для расчёта ф-ции:
y(x)=3^tan(x^2+5*x)
Вот код макроса:
Код:
Sub raschet()
Dim x, y As Single
x = Range("F9").Value
If Cos(x ^ 2 + 5 * x) <> 0 Then
y = 3 ^ (Tan(x ^ 2 + 5 * x))
Range("F10").Value = y
Else
MsgBox ("ФНО")
End If
End Sub
Когда: cos(x^2+5*x)<>0 всё замечательно считается, а когда равен, выскакивает, ошибка, хотя по моему коду должно выскочить окошко в котором написано ФНО. Почему такого не происходит? Что неправильно написано в коде?

П.С. Когда ввожу большое число, например, 1Е+10 , тоже не считает.
YEJ вне форума   Ответить с цитированием

Старый 20.01.2013, 21:13
Helpmaster
Member
 
Аватар для Helpmaster
 
Регистрация: 08.03.2016
Сообщений: 0

В этих обсуждениях скорее всего есть нужная вам информация

Ответы на некоторые вопросы от владельцев ноутов
Некоторые ''смайлики''
Не заходит на некоторые сайты
Некоторые новости о LGA 2011

Старый 20.01.2013, 21:32   #2 (permalink)
YEJ
Новичок
 
Регистрация: 20.01.2013
Сообщений: 8
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 10
По умолчанию

И ещё: помогите написать макрос, который бы сортировал таблицу (на всех листах) по столбцу "Цена" по убыванию. Я пробовал через запись макросов: 2 макроса записались нормально- работают, а сортировку никак не удаётся.
И ещё такой вопрос: когда на каком-либо листе стираю значения стоимости и итогов и делаю перерасчёт, а потом пытаюсь построить гистограммы выскакивают, какие-то левые ряды. Откуда они? Макрос работает неправильно?
YEJ вне форума   Ответить с цитированием
Старый 20.01.2013, 21:37   #3 (permalink)
YEJ
Новичок
 
Регистрация: 20.01.2013
Сообщений: 8
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 10
По умолчанию

Забыл сам документ ко второму посту прикрепить: Лаб8 with makroses.zip
YEJ вне форума   Ответить с цитированием
Ads

Яндекс

Member
 
Регистрация: 31.10.2006
Сообщений: 40200
Записей в дневнике: 0
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 55070
Ответ

Опции темы
Опции просмотра

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Выкл.
HTML код Выкл.
Trackbacks are Вкл.
Pingbacks are Вкл.
Refbacks are Выкл.




Часовой пояс GMT +4, время: 23:29.

Powered by vBulletin® Version 6.2.5.
Copyright ©2000 - 2014, Jelsoft Enterprises Ltd.