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

Страницы: 1 2 3 4 5 6 7 8 9 10 11 ... 16 След.
Сдвинуты столбцы-диапазоны. Как совместить автоматически ?
 
#
29.05.2025 05:09:46
Спасибо !
Не просто оказалось. Буду разбираться.
Компьютер никогда не заменит человека (©️ Hannibal Lecter)
 
Перейти    
Сдвинуты столбцы-диапазоны. Как совместить автоматически ?
 
#
15.05.2025 10:42:27
Всем доброго дня.

Есть данные, выгруженные из 1С. Помесячно. Количество столбцов от месяца к месяцу не совпадает. Они (данные в столбцах) соответственно, смещаются друг относительно друга. Нужно как-то совместить, добавив, как я понимаю, в некоторых месяцах пустые столбцы-диапазоны.

Интересует, например, столбец "Всего начислено". И все эти данные  должны быть в одном столбце. А сейчас от месяца к месяцу - они в разных.

P/S/ Про необходимость правильной выгрузки из 1С прошу не упоминать. Доступа к 1С не имею. Нужно решение именно средствами Excel, исходя из того, что уже дано. Спасибо.
Изменено: Сергей Евдокимов - 15.05.2025 10:43:57
Компьютер никогда не заменит человека (©️ Hannibal Lecter)
 
Перейти    
VBA. Передать звуковой сигнал на другой компьютер по сети. Как ?
 
#
11.06.2024 10:22:55
Цитата
Sanja написал:
Просто она решается НЕ инструментами Excel
Именно это я и выяснял: можно или нельзя ? Был бы уверен, что нельзя - вопрос бы не задавал.
Теперь знаю. Спасибо.
Компьютер никогда не заменит человека (©️ Hannibal Lecter)
 
Перейти    
VBA. Передать звуковой сигнал на другой компьютер по сети. Как ?
 
#
11.06.2024 10:08:50
Цитата
Sanja написал:
Я конечно могу ошибаться, но Excel тут каким боком?
Ну задача такая. Человек делает определённые действия в сетевой excel-файле.  Мне нужен сигнал по факту завершения этих действий. Когда он закрывает файл запускается макрос и присылает мне сообщение. Мне удобнее не только видеть появление сообщения, но и слышать, что оно прилетело (если я вдруг от компьютера отошёл).
Компьютер никогда не заменит человека (©️ Hannibal Lecter)
 
Перейти    
VBA. Передать звуковой сигнал на другой компьютер по сети. Как ?
 
#
11.06.2024 09:51:34
Здравствуйте.
Здесь описано как передать текстовое сообщение.
А как передачу текстового сообщения сопроводить ещё и звуковым сигналом ? Чтобы ещё что-нибудь пикнуло или заиграло при передаче сообщения.
Спасибо.
Компьютер никогда не заменит человека (©️ Hannibal Lecter)
 
Перейти    
Динамический график. Автоматическое изменение диапазона отображаемых данных.
 
#
01.02.2024 07:52:57
Цитата
БМВ написал:
Примерно так
Спасибо. Уверен был, что вы легко щелкнете эту задачку )
Изменено: Сергей Евдокимов - 01.02.2024 07:57:05
Компьютер никогда не заменит человека (©️ Hannibal Lecter)
 
Перейти    
Динамический график. Автоматическое изменение диапазона отображаемых данных.
 
#
01.02.2024 07:37:59
Всё, разобрался.
Дату нужно превратить в именованный диапазон. Размерность которого брать смещением от данных фактического веса.

Всем спасибо ))
Компьютер никогда не заменит человека (©️ Hannibal Lecter)
 
Перейти    
Динамический график. Автоматическое изменение диапазона отображаемых данных.
 
#
01.02.2024 05:57:40
Здравствуйте, господа эксперты.

Вложением простой набор данных:  вес желаемый, вес фактический.

Как сделать,  чтобы при ежедневном внесении фактического веса  диапазон отображаемых данных в на графике сдвигался также на один день.  То есть чтобы план всегда опережал факт на неделю. Автоматически.

Возможно такое чудо ?

P/S/ Превентивно отмечу, что и у Николая, и у Дмитрия статьи про динамические графики-диаграммы смотрел.  Решение не нашёл.
Компьютер никогда не заменит человека (©️ Hannibal Lecter)
 
Перейти    
Макрос - копирование значения ячеек в буфер обмена
 
#
29.12.2023 07:48:28
Sanja, спасибо вам большое. Буду разбираться.
С наступающим !
Компьютер никогда не заменит человека (©️ Hannibal Lecter)
 
Перейти    
Макрос - копирование значения ячеек в буфер обмена
 
#
29.12.2023 06:16:47
Здравствуйте, vba-гуру.

Как скопировать в буфер обмена Windows  содержимое двух несмежных ячеек,  без использования промежуточной ячейки для слияния ?
Пример вложением.

Ячейка А1: Иванов
Ячейка С3: Петя

Результат работы макроса: в буфере обмена Windows   "Иванов Петя"

Спасибо.
Компьютер никогда не заменит человека (©️ Hannibal Lecter)
 
Перейти    
Макрос не подставляет имя файла при сохранении.
 
#
14.12.2023 08:00:07
Цитата
БМВ написал:
предположу что заданный фильтр  *.xlsx блокирует
Спасибо за попытку, но не помогло.
Компьютер никогда не заменит человека (©️ Hannibal Lecter)
 
Перейти    
Макрос не подставляет имя файла при сохранении.
 
#
14.12.2023 07:35:08
Здравствуйте.
Собственно сабж, но точная причина в том, что имя файла содержит точку.
Часть кода:
Код
    
FName = "Бронь. Колбаса"
    FName = Application.GetSaveAsFilename(InitialFileName:=FName, _
        FileFilter:="Excel Files (*.xlsx), *.xlsx", _
        Title:="Выберите или введите имя файла для сохранения")
    If VarType(FName) <> vbBoolean Then ActiveWorkbook.SaveAs FName


Если между "Бронь" и "Колбаса" стоит точка, то имя  файлы по умолчанию в диалоговом окне не подставляется. Без точки - подставляется. Т.е. именно точка блокирует эту возможность.
Есть решение? Надо чтобы точка была, но не мешала.
Изменено: Сергей Евдокимов - 14.12.2023 07:37:05
Компьютер никогда не заменит человека (©️ Hannibal Lecter)
 
Перейти    
vba Мониторинг директории в реальном времени, (починка кода)
 
#
27.09.2023 04:29:04
Цитата
sokol92 написал:
Что-то изменилось?
Нет. Не изменилось. А сетевую папку подключил и проверил ещё до написания поста.

P/S/ Решение нашел. Ежели кому надо мониторить (хоть локально, хоть по сети), то можно использовать вот эту бесплатную прогу. Контролирует и появление, и изменения, и удаление файлов. Обо всём уведомляет и визуально, и аудио. Автозапускается. Висит в трее, есть не просит. В общем то, что дохтор прописал..
Изменено: Сергей Евдокимов - 27.09.2023 04:31:55
Компьютер никогда не заменит человека (©️ Hannibal Lecter)
 
Перейти    
vba Мониторинг директории в реальном времени, (починка кода)
 
#
26.09.2023 11:20:41
Цитата
Андрей VG написал:
Попробуйте вариант на "родственном" языке  VBScript: слежение за созданием файлов в указанном каталоге
Не знаете, сия программа по сети должна мониторить ?
А то что-то у меня локально работает, а сетевую папку не мониторит.
Компьютер никогда не заменит человека (©️ Hannibal Lecter)
 
Перейти    
Замена всех встречающихся спецсиволов (\:*?"<>|/) формулой.
 
#
20.09.2023 05:53:42
Здравствуйте, господа эксперты.

Есть текстовая ячейка, возможно, содержащая спесимволы (\:*?"<>|/).
Надо формулой узреть их наличие и при таковом заменить на, например, "-" (дефис).

Полученное значение используется в качестве имени файла, где спецсимволы недопустимы.

P/S/ Можно конечно многоэтажно "подставить", но хотелось бы красиво, как вы умеете )
Компьютер никогда не заменит человека (©️ Hannibal Lecter)
 
Перейти    
VBA. Автофильтр по текущей дате.
 
#
12.09.2023 06:21:38
Цитата
Sanja :
Так?
Да, похоже именно так.
Спасибо Вам большущее..
Компьютер никогда не заменит человека (©️ Hannibal Lecter)
 
Перейти    
VBA. Автофильтр по текущей дате.
 
#
12.09.2023 05:37:08
Всем доброго дня.

Подскажите, пожалуйста, господа VBA-эксперты, как установить автофильтр по ТЕКУЩЕЙ дате ?

Sub ПростоМакрос()
   ActiveSheet.Range("$A$1:$C$454").AutoFilter Field:=3, Operator:= xlFilterValues, Criteria2:=Array(2, "9/12/2023")
End Sub

То есть вместо красновыделенной конструкции должна стоять текущая дата.
Оператор date выводит дату в другом формате. Надо, видимо, как-то преобразовать. А как ?
Спасибо.
Компьютер никогда не заменит человека (©️ Hannibal Lecter)
 
Перейти    
VBA. Скопировать один в один видимую сроку при наличии скрытых столбцов и использовании автофильтра.
 
#
26.07.2023 11:29:59
Цитата
Ігор Гончаренко написал:
самый правильный подход:файл-пример

Приложен. Даже с простейшим vba-кодом копирования. Именно он (этот код) и показывает, что копирование (при установленном автофильтре и скрытых столбцах) происходит со сдвигом данных по столбцам. Если автофильтр снять, то копирование происходит правильно, а если поставить и некоторые столбцы скрыть, то НЕправильно.

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

Цитата
Ігор Гончаренко написал:
на данных файла обьясняете.. где результат
Вроде указал на старте.
"Есть строка, нужна точно такая же, со всеми данными, включая скрытые, но в конце таблицы"

Например, всё содержимое второй строки должно полностью продублироваться в шестую строку в тех же колонках, данные друг под другом.

P/S/
SAS888 вижу переносит циклом значение каждой ячейчи.
Это единственный возможный вариант ?
Изменено: Сергей Евдокимов - 26.07.2023 11:56:13
Компьютер никогда не заменит человека (©️ Hannibal Lecter)
 
Перейти    
VBA. Скопировать один в один видимую сроку при наличии скрытых столбцов и использовании автофильтра.
 
#
26.07.2023 07:33:07
evgeniygeo, это не то, ибо не решает проблему.
Надо чтобы копировались данные из ВСЕХ ячеек во ВСЕ ячейки. Т.е. так, словно никаких фильтров не стоит и скрытых столбцов нет.
ОДИН-В-ОДИН. Тупо дубль. Полный.
Компьютер никогда не заменит человека (©️ Hannibal Lecter)
 
Перейти    
VBA. Скопировать один в один видимую сроку при наличии скрытых столбцов и использовании автофильтра.
 
#
26.07.2023 06:16:34
Здравствуйте.
Собственно тема, помогите.

Есть строка, нужна точно такая же, со всеми данными, включая скрытые, но в конце таблицы.
Фильтр убираю - все нормально копируется, фильтр ставлю - происходят какие-то сдвиги данных.

Как сделать 100%-ый дубликат строки?
Спасибо
Компьютер никогда не заменит человека (©️ Hannibal Lecter)
 
Перейти    
Макрос копирования таблицы и вставки в письмо как картинки
 
#
18.11.2022 11:47:37
Цитата
Дмитрий(The_Prist) Щербаков написал:
Код прикладывайте полностью

Прикладываю, Дмитрий
Полностью не стал, много уж там лишнего. Очистил. Сейчас, вроде, останавливается код на нужной ошибке.
На вопрос  - ответ по умолчанию ("нет").
Компьютер никогда не заменит человека (©️ Hannibal Lecter)
 
Перейти    
Макрос копирования таблицы и вставки в письмо как картинки
 
#
11.11.2022 05:34:32
Дмитрий, вложением часть вашего кода.
Работал более полугода. Исправно.
Вроде ничего не менялось, но вчера выдал ошибку.

Как понять причину ее появления, подскажите, плиз.

P/S/ или если Дмитрий не увидит, может кто другой даст совет как раскопать проблему и разрулить ситуацию ?


Цитата

Администратору: сорри (на берегу). Не знаю как сформулировать название для новой темы.  
Абстрактное "ошибка VBA" - ни о чем.
Изменено: Сергей Евдокимов - 11.11.2022 05:35:09
Компьютер никогда не заменит человека (©️ Hannibal Lecter)
 
Перейти    
Power Query. "Ключу не соответствует ни одна строка в таблице", Как нынче грамотные люди ищут источник ошибки ?
 
#
01.10.2022 06:03:16
Цитата
написал:
Цитата
Сергей Евдокимов написал:
Я вообще про принцип. Как искать такие ошибки ? Чиво крутить, што жать ? (если дело не в запросе)
Если вы делаете загрузку однотипных файлов из папки с помощью функции, то на шаге добавления функции видно будет где ошибка.
Именно так и делаю. Где ошибка - вижу. А причину ее появления пронять/устранить - не могу.
_____________________________________________

Были файлы формата .xlsx  Все прекрасно работало.
Некоторые из них сохранил в формате .xlsb Появились ошибки.

Подскажите, плиз, советом добрым.
Как раскрутить ситуацию, чтобы понять почему ошибки? Каков алгоритм? Куда копать?

Скрин ошибки


ДОПОЛНЕНИЕ: всё, помощи не надо. Ошибка пропала. Один в один переписал функцию, но на основе файла .xlsb
Код такой же. Странно.
Изменено: Сергей Евдокимов - 01.10.2022 06:34:02
Компьютер никогда не заменит человека (©️ Hannibal Lecter)
 
Перейти    
Развернуть формулой массивную запись для подсчета суммы из диапазона.
 
#
24.08.2022 10:07:12
Цитата
написал:
А, понял. Сперва создаем трудности, потом их преодалеваем.
Вы совершенно правы, так и развиваемся ))
За идею спасибо. Толково! Сделал.

Behruz A.N., спасибо. Вижу работает. Осталось разобраться "как". Непростая формула у вас. Еще и с подменой запятых )

memo, спасибо. Решение ваше, если не ошибаюсь, немного не отвечает условию задачи (п.5), но суть понятна и это главное. А остальное - технические мелочи.
Изменено: Сергей Евдокимов - 24.08.2022 11:27:20
Компьютер никогда не заменит человека (©️ Hannibal Lecter)
 
Перейти    
Развернуть формулой массивную запись для подсчета суммы из диапазона.
 
#
24.08.2022 07:20:54

Всем здравствуйте, господа эксперты.

1.       Есть исходные данные во вкладке «ИсходныеДанные»

2.       Название сметы есть всегда.

3.       Раздел сметы и сумма может быть, а может и не быть.

4.       Во вкладке «Итог» массивно-динамически создаю уникальную запись сметы и раздел сметы (при наличии)

5.       Обращаю внимание: если раздел сметы есть, то от названия он отделяется пробелом с запятой « ,». Причем это разделитель не уникальный,  может быть и в названии сметы (уникальным же разделителем является либо слово «раздел» либо «без раздела»)

Задача: во вкладке «Итог» получить формулой сумму в каждой строке.

Условия: без PQ, без VBA, без дополнительных столбцов и предварительных (где-либо) расчетов.

Имеет задача решение? Подкиньте хотя бы идею ))

P/S/ естественно, вся эта конструкция имеет гораздо большее количество строк/столбцов. Для удобства восприятия всё «лишнее» вырезал.

P/S/S/ Долго думал над названием темы. Не ругайте, пожалуйста, сильно, если не заходит формулировка. Согласен на любую )

Компьютер никогда не заменит человека (©️ Hannibal Lecter)
 
Перейти    
PQ. Взять значение из указанного столбца, но со сдвигом на одну строчку.
 
#
18.06.2022 16:15:23
Михаил Л, спасибо, но, к сожалению, не могу прикрутить ваш код, т.к. не понимаю, что он делает. И не знаю как его вставить.
Вас не затруднит указать на ошибку в моей конструкции на скрине?  Вроде она, конструкция,  как у Дмитрия в статье. И мне понятна. Плюс ошибку не выдает и чего-то там даже считает. Правда уже 4-ый час )

P/S/ Ура, всё посчитала. 3 часа 10 минут. Жесть ))
Изменено: Сергей Евдокимов - 18.06.2022 16:41:37
Компьютер никогда не заменит человека (©️ Hannibal Lecter)
 
Перейти    
PQ. Взять значение из указанного столбца, но со сдвигом на одну строчку.
 
#
18.06.2022 11:26:00
Дмитрий, оказывается, уже разжевал.

Скажите, вот эта конструкция правильно написана же. Верно? Ничего, вроде, в ней криминального.
Конструкция

А обрабатывал её комп часа 1,5. Дальше я остановил процесс.
Отображались при этом какие-то десятки миллионов строк.
Откуда их вдруг такое количество? И почему так долго?

Скрытый текст
Изменено: Сергей Евдокимов - 18.06.2022 16:00:42
Компьютер никогда не заменит человека (©️ Hannibal Lecter)
 
Перейти    
PQ. Взять значение из указанного столбца, но со сдвигом на одну строчку.
 
#
18.06.2022 10:51:51
Всем доброго дня.
Помогите, плиз, с конструкцией в Power Query.


В приложенном файле написано, продублирую здесь:
Если значение в ячейке столбца "B" пусто (отсутствует), то установить в эту пустую ячейку значение из того же столбца "B", но из строчки ниже (напротив красной "Всего по позиции")

P/S/ Чем то похожая задача здесь была рассмотрена. Но никак не могу совместить их для решения.
Компьютер никогда не заменит человека (©️ Hannibal Lecter)
 
Перейти    
Игнорировать ноль и пустые ячейки в СЧЁТЕСЛИ()
 
#
17.05.2022 09:44:55
Круто. Всем спасибо.
Еще лет на 10 точно закрыли вопрос ))
Компьютер никогда не заменит человека (©️ Hannibal Lecter)
 
Перейти    
Игнорировать ноль и пустые ячейки в СЧЁТЕСЛИ()
 
#
17.05.2022 07:50:41
Здравствуйте.

Сия тема есть, но она в архиве.
И решение там есть, но ему больше 10 лет.

Много воды утекло, может что полаконичней появилось вместо этого?
=СЧЁТЕСЛИ(A:A;">0")+СЧЁТЕСЛИ(A:A;"<0")
Компьютер никогда не заменит человека (©️ Hannibal Lecter)
 
Перейти    
Страницы: 1 2 3 4 5 6 7 8 9 10 11 ... 16 След.
Наверх