Форум программистов
 
Контакты: о проблемах с регистрацией, почтой и по другим вопросам пишите сюда - alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите активизацию e-mail.

Вернуться   Форум программистов > Microsoft Office и VBA > Microsoft Office Excel
Регистрация

Восстановить пароль
Повторная активизация e-mail


Донат для форума - использовать для поднятия настроения себе и модераторам

А ещё здесь можно купить рекламу за 25 тыс руб в месяц! ) пишите сюда - alarforum@yandex.ru

Ответ
 
Опции темы
Старый 30.08.2019, 19:49   #11
Petrov210217
Форумчанин
 
Регистрация: 14.11.2018
Сообщений: 72
Репутация: 10
По умолчанию

Цитата:
Сообщение от MCH Посмотреть сообщение
С этой задачей справится "Поиск решения"
Спасибо за совет! Действительно работает. Раньше этой функцией не пользовался.


Цитата:
Сообщение от сфинкс Посмотреть сообщение
у меня работает макрос
с шагами 0.233 для ускорения:
Код:
Sub D4E4F4()
   
    For i = -1 To 1.2 Step 0.233
          For j = -1 To 1.2 Step 0.233
                For k = -1 To 1.2 Step 0.233

    Range("d4").Select
    ActiveSheet.Range("d4").Value = i
    Range("e4").Select
    ActiveSheet.Range("e4").Value = j
    Range("f4").Select
    ActiveSheet.Range("f4").Value = k

 If Range("L6") > Range("m6") Then End
 If Range("L6") > Range("L9") Then ActiveSheet.Range("L9").Value = Range("L6"): ActiveSheet.Range("L11").Value = i: ActiveSheet.Range("L12").Value = j: ActiveSheet.Range("L13").Value = k
 If Range("L6") < Range("L15") Then ActiveSheet.Range("L15").Value = Range("L6"): ActiveSheet.Range("L17").Value = i: ActiveSheet.Range("L18").Value = j: ActiveSheet.Range("L19").Value = k
 
    Next: Next: Next
End Sub
шаги нецелые против ошибки в точке -1 1 -1
или нужны формулы вида
=ЕСЛИОШИБКА((J329^2)/(C329^2);0)

но неясно достигается ли значение

зато впервые в теме циклы перебирают значения 3-ёх переменных
и остаётся сформулировать условие оптимальности
Макрос, к моему огромному сожалению, выдает ошибку на условия. В чем ошибка, я не смог разобраться. Если не затруднит, поясните где ошибка. Решение с макросом так же интересует.
__________________
ЫЫЫЫЫЫ
Petrov210217 вне форума   Ответить с цитированием
Старый 30.08.2019, 21:00   #12
сфинкс
Форумчанин
 
Аватар для сфинкс
 
Регистрация: 17.06.2012
Адрес: Русская Сортировка Половинами
Сообщений: 297
Репутация: -5
По умолчанию

ошибка из-за столбца К
иногда вместо цифр появляется слово #число

поэтому как пишу в столбце К включена формула
=ЕСЛИОШИБКА((J329^2)/(C329^2);0)
Синтаксис
ЕСЛИОШИБКА(значение;значение_при_ош ибке)

значение 0,99960 получается при
d4=0,94 e4=0 f4=около 1

мой макрос пишет найденные значения d4e4f4
__________________
учим C# зная basic & excel

Последний раз редактировалось сфинкс; 30.08.2019 в 21:10.
сфинкс вне форума   Ответить с цитированием
Ответ

Опции темы

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

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

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Поиск необходимых символов в ячейке Chuikov Microsoft Office Excel 2 22.06.2015 19:05
Организация программ с использованием процедур .использованием параметров-значений и параметров переменных Фрейтор 40-500 Помощь студентам 0 02.11.2012 21:58
Организация программ с использованием процедур .использованием параметров-значений и параметров переменных Фрейтор 40-500 Помощь студентам 6 02.11.2012 21:46
Программирование циклов с использованием оператора WHILE Yuliyanna Паскаль 11 25.04.2011 02:25
с использованием вложенных циклов вкусняшка Помощь студентам 4 31.03.2009 17:22


09:32.


Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2019, Jelsoft Enterprises Ltd.