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

Страницы: 1
Макрос для сохранение книги в cvs формат с параметрами.
 
#
22.06.2021 18:57:12
Всем привет,

Есть задача по макросу, если кратко, то есть шаблон, в котором изменяются данные, количество столбцов не изменчиво, строк - бывает разное. Иногда, нужно экспортировать эти данные в отдельный файл с форматом cvs, поэтому необходим макрос, который:

1) Сможет сохранять файл в формате cvs из xls по нажатию кнопки.
2) Будет сохранять файл с названием. Название динамическое, берется из ячейки и автоматом нужно добавить yyyy.mm.dd. hh:mm
3) Класть новый файл в выбранную папку, в том числе заменять старый файл. Путь постоянный.
4) По выбору, копировать каждый раз содержимое сохраняемого файла на Лист 2, с шапкой "Дата + название".
5) Сделать консолидированную таблицу на листе 3, со списком всех "экспортов" и гиперссылку для быстрого перехода на строчку Листа 2.

Жду ваши предложения.


2021.06.23 Добавил в ТЗ. См. ниже.
6) Сможет восстанавливать указанное содержимое с Листа2 (эти данные - 4) в файл CVS (туда же - 3) через кнопку (как у - 1)

PS. Документ ушел на доработку, поэтому немного отложу заказ. Всем кто заинтересован, пожалуйста оставляйте заявки и как только будет закончена доработка, думаю в течении пары недель, я сразу запущу в работу.

2021.06.24 Добавил в ТЗ. См. ниже.
7) На "Листе 1" будет размещено две таблицы. Ко второй применяются все те же задачи, что и к первой. Экспорт данных на отдельную страницу..
8 ) Условное форматирование ячеек с данными "правой" части таблицы, с идентичными значениями в левой"  (разные цвета)  
Изменено: evghtcone - 24.06.2021 15:31:31
 
Перейти    
Условное форматирование. Сравнение дат и заполненность ячеек строк
 
#
30.11.2020 09:25:55
Добрый день всем,
Необходимо сделать условное форматирование, в ячейки каждого столбца, строчки №7, при выполнении одновременно трех условий:
1) если дата на сегодня больше чем дата указанная в строчке 1 для каждого столбца.
2) если одна из ячеек диапазона строчек 2-6 заполнена для каждого столбца.
3) если ячейка строчки 7 не заполнены для каждого столбца.

Формулы прописал, собрать не смог. Подскажите, пожалуйста.

Обновил файл на 2020.12.02 7:52 по МСК
 
Перейти    
Возможно ли произвести подсчет уникальных неизвестных значений в таблице, где "ключ"-значение находиться в ячейке вместе с другим текстом?
 
#
06.11.2020 08:57:31
Добрый день всем,
Возможно ли произвести подсчет уникальных неизвестных значений в таблице, где "ключ"-значение находиться в ячейке вместе с другим текстом?

Необходимо найти количество уникальных "ключей" из таблицы, где ключ это - знак "*" и "4 цифры" (например *1000,*1001,*1002)
В таблице в основном ключи находятся в начале каждой ячейки (первые 5 символов), в редких исключениях бывает по два "ключа" в каждой ячейке. (например "*1000 Планерка на тему ошибки, *1047 Планерка по проекту")

Нашел только как считать известные заранее уникальные повторяющиеся значение
=COUNTIF(I$31:BE$35;"**")-COUNTIF(I$31:BE$35;"*(уникальное значение)*")

Спасибо за внимание
 
Перейти    
Посчитать количество знаков в диапазоне без прямой ссылки на этот диапазон
 
#
10.03.2020 15:12:06
Добрый день

Есть формула,
Код
СУММПРОИЗВ(ДЛСТР($I$17:$L$17)-ДЛСТР(ПОДСТАВИТЬ($I$17:$L$17;"*";"")))  
- вместо $I$17:$L$17 нужно вписать адрес массива и брать данные из первых 4 колонок.

Не соображу как делать, помогите пожалуйста.
(для информации Я считаю сколько раз символ "*" попадается в тексте)
Изменено: evghtcone - 10.03.2020 15:43:00
 
Перейти    
Конвертировать макрос VBA под Google sheet (JS)
 
#
25.02.2020 08:57:36
Добрый день,
Есть задача конвертировать макрос VBA под Google sheet (JS) - Вставить дату и время внесения/изменения данных перед самим текстом.

Пример:
Вписал руками   : Привет
Макрос добавил : 2020.02.25 08:11
Получилось        : 2020.02.25 08:11 Привет

Код
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("A2:A100")) Is Nothing Then  'если изменененная ячейка попадает в диапазон A2:A100
    Application.EnableEvents = False ' блокируем обработку событий на время работы кода
    For Each cell In Intersect(Target, Range("A2:A100"))   'проходим по всем измененным ячейкам
            With cell         'Добавляем в ячейку дату
               If .Value <> "" Then .Value = Format(Now, "DD.MM.YYYY hh:mm ") & .Value
            End With
        Next cell
    Intersect(Target, Range("A2:A100")).EntireColumn.AutoFit  'выполняем автоподбор ширины для столбца B, чтобы дата умещалась в ячейке
    Application.EnableEvents = True ' востанавливаем обработку событий.
End If
End Sub
Изменено: evghtcone - 25.02.2020 09:13:16
 
Перейти    
Автоматическая вставка текущей даты, в ту же ячейку что и введенный текст.
 
#
24.02.2020 08:00:25
Доброе утро,
Помогите кто разбирается в макросах, а именно нужно дополнить решение Николая Павлова  по "Автоматической вставке текущей даты" где дата добавляется в соседнюю ячейку. https://www.planetaexcel.ru/techniques/6/44/ "

На примере
Я внес в ячейку текст: "Привет"
>  макрос сцепил текущую дату и время и введенный мной текст"
Получилось:  2020.02.24 8:55 Привет
 
Перейти    
Подсчёт количества ячеек с текстом не содержащих символ с фильтрацией по дням недели.
 
#
24.02.2020 07:08:07
Доброе утро всем,

Подскажите с решением, а именно нужно: посчитать количество заполненных ячеек, не содержащих символ "///", с разноской по дням недели.  
Изменено: evghtcone - 24.02.2020 11:36:43
 
Перейти    
Условное форматирование ячейки если она содержит Примечание
 
#
17.02.2020 09:55:39
Добрый день,
Кто знает как сделать "Условное форматирование ячейки если она содержит Примечание"
Изменено: evghtcone - 17.02.2020 10:00:56
 
Перейти    
Проставить TIMESTAMP в ту же самую ячейку после того как в ячейку был внесен или изменен текст.
 
#
03.02.2020 09:56:46
Добрый день,

Есть рабочий скрипт который проставляет Timestamp по факту изменения текст, он это делает в соседнюю ячейку.
Кто знает как это совместить Timestamp и вводимый текст?
Код
function onEdit(e) {
   var sheet      = e.source.getActiveSheet();
   var activeCell = sheet.getActiveCell();
   var col        = activeCell.getColumn();
   var row        = activeCell.getRow();
   if (col == 12) {
     sheet.getRange(row, 10).setValue(new Date()).setNumberFormat(&#39;dd/MM/yyyy H:m:s&#39;);
  }
}
 
Перейти    
Получить 3 первые заполненные ячейки из массива, сцепить полученные данные.
 
#
30.01.2020 11:45:14
Добрый день,

Есть задачка, а именно нужно Получить 3 первые заполненные ячейки из массива в одной, и поочередно к каждой добавлять вначало данные (дату.) из фиксированной строки.

Подскажите как решить или у кого есть идеи?
Изменено: evghtcone - 30.01.2020 12:09:38
 
Перейти    
Получить данные из другой ячейки при условии, что ячейка совпадает с искомой.
 
#
16.01.2020 14:46:41
Добрый день,

Нужна помощь,
Нужно "Получить данные из другой ячейки при условии, что ячейка совпадает с искомой.

Пример во вложении.
 
Перейти    
2 скрипта. "Экспорт данных элемента Trendline в файл" и "Фокусировка по координатам, Масштабирование и Принтскрин»
 
#
04.01.2018 18:47:39
Всем доброго дня.

Есть необходимость в двух скриптах.

Первый. Экспорт данных элемента Trendline в файл (базу данных).
При вызове скрипта (CTRL+1 (опционально) (на эту комбинацию уже повешен вызов другого Скрипта, поэтому нужно что бы оба работали от одной горячей клавиши),он должен:
1. Найти на графике элемент Trendline.
2. Экспортировать в файл данные Время1 и Значение1 и Время2 и Значение2, а так же ТФ  (5,15,30 … ) .


Второй. Фокусировка по данным-координатам, Масштабирование и Принтскрин.
При вызове этого скрипта, он должен обратиться к Базе и сделать следующее:
1. Предложить окно настроек: ТФмы с мультивыбором их, Период по времени с .. по..
2. Импорт данных из БАЗЫ (Время1 и Значение1 и Время2 и Значение2,)
3. Централизация графика согласно данных (Слева, Справа, Центр)
4. Масштабирование графика согласно данных (%)
5. Принскрин
6. Сохранить с уникальным именем
7. Положить в папку
8. Перейти к следующим данным

Приоритет - стоимость, срок не важен. В приложении файл Эксель + Картинка. Жду Ваших ваших вопросов и предложений.

С уважением Евгений.
 
Перейти    
Макрос "Дата ввода в ячейку с проверкой условия на совпадение текста"
 
#
08.11.2016 13:33:38
Ситуация: Сотрудники компании ведут Реестр по проектам, этих проектов всегда от 50, и моя задача найти способ - как я могу быстрого понять "по каким из проектов не ведется, ведется успешно, узнать причину и "помочь". Для этого я должен отследить продвижения проекта через выбор "статуса" через "Графическое представление.

Как это работает: Первый столбец - начало ввода, последний текущая дата, если последнее деление ниже чем деление показывающее "текущую дату" - значит работа не ведется

Задача: 1. Нужно сделать проверку условий "если", и при совпадении нужно вставить даты ввода (то что красным шрифтом) в соответсвующий столбец.
Задача: 2. Если между текущей датой (сегодня) и последним действием прошло более 30 дней выделить "графическое представление" красным.
Задача: 3. Защита от изменения, то есть повторный выбор для изменения даты

Примечание: Обратите внимание, что Статус не всегда выбирается пошагово и он может быть выбран со статуса "Дата ввода" перепрыгнуть сразу на "03/14 Выявл. Потребности"  например

За предложение которое будет лучше моего готов отблагодарить отдельно.


Бюджет: 500 р.
Последующие мелкие доработки +100 р.

Ваше личное предложение по улучшению таблицы +100 р.
Ваше личное решение которое будет лучше моего (более наглядно покажет "проблемы") + 500р к бюджету.

Ссылки на "опыт работы" и "на счастливых заказчиков" приветствуется)
Изменено: evghtcone - 10.11.2016 18:22:29
 
Перейти    
Макрос сохранения файла с именем из ячейки. Разрешить макросу работать при защите. Разрешить группировке работать при защите.
 
#
16.04.2016 12:29:29
Здравствуйте.
ТЗ на двух вкладках.

Бюджет 1000р
 
Перейти    
Подстановка значения в нужные n-ые месяца
 
#
20.01.2016 19:38:31
Привет всем.

Необходимо подставить значения в нужные n-ые месяца


Спасибо.

Закройте тему пожалуйста, решил сам.
Изменено: evghtcone - 25.01.2016 06:25:55
 
Перейти    
Страницы: 1
Наверх