Выбрать дату в календареВыбрать дату в календаре

Страницы: 1 2 3 4 5 6 7 8 9 10 11 ... 148 След.
Макрос подбора параметра для расчета объема продаж от норматива по прибыли
 
Цитата
Shiola написал:
Просто огромнейшее вам спасибо!!!!
Удачи Вам!  :)
Не создается именованный диапазон
 
RefersTo:=Range("...")
Макрос подбора параметра для расчета объема продаж от норматива по прибыли
 
Добрый день, этот код сделает то, что требуется:

Код
Изменено: ZVI - 27.03.2024 21:22:04
Решение оптимизационной задачи о назначении, Необходимо распределить автобусы разной вместимости на конкретные рейсы с учетом мощности пассажиропотока на них
 
Если задача теоретическая или учебная, то уменьшить количество переменных и объяснить причину.
Или попытаться использовать какой-нибудь другой солвер, например, OpenSolver, не имеющих таких ограничений на количество переменных. Можно вместо Excel использовать LibreOffice, там вроде OpenSolver и используется.  
Но много вариантов перебрать также не получится, так как перебор через пересчет формул на листе - медленный.
Если же задача коммерческая, то она же будет иметь приличный коммерческий эффект, в т.ч. и с учетом затрат на заказ коммерческого решения.
Решение оптимизационной задачи о назначении, Необходимо распределить автобусы разной вместимости на конкретные рейсы с учетом мощности пассажиропотока на них
 
Цитата
написал:
Думал может их можно как-то обойти... или на C написать макрос...
Перебирать все варианты - жизни не хватит.
Вариант - перебирать большое количество вариантов по Монте-Карло, фиксируя минимальное значение решения.
Лучше на оптимизированном коде в C, конечно, чтобы больше вариантов было за разумное время.
Вот здесь использовал такой подход, но на другой задаче
Решение оптимизационной задачи о назначении, Необходимо распределить автобусы разной вместимости на конкретные рейсы с учетом мощности пассажиропотока на них
 

Добрый день, Сергей.

Что пытались сделать и с какой конкретно проблемой столкнулись – не написано, и в файле параметры Поиска решения пустые. Собственно, и просьб в сообщении нет.

Файл посмотрел, сочувствую – такие задачи встроенным в Excel Поиском решения не решить из-за ограничения – не более 200 переменных.

Функция РАЗНДАТ некорректно определяет количество месяцев
 
Цитата
Nadezhda995 написал:
Некорректно срабатывает функция Разндат
Добрый день!
РАЗНДАТ всегда работала хитро, выдавая в некоторых случаях отрицательные дни или неправильно их считая.

Это устаревшая функция для совместимости с древними версиями, давно не рекомендованная Microsoft к применению.
Особенности этой функции и ее замена VBA-функцией обсуждались в 2008г. в теме Разница дат

P.S. В Вашем случае =РАЗНДАТ("31.03.2024";"07.12.2026";"m") сработала корректно, т.к. разница 2 года 10 мес. 7 дн., в месяцах это 32. Но зачем там +1 непонятно. Если бы прибавлялся 1 день для стажа, то смысл есть, но у Вас прибавляется 1 месяц.
Изменено: ZVI - 26.03.2024 19:33:03
Анализ и представление
 
Igor Paperin, добрый день, и все же добро пожаловать на Планету!
Видел Ваше сообщение #1 ранее в ветке Работа.
Там ему точно не место: Вы – не Заказчик конкретной работы, а для исполнителя Вам там рановато быть согласно Правилам ветки.
Получается, одно из двух: либо Вы не ознакомились с Правилами, либо решили их проигнорировать. И то и другое сводит на нет всю солидность Вашего предложения о сотрудничестве.

Здесь, в Курилке как бы нет ограничений, хотя вроде бы обсуждалось, что сообщения рекламного характера нужно сначала согласовывать с админом. Можете попросить модераторов, чтобы просто удалили тему, если посчитаете, что она сработала против Вас.
Активность похвальна, просто учитывайте правила.

Всем местным - ну, кто из нас не ошибался?
Может, вернемся к обсуждению тематики Excel?
Хотя, это же Курилка )
Ушел из жизни Сергей (Serge_007)
 
Очень печальное известие.
Соболезную семье и близким.

Он активно участвовал здесь, а потом создал и поддерживал свой креативный сайт по Excel, ставший точкой сбора знаний и решений его множества участников.

Остались фотки онлайн встреч, которые Сергей неоднократно организовывал, остался его чудесный сайт и светлая память о Сергее Изотове.
Особенность сортировки диапазона с формулами, Баг или фича?
 
Цитата
написал:
Владимир, спасибо, не знал этого.
Владимир, приветствую! Знать бы еще, зачем так сделано 🙂
VBA Часть текста "полужирный" в буфер обмена, из переменной, Скопировать текст в буфер обмена, при этом его часть сделать "полужирной"
 
Для инфо:
В современных операционках буфер обмена (БО) - множественный: хранит не только последнее, но и предыдущие значения, а там могут быть тяжеловесные объекты. Перейдите на рабочий стол  и нажмите Win+V - откроется панель БО операционной системы.
Такое нововведение (с Win10 вроде бы) тормозит работу приложений с БО.
От его заполненности и неповоротливости зависят и задержки.
OpenClipboard(0) очищает лишь последнее значение в буфере  обмена.
Excel использует свой собственный БО, который взаимодействует и с БО операционной системы.
Кроме того, есть приложения, которые мониторят содержимое БО, что еще добавляет проблем.
Тестировать код лучше с БО операционки, набитым всякими разными данными.
Особенность сортировки диапазона с формулами, Баг или фича?
 
Цитата
dhead написал: ...забавная особенность. И официальной инфы никакой, да и на форумах тоже ничего не нашел.
Просто редко случается. Вот, когда-то в 2008м отвечал на MrExcel - Sorting doesn't sort
VBA Часть текста "полужирный" в буфер обмена, из переменной, Скопировать текст в буфер обмена, при этом его часть сделать "полужирной"
 
DoEvents у меня всегда после EmptyClipboard и CloseClipboard.
В своей надстройке обязательно проверяю (без DoEvents), что буфер обмена отрыт успешно:
Код
  If OpenClipboard(0) = 0 Then
    MsgBox "Can't open Clipboard" & vbLf & "Try hitting Win-V and clean a Clipboard buffer", vbCritical, "Get Clipboard Error"
    Exit Function
  End If

Причем EmptyClipboard у меня опциональный, то есть и без него норм. работает.
Никогда проблем не было, тестировать помогали 2 человека на своих компах - тоже без проблем.
Изменено: ZVI - 25.03.2024 13:40:24
Особенность сортировки диапазона с формулами, Баг или фича?
 
dhead, да, проявляется только при сортировке,  других ситуаций не знаю
VBA Часть текста "полужирный" в буфер обмена, из переменной, Скопировать текст в буфер обмена, при этом его часть сделать "полужирной"
 
Цитата
AlexGor написал:
Глюк ушёл
DataObject и сам по себе может глючить, когда открыто диалоговое окно экслорера Windows, на всякий случай проверьте и такую ситуацию.
Не смотрел коды этой темы, но почему бы вначале не очищать буфер с помощью API EmptyClipboard?
Особенность сортировки диапазона с формулами, Баг или фича?
 
Цитата
dhead написал:
Мне казалось, что на листе МойЛист формулы =МойЛист!А1 и =А1 идентичны и должны во всех случаях обрабатываться одинаково. Но нет.
Всегда так было, это особенность
Поиск совпадений в двух списках с разными форматами ФИО, Поиск совпадений в двух списках с разными форматами ФИО
 
Схожие вопросы ходят косяками )
Аналогично соседней теме можно использовать надстройку нечеткого поиска Fuzzy Lookup (64-битная версия тоже работает).
Приложил результат ее использования для данной задачи
Изменено: ZVI - 24.03.2024 03:11:05
Сопоставление похожих текстовых выражений
 
Может помочь надстройка нечеткого поиска Fuzzy Lookup (64-битная версия тоже работает).
Приложил результат ее отработки, в столбце С - найденные позиции,
а в столбце D  - степень схожести, чем ближе значение к 1, тем точнее совпадение.
Изменено: ZVI - 24.03.2024 03:11:42
Разделение текста по разделителю на строки
 
Цитата
Максим написал:
на 2013 версии сижу, либо и вовсе на 2007
Понимаю. Хорошо что решение найдено.

На всякий случай насчет макросов - на время сессии Excel  можно временно вписать код в модуль xlsx и выполнить, а при закрытии не сохранять. Код можно при желании экспортировать из VBE в текстовый файл *.BAS или *.TXT, а в следующий раз временно импортировать снова в XLSX. Никаких Excel-файлов с макросами нет. Все временно создается и работает в оперативной памяти. Это, надеюсь, не нарушает корпоративных правил и работает, если при установке Excel установлен и VBA (обычно установлен).
Изменено: ZVI - 24.03.2024 03:47:37
Разделение текста по разделителю на строки
 
Цитата
Максим написал: ...надстройки и макросы запрещены к применению на моей работе...
PQ давно не надстройка, а встроенная функциональность Excel 2016+
Изменено: ZVI - 23.03.2024 18:48:47
VBA макрос для распознания длины линии в пикселях, px
 
Еще есть Zoom - меняет размер фигуры (в пикселях) в разы, но результат подобных расчётов при этом поменяется незначительно, что неправильно
Изменено: ZVI - 21.03.2024 06:28:11
Не работают макросы на сетевом диске, Майкрософт блокирует макросы
 
Цитата
ArsB написал:
...В надёжные расположения тоже пытался добавить этот диск, но Эксель не позволяет это сделать...
Добрый день.
Закройте Excel и в реестре в ветке HKEY_CURRENT_USER\SOFTWARE\Microsoft\Office\16.0\Excel\Security\Trusted Locations
создайте/измените параметр DWORD (32 бита) с именем AllowNetworkLocations и присвойте ему значение 1
Максимальное количество повторяющихся значений, Максимальное количество повторяющихся значений
 
Один из множества вариантов:
Количество мужчин: =СЧЁТЕСЛИМН(A2:A11;"м";B2:B11;">0")
Количество женщин: =СЧЁТЕСЛИМН(A2:A11;"ж";B2:B11;">0")
Сравните самостоятельно.
Автоподбор в выпадающем списке
 
Новую функциональность получают сначала те, кто подписан на план Microsoft 365 Insider (бета тестирование):
"The AutoComplete for dropdown lists feature is rolling out to Office Insiders running Beta Channel Version 2202 (Build 14907.20000) or later."

При этом обновления для тестирования новой функциональности рассылаются по времени случайным образом: могут прийти через 1 месяц и позже.
Очередное обновление вполне могло и отобрать что-то )
"Sometimes we remove elements to further improve them based on your feedback"

При переустановке Excel подписка на Beta Channel отключена, но даже если ее включить, то придется опять ждать, когда пришлют что-то новенькое, не до конца протестированное.
Изменено: ZVI - 14.03.2024 04:07:17
Workbook_Open() в Excel Online
 
Цитата
evgeniygeo написал:
"...что, куда и в какой момент нужно вставлять"
Крутой вопрос вообще-то.
В Excel нет встроенных средств для этого.
Надстройка для on-line Excel создаётся либо в Visual Studio, либо в Yeoman generator for Office Add-ins. И требуется подписка на Microsoft 365 E5 subscription (including Office on the web). Еще и IIS (веб-сервер) нужно установить локально для отладки.
Вот ссылка на инструкцию, что и где скачать с примером простейшей надстройки -  Build an Excel task pane add-in
Если/когда разберётесь, то, может, и  поделитесь здесь впечатлениями.
Изменено: ZVI - 14.03.2024 00:51:37
Workbook_Open() в Excel Online
 
В Java Script точно нет такого события.
Есть кривая имитация:
https://learn.microsoft.com/en-us/office/dev/add-ins/develop/run-code-on-document-open
Заметки (примечания) "убегают" в конец листа
 
Цитата
rybacot написал: ZVI, благодарю, все работает
Рад, что помогло
Заметки (примечания) "убегают" в конец листа
 
Цитата
rybacot написал: ... только к выделенным ячейкам ...
Например так:
Код
Sub FixComments()
  Dim Rng As Range, Cell As Range
  On Error Resume Next
  Set Rng = Selection.SpecialCells(xlCellTypeComments)
  If Rng Is Nothing Then
    If ActiveSheet.ProtectContents Then
      MsgBox "Сначала снимите защиту листа", vbExclamation, "FixComments"
    Else
      MsgBox "Нет примечаний в выделенном диапазоне", vbExclamation, "FixComments"
    End If
    Exit Sub
  End If
  On Error GoTo exit_
  For Each Cell In Rng
    With Cell.Comment.Shape
      .Top = Cell.Top - 10
      .Left = Cell.Left + Cell.Width + 10
      .Height = 50
      .Width = 110
    End With
  Next
  MsgBox "Исправлено примечаний: " & Rng.Cells.Count, vbInformation, "FixComments"
exit_:
  If Err Then MsgBox Err.Description, vbCritical, "FixComments"
End Sub

Здесь, как и в коде Виктора, для упрощения ширина и высота примечаний задаются фиксированными.
Правильнее эти параметры вычислять и задавать индивидуально, учитывая ещё и масштаб (zoom) листа, но это посложнее.
Изменено: ZVI - 06.03.2024 21:16:03 (Учтена защита листа)
Проблемы с подключением
 
В месте компьютерной WiFi-антенны может быть слабый прием или мешающие каналы в том же или в соседних каналах.
Это легко посмотреть в приложениях на мобильном.
Например, в этих картинках Wifi Analyzer показывает проблему в диапазоне 2-6 каналов:
Изменено: ZVI - 06.03.2024 12:58:47
Оставить на листе только отфильтрованные строки, Без временных листов и других костылей
 
Можно мышкой:
Файл - Сведения - Найти проблемы - Проверить документ - Да (сохранить и проч) -
Проверить - Скрытые строки и столбцы - Удалить все
Страницы: 1 2 3 4 5 6 7 8 9 10 11 ... 148 След.
Наверх