Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Пользователи » tutochkin
Выбрать дату в календаре…Выбрать дату в календаре

Страницы: 1 2 3 4 5 6 7 8 9 10 11 ... 29 След.
Посоветуйте какую Книгу хорошую по таблицам в экселе. что-нибудь с озона, Книга
 
#
22.11.2025 20:33:44
 
Перейти    
Преобразовать время в текст
 
#
18.11.2025 19:36:18
Ну так добавь минус...
Код
=ЕСЛИ(B6-A6>0;ТЕКСТ(ОСТАТ(B6-A6;1);"м")&" мин "&ТЕКСТ(ОСТАТ(B6-A6;1);"с")&" сек";"-"&ТЕКСТ(ОСТАТ(A6-B6;1);"м")&" мин "&ТЕКСТ(ОСТАТ(A6-B6;1);"с")&" сек")
 
Перейти    
Определение промежуточных данных, Апроксимация, интерполяция и тому подобные шалости с табличными данными.
 
#
03.11.2025 15:01:20

Попалась мне в руки вот такая книжечка.  Элементы численного анализа и математической обработки результатов опыта | Овчинский Борис Владимирович, Гутер Рафаил Самойлович
Очень советую тем, кто хочет понять как в шестидесятых годах, не имея пайтонов, экселей и вообще, могли обрабатывать данные экспериментов получая вполне неплохие аналитические зависимости.

Чисто для меня стало фишкой возможность представления кривых в виде прямых на плоскости (как бы это не звучало - на рисунке правый нижний график это параболы :) ).

Ну и пара разобранных примеров из книги - https://rutube.ru/video/768b2e0793ad5cb899c4c87a2ebbdf9d/?r=wd
 
Перейти    
Безье или Лагранж как именно эксель сглаживает линии диаграм?Ряд Фурье тригонометрический., Очень очень конечно конечно
 
#
02.11.2025 23:45:44
Сплайном. По крайней мере визуально. К курилке есть моя тема, там вроде как разбирал.
 
Перейти    
Из формата 526 214 852 025 006,00 в GeneralNumber, Перевести число из одного формата, видимо, Standard, в обычный
 
#
03.09.2025 18:07:37
Только недавно была похожая тема.
Вопрос к предложениям, а вы все символы пробелов так меня станете? Их же много... Не проще оставить только цифры и разделитель?
Типа так (сорри, я с телефона сейча
Код
Function DataPrep(str As String) As String
Dim ch As String, i As Long
For i = 1 To Len(str)
    ch = Mid(str, i, 1)
    If ch = "." Then DataPrep = DataPrep & ","
    If ch Like "[,0-9]" Then DataPrep = DataPrep & ch
Next i
End Function
 
Перейти    
Как построить график
 
#
27.08.2025 21:55:39

Без макросов и доп.столбцов можно сделать так.
 
Перейти    
Определение промежуточных данных, Апроксимация, интерполяция и тому подобные шалости с табличными данными.
 
#
25.08.2025 20:06:03
Довелось мне некоторое время проводить аппроксимацию номограммы в логарифмических осях.
Для тех кто не знает, это вот такие:

Оказывается штатными средствами аппроксимации экселя получить уравнение не получится.
Например для одной кривой и полиномиальном тренде имеем вот такое

При этом коэффициенты линии тренда совпадают с коэф-ми полученными через ЛИНЕЙН (см.табличку над графиком).

Для того чтобы получить уравнение следует:
1. Произвести преобразование исходных данных прологарифмировав их
2. Найти коэ-ты полинома (ai) на основании преобразованных данных
3. Считать по уравнению Y = 10 ^ (Σ ai·(log10(x))^i)

В результате имеем хорошее приближение


как то так...
Естественно всё это было автоматизировано с получением единого UDF для всей номограммы :) , но это совсем другая история.
 
Перейти    
Макрос вставляет данные из txt - в виде крякозябр и выделяет его
 
#
24.08.2025 15:01:57
Цитата
написал:
Нужно чтобы просто текст вставился в ячейки - без каких-либо прочих действий.
так вставьте через PQ
Код
 Csv.Document(File.Contents("C:\Users\Администратор\Downloads\1.txt"),[Delimiter=":", Encoding=65001])

А про перекодировку файла было тут: на этом форуме

Изменено: tutochkin - 24.08.2025 15:05:19
 
Перейти    
Проверка ячейки на дату методом VBA
 
#
23.08.2025 23:22:33
astepaa, так проверить принадлежность...
Код
Option Explicit
 
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("A1:A10000")) Is Nothing Then
    Dim Cell
    Cell = Target.Value
    If IsDate(Cell) Then
        If Replace(Cell, "/", ".") = Format(Cell, "dd/mm/yyyy") Then
            Exit Sub
        End If
    End If
    MsgBox "Неверная дата" & Cell
End If
End Sub
 
Перейти    
Код VBA неправильно считает данные
 
#
23.08.2025 19:21:12
Цитата
написал:
чтобы группировки и разделы не пересекались датами
Извините, но у вас такого быть не может. Прям первые две строки - имеют одинаковые/пересекающиеся диапазоны дат, но разные группировки.
 
Перейти    
ДР (новая), С ДНËМ РОЖДЕНИЯ
 
#
14.08.2025 08:51:29
Спасибо :) Приложу все усилия, чтоб это лучшее самое наступило.
 
Перейти    
Аппроксимация экспериментальных данных функциями с тремя параметрами (коэффициентами)
 
#
29.07.2025 21:26:32
Это уже давным давно выкладывал тут https://www.planetaexcel.ru/forum/?PAGE_NAME=read&FID=5&TID=152989&TITLE_SEO...
Ан нет, не прав. С поиском свободного коэф-та не делал. Ну кроме полиномных и им подобных естественно...
Впрочем при необходимости я бы это реализовал через модуль "Поиск решения".
Изменено: tutochkin - 29.07.2025 21:41:39
 
Перейти    
Макросом менять точку на запятую
 
#
20.07.2025 13:40:14
sokol92, маленькое дополнение.
Т.к. основную боль доставляют не просто пробелы пробелы, а неразрывные пробелы, сжатые пробелы и т.д. то вместо
Код
Selection.Replace " ", "", xlPart
я бы использовал UDF типа такой (не претендую на оптимальность).
Код
Function DataPrep(str As String) As String
Dim ch As String, i As Long
For i = 1 To Len(str)
    ch = Mid(str, i, 1)
    If ch = "." Then DataPrep = DataPrep & ","
    If ch Like "[,0-9]" Then DataPrep = DataPrep & ch
Next i
End Function
 
Перейти    
Яндекс-таблица, Суммирование ячеек по цвету
 
#
13.07.2025 12:36:19
Яндекс таблицы это Р7 или OnlyOffice. Ищите решение в соответствующих форумах. Попробуйте в телеграм канале https://t.me/r7_js
 
Перейти    
Построение многоугольника по координатам, Есть точки (от 3 до 500 штук) с определенными координатами X и Y. Нужно по ним построить многоугольник.
 
#
12.07.2025 11:39:11
aslanbek75, если вам нужно в масштабах, то это к Автокаду и им подобным программам.
 
Перейти    
Построение многоугольника по координатам, Есть точки (от 3 до 500 штук) с определенными координатами X и Y. Нужно по ним построить многоугольник.
 
#
10.07.2025 15:57:26
А в чём вопрос то? Решается обычнвм точечным графиком...  
 
Перейти    
Нужно разработать алгоритм ротации товаров между торговыми точками для оптимизации закупок и оборачиваемости товаров
 
#
28.06.2025 15:35:45
дел...
Изменено: tutochkin - 28.06.2025 15:36:06
 
Перейти    
Диаграмма "Таблица" в excel, Помогите найти замену отсутствующей в excel диаграмме "таблица"
 
#
01.06.2025 00:21:44
Цитата
Нужно каким-то образом в дэшборде разместить таблицу с данными.
Чтобы разместить таблицу внутри графика нужно вставить её как привязанный рисунок.
Цитата
она не устраивает из-за большого объёма данных
А вот это уже Ваши проблемы с выбором что нужно вставить, а что не нужно. Стотыщьмиллионов ячеек в маленький график не влезут
Цитата
В скирншоте лучше исправления делать через фотошоп. Тут форум по Excel
Поддерживаю.
 
Перейти    
Удаление текста до и после символа одновременно, Нужно оставить часть текста до и после определённого символа
 
#
11.05.2025 17:24:35
кмк, если "данных много" и они в csv, то смотреть надо в сторону PQ... так и так загружать.
 
Перейти    
Определение промежуточных данных, Апроксимация, интерполяция и тому подобные шалости с табличными данными.
 
#
11.05.2025 16:50:10
Интересный, с моей точки зрения, вид номограмм. Номограммы с переломом. Т.е. есть некая функциональная зависимость места резкого изменения характеристики. В качестве примера - простой вариант

если искать решение как для обычных номограмм, а именно взять значения до и после и решить через пропорцию, то результат будет ошибочным.
Например требуется построить (узнать значение) для Х2 = 3. (изначально заданы кривые при Х2 = 2, 4, 6, 8).
Найдём точку при Х1=10 Х2=3. Искомое между Х2=2 и Х2=4. Здесь и далее для упрощения кусочно линейно интерполирую.
Х1=10 Х2=2 => Y = 9
Х1=10 Х2=4 => Y = 6.33 (общий наклонный участок)
Через пропорцию  Х1=10 Х2=3 => Y = 7.66
Просчитывая другие точки получаем линию Х2 = 3 (красный пунктир)

Очевидно что решение не верное-кривая Х2 = 3 должна отходить от общей линии начиная с Х1 = 10.5. Верные значения начинаются для значений с Х1=12, т е. с момента начала отхода кривой Х2=4 от общей линии.
Для устранения этого казуса можно разбить номограмму на две: общий участок и отходящие

затем для каждой из частей ищем решение (строим две кривые для искомого Х2)

И результат будет максимум (в данном случае вогнутого вида номограммы) из двух решений


В качестве примера привёл простой вариант. Существуют более сложные зависимости, которые так же нельзя решать простым способом. В частности эта особенность номограмм характеристик эжекторов и не только.
Автоматизацию создания макросов для Г-образных номограмм показывал тут https://rutube.ru/video/280dd5afa3efab15d7f6d0ca4f9fef46/?r=wd
 
Перейти    
Построить диаграмму по одному столбцу, а подписать значениями из другого столбца.
 
#
10.05.2025 17:12:43
Kotyn, https://www.planetaexcel.ru/techniques/4/40197/ 3-й вариант построения - выглядит так же как встроенная воронка, а функционал выше.
 
Перейти    
Построить диаграмму по одному столбцу, а подписать значениями из другого столбца.
 
#
10.05.2025 16:53:29
Kotyn, Для такого тапа номограмм (тип воронка) скорее всего не выйдет. Применяйте тип линейчатой номограммы - там можно брать значения из сторонних ячеек
 
Перейти    
Вычислить формулу из цифр и букв, Преобразовать цифры и буквы в формулу и вычислить результат
 
#
10.05.2025 13:50:45
Ну я бы писал что то вроде такой UDF -ки...
Код
Public Function pos4itat(txt As String) As Variant
Dim rez As String:  rez = ""
Dim i As Long
On Error GoTo ErrHandl
For i = 1 To Len(txt)
    simv = Mid(txt, i, 1)
    If simv Like "[0-9,x,х,.,*,chr(44)]" Then
        If simv = "х" Or simv = "x" Then simv = "*"
        If simv = "," Then simv = "."
        rez = rez & simv
    End If
Next i
pos4itat = Evaluate(rez): Exit Function
ErrHandl: pos4itat = "Ошибка исходных данных."
End Function
Изменено: tutochkin - 10.05.2025 13:55:14 (х и x это две разные х... :))
 
Перейти    
Безопасность проекта
 
#
08.05.2025 15:49:02
Ronin71, ну так и задумано. Сие видно сразу (хотя не факт...). Полезут исправлять, исправят и... и остальное (корректировки работы макросов) оставят. А что не правильно стало работать - так тут сразу и не поймёшь, народ успокоился... а как поймут спустя время - так сами в код лезали, вдруг что сами напортачили.

А что "не факт", так листы изначально можно сделать "суперскрытыми" (по умолчанию,  и при закрытии файла), и макрос при нормальном процессе работы их переводил в видимый формат. При ненормальном - удалял.

Но опять же - это всё баловство, и мелкие пакости. Если заказ - то 100% предоплата. Или договор, если сумма значима. Иначе - спасибо, приходите ещё.
ПыСы может я и не прав.  
Изменено: tutochkin - 08.05.2025 15:53:59
 
Перейти    
Безопасность проекта
 
#
08.05.2025 14:11:48
Ronin71, ну тема не нова... Однако
1. Чтобы макрос сам удалил модули нужны определённые права на машине где файл запущен, если я правильно помню.
2. Если есть возможность запустить/открыть без выполнения макросов (а открывать можно и не в МSO), то при наличии опыта и желания можно "вылечить" зловредность.

Для себя понял что сделать коммерческий продукт с возможностью лицензий и т.д. фактически не реально (либо трудозатраты на защиту будут выше чем на сам проект собственно).

А так... В качестве "пакости" можно:
1. Корректировка результатов работы программы. Уж в языке М замена пары символов может привести к очень интересным результатам...
2. Несохранение результата, или сохранение с корректировкой рандомной. Либо заменой всех (или не всех...) формул на листах на значения...

Опять же - это лечится, но ... но "работает не верно" совсем не то же что "не работает".

Впрочем это не более чем мысли в слух, ибо разработкой проектов на заказ не занимаюсь. Хотя свои наработки по работе стал таким макаром шифровать, а то поток "временных" работников велик, и не хочу раздавать своё в сторонние организации. Как сделать - показываю. Хотят сделать сами - ноу проблем. Иначе через некоторое время получают что то вроде этого
 
Перейти    
Р7 офис, Импортозамещение аналог excel
 
#
01.05.2025 23:49:14
bigorq, а причём тут LO, если тема про Р7 и онлиофис? Причём было явно прописано в каких редакторах проблема.
 
Перейти    
Р7 офис, Импортозамещение аналог excel
 
#
01.05.2025 21:55:06
bigorq, это где так? Под виндой и у Р7 и у ОО интерфейс иной, и не даёт поставить третий знак.

Упд а вот так 7 работает с расчётом полиномов. Линия тренда? Не, не слышали...
(файл один и тот же, поочерёдно открыт в трёх редакторах)
Изменено: tutochkin - 01.05.2025 22:07:22
 
Перейти    
Р7 офис, Импортозамещение аналог excel
 
#
01.05.2025 20:13:48
Глянул старый косяк - неадекватность работы с графиками (что в Р7 что в ОО)

Кто хочет - может проверить. Исходные данные на листе. График точечный
1. Шкала в настройках не соответствует шкале графика
2. Никаким боком не выйдет поставить шкалу с третьим знаком после запятой (например 0.011...)

Т.к. я много работаю с номограммами мне это очень важно. Про сие писал более года назад на почту Р7 и... и всё как было.
 
Перейти    
Р7 офис, Импортозамещение аналог excel
 
#
01.05.2025 17:25:50
sokol92, если послушать доклад, что по ссылке выше, или почитать чат в телеге, то выяснится что не в этом трабла. Основная проблема что поведение меняется в зависимости от версии Р7. Т.е. "раньше при вставке преобразовывалось в дату, теперь в текст " (с). Что будет потом никто не скажет.

ПыСы ставить себе несколько версий Р7 и отслеживать что где как, являясь по сути бетатестером за свои деньги, желания нет. И я с ужасом жду обязания перехода на это поделие.
 
Перейти    
Как нарисовать кривую линию над рядом данных в диаграмме эксель, нарисовать кривую линию над рядом данных в диаграмме эксель
 
#
03.04.2025 14:12:53
Уважаемые, рисуют с помощью средств рисования (вставка - фигуры). /ирония
 
Перейти    
Страницы: 1 2 3 4 5 6 7 8 9 10 11 ... 29 След.
Наверх