Поиск  Пользователи  Правила 
Закрыть
Логин:
Пароль:
Забыли свой пароль?
Регистрация
Войти
 
Выбрать дату в календареВыбрать дату в календаре

Страницы: 1 2 3 4 5 6 7 8 9 10 11 ... 195 След.
Получить подобие ломаной кривой, в плоскости
 
конечно, не плохо бы услышать автора, но похоже RAN понял условия задачи по последнему чертежу
допустим не хватает знаний геометрии, чтобы решить задачу, но знаний чего должно не хватать чтобы не мочь описать свою задачу?
45 сообщений в теме! и, похоже, только сейчас появилось описание задачи)
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Получить подобие ломаной кривой, в плоскости
 
Цитата
dxf написал:
а можна подправить формулу чтоб получилось так как на фото
при этом о первом фото можно забыть?
все можно сделать есть есть условия задачи и задача имеет математическое решение
пока логика одного чертежа, поясняющего условия задачи, противоречит логике следующего чертежа - решение может быть такое -случайным образом нарисовать что-то отдаленно напоминающее исходную ломаную. устраивает?
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Из массива в диапазон.
 
Код
Private Sub CommandButton1_Click()
  Dim a(1 To 20) As Integer, i&
  Range("A:A").ClearContents
  For i = 1 To 20
    a(i) = Int(Rnd() * 21)
  Next i
  [a1:a20] = WorksheetFunction.Transpose(a) 'вывод массива А в Диапазон А1:А20 без цикла
End Sub
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Из массива в диапазон.
 
сделайте так:(строка 3 в коде - это то, о чем Вы спрашивали)
Код
  Range("A:A").ClearContents
  a(1) = 111: a(20) = 222
  [a1].Resize(UBound(a), 1) = WorksheetFunction.Transpose(a)
Изменено: Ігор Гончаренко - 22 Сен 2019 14:33:21
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Путь к папке без названия книги, Путь к папке без названия книги
 
см №44 в этой теме  ПутьКФайлу(ActiveWorkbook)
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Интерполирование изнутри таблицы, Обратная интерполяция
 
в математике известно много видов интерполяции (по функции заданной в табличной форме (по множеству дискретных значений функции) определить значение функции в произвольной точке)
использованный автором метод линейной интерполяции (с помощью 3-х ПРЕДСКАЗ()) дает однозначный результат
- как при поиске VOLUME по заданным TRIM и SOUNDING
- так и при определении SOUNDING по заданным TRIM и VOLUME
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Функция для получения пути к файлу
 
для получения пути к файлу используйте функцию
Код
Function ПутьКФайлу(Optional wb As Workbook = Nothing)
  If wb Is Nothing Then ПутьКФайлу = ThisWorkbook.Path Else ПутьКФайлу = wb.Path
End Function
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Интерполирование изнутри таблицы, Обратная интерполяция
 
Код
Function Fxy#(Tablo As Range, r#, c#)
  Dim ri&, ci&
  ri = 1 + FindIndex(Range(Tablo.Cells(2, 1), Tablo.Cells(Tablo.Rows.Count, 1)), r)
  ci = 1 + FindIndex(Range(Tablo.Cells(1, 2), Tablo.Cells(1, Tablo.Columns.Count)), c)
  Fxy = Fx(c, Tablo.Cells(1, ci), Tablo.Cells(1, ci + 1), _
  Fx(r, Tablo.Cells(ri, 1), Tablo.Cells(ri + 1, 1), Tablo.Cells(ri, ci), Tablo.Cells(ri + 1, ci)), _
  Fx(r, Tablo.Cells(ri, 1), Tablo.Cells(ri + 1, 1), Tablo.Cells(ri, ci + 1), Tablo.Cells(ri + 1, ci + 1)))
End Function
это же есть в файлах в сообщениях #9  и  #17
в сообщении  #21 некоторое время была функция SOUNDING, которая на основании таблицы  TRIM и VOLUME определяла  SOUNDING
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Интерполирование изнутри таблицы, Обратная интерполяция
 
Цитата
msr.Kot написал:
какие пути возможны для повышения точности расчётов?
в обратных вычислениях используйте линейную интерполяцию, как при определении VOLUME (в моем случае я считал Fxy)

для любых TRIM и SOUNDING посчитайте VOLUME
напишите сюда TRIM и VOLUME, который получили со всеми цифрами
скажите сколько знаков после запятой было в исходном SOUNDING, я его напишу в след сообщении
Изменено: Ігор Гончаренко - 21 Сен 2019 23:13:07
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Функция для получения пути к файлу
 
Цитата
vaspup88 написал:
как сделать, чтобы удалялись не строки, а содержимое их ячеек?
удаляйте не строки, а содержимое их ячеек
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Интерполирование изнутри таблицы, Обратная интерполяция
 
никто не сомневался, что Лена - может!
а тут ответ был написан, файл приложен, а потом все удалено пользователем Ігор Гончаренко,который заметил что попал не в свой вагон:
Цитата
msr.Kot написал:
Есть смелые и мозговитые?
удачи!
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Интерполирование изнутри таблицы, Обратная интерполяция
 
воcпользуйтесь несуществующей SOUNDING(...)
извините, не туда написал, для трусливых и тупых нет задач?
Изменено: Ігор Гончаренко - 20 Сен 2019 02:20:26
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Интерполирование изнутри таблицы, Обратная интерполяция
 
а так?
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Интерполирование изнутри таблицы, Обратная интерполяция
 
см. колонку I заполняете
TRIM =
SOUNDING =
смотрите Value =
чем не площадка?
Изменено: Ігор Гончаренко - 20 Сен 2019 00:30:29
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Интерполирование изнутри таблицы, Обратная интерполяция
 
Цитата
msr.Kot написал:
Не нашёл ответа в поисках по форуму
публиковал тут раз 5
см.лист СТ-1Р
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Макрос для переноса данных из одного файла в другой такой же, Одинаковый по структуре
 
получил от 512metrov, личное сообщение с предложение реализовать этот проект
Иван, извини, задачу обсудили, задача в работе у меня
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Посчитать вероятность появления  каждой цифры в позиции 21
 
Цитата
IKor написал:
Мне кажется, что начинать следует при наличии хотя бы
мне кажется что решать задачу есть смысл в том случает, когда есть описание (постановка) задачи
без описания задачи при наличии вдохновения и времени можно сколько угодно долго пытаться угадать решение
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Посчитать вероятность появления  каждой цифры в позиции 21
 
Андрей,
а) я не знаю как получены исходные 20 цифр ( и не хочу гадать как они получены)
б) но если получены случайно, то у каждого из чисел 1, 2 или 3 вероятность занять 21-ю позицию в этом списке равна 1/3
у случайных чисел характер распределения случайный и равномерный
известно, что стрельба по мишени описывается нормальным законом распределения, но он может не иметь к этой задаче никакого отношения точно так же как и случайные числа.
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Найти недостающие номера бланков
 
начиная с офиса 2019 доступна функция СЦЕП
Код
=СЦЕП(ЕСЛИ(СЧЁТЕСЛИ(F3:F18;СТРОКА(1:20));"";СТРОКА(1:20) & " "))
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Посчитать вероятность появления  каждой цифры в позиции 21
 
Андрей,
потому что в случайных числах нет зависимости от исхода предыдущих попыток.
если мы 6 раз бросили игральную кость и, допустим, 6 раз получили 1 (такое может случиться)
в 7-й попытке какова вероятность того, что выпадет 1? знаешь? вероятность у 1 снова 1/6, как и у 2, 3, 4, 5 и 6, в 7-й попытке единица не стала чем-то предпочтительнее или чем-то хуже остальных 5 цифр. шанс по-прежнему 1/6, как у всех остальных.
это СЛУЧАЙНЫЕ ЧИСЛА, каждая следующая попытка НИКАК не зависит от исхода ВСЕХ предыдущих.

как автор получил этот ряд
11332122323111311211
я не знаю, если это случайные числа, то в 21-й позиции может оказаться 1, 2 или 3 - все с одной вероятностью 1/3
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Посчитать вероятность появления  каждой цифры в позиции 21
 
если числа 1, 2, 3 попадают в этот ряд случайно, то вероятность любой из этих цифр попасть в 21 позицию равна 1/3 (как и в любую другую позицию)
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Избушка формулистов-3, не для вопросов, но для формульных задач
 
максимальный доход 300 (Р=100, Q=30)
формула массива 150 знаков:
Код
=МАКС(СТОЛБЕЦ(A1:ИНДЕКС(1:1;C1))*(B9-СУММ(B7:C8))+МИН(E1;МИН(ЦЕЛОЕ((A1-СТОЛБЕЦ(A1:ИНДЕКС(1:1;C1))*(B3:B6+C3:C6))/(C3:C6+D3:D6))))*(D9-СУММ(C7:D8)))-F1
отвечает на вопрос в ТЗ каков возможен максимальный доход, но не отвечает на вопрос сколько каких изделий изготовить
формула,, которая считает сколько нужно выпустить изделий Р - чуть длиннее 300 знаков
формула, которая считает количество изделий Q - 57 знаков
)
если в формуле учесть не только обьем рынка (100 и 50) но и производственные возможности, в данном случае 160 и 80 шт., то первая формула полагаю дотянется до длинны в 200 символов.
Изменено: Ігор Гончаренко - 17 Сен 2019 07:32:40
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Проверка с помощью УФ нескольких масок на содержание в строке
 
основная проблема в том,
что при наличии в ячейке слова витязь
формула посчитатет, что там есть витя и подсветит ее
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
VBA рассчитать стоимость процедурных текстбоксов, расчёт стоимости процедурных текстбоксов
 
идея придуманной Вами формы с потенциальными сотнями текстбоксов и комбобоксов - провальна со старта
1 листбокс на 6 колонок, 3 текстбокса, 3 комбокса, 1 Лейбл и  несколько кнопок - это все что нужно в Вашей форме
в итоге не нужно программно добавлять НИАКИХ новых контролов.
и сосчитать эту самую общую сумму - как два байта отослать
Изменено: Ігор Гончаренко - 16 Сен 2019 13:47:04
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Построчная запись из экселя в txt, учитывая разделитель ","
 
Код
If c <> "" Then f1.WriteLine Replace(c, ",", vbLf)
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Как сделать, чтобы все файлы Excel открывались и закрывались "одним блоком"?
 
Пробуйте решить с помощью ленты Вид, группа Окно
Цитата
Zasypich написал:
все открытые книги экселя каскадом или две книги рядом
это там точно есть
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Ищу специалиста EXEL, Отчёт в Exel
 
написал
тему можно назвать:
ищу специалиста для работы в Гугл-таблицах
Изменено: Ігор Гончаренко - 13 Сен 2019 13:14:27
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Определение срока окончания работ, Не корректно работает формула определения срока окончания работ
 
см.вложение
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Изменение ошибки #ЗНАЧ на другое значение либо поменять цвет., действия производятся в VBA разработке.
 
если не понимаете подсказок -  покажите файл, покажу как прописать в коде
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Изменение ошибки #ЗНАЧ на другое значение либо поменять цвет., действия производятся в VBA разработке.
 
=ЕСЛИОШИБКА(
=IFERROR(
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
Страницы: 1 2 3 4 5 6 7 8 9 10 11 ... 195 След.
Наверх