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

Страницы: 1 2 3 4 5 6 7 8 9 10 11 ... 15 След.
Вывод в ячейку листа количества ячеек с жирным шрифтом из диапазона другого листа (VBA)
 
#
12.02.2026 14:52:08
МатросНаЗебре, благодарю!
 
Перейти    
Вывод в ячейку листа количества ячеек с жирным шрифтом из диапазона другого листа (VBA)
 
#
12.02.2026 13:52:56
МатросНаЗебре,
Код
Function Func(rRng As Range)  
Dim cell As Range  
For Each cel In rRng  
If cell.Font.Bold = True Then Func = Func + 1  
Next  
End Function
)))))
Просто не подошла, закрыл тему без сохранения функции)
 
Перейти    
Вывод в ячейку листа количества ячеек с жирным шрифтом из диапазона другого листа (VBA)
 
#
12.02.2026 13:30:58
МатросНаЗебре, выводит #ИМЯ?
Ексель 2007
 
Перейти    
Вывод в ячейку листа количества ячеек с жирным шрифтом из диапазона другого листа (VBA)
 
#
12.02.2026 11:10:36
Добрый день!
Нашел функцию для подсчета ячеек с жирным шрифтом, но формула не пересчитывается, помогите с макросом, чтобы его на событие привязать!
Заранее благодарю!  
 
Перейти    
Выбор нужного листа в выпадающем списке и переход на него
 
#
27.01.2026 09:52:25
OTK76, по клику в ячейку A1 выводит список листов с возможностью перехода
Код
        If Not Intersect(Target, Range("A1")) Is Nothing Then 'Меню перехода на лист в ячейке
        If Target.Cells.CountLarge > 1 Then Exit Sub
            Call Application.CommandBars("Workbook tabs").ShowPopup  'переход на лист
        End If
 
Перейти    
Копирование и именование листов EXCEL датами по возрастающей
 
#
20.11.2025 14:48:58
Отлично! Спасибо большое!
Цитата
А как Вы завтра будете лист копировать
Приходится делать часто, но не каждый день...

Хорошего дня!
 
Перейти    
Копирование и именование листов EXCEL датами по возрастающей
 
#
20.11.2025 13:26:48
МатросНаЗебре, благодарю, как надо! А можно еще (прошу прощения, не указал изначально) реализовать, чтобы кнопка на следующих листах исчезала?
 
Перейти    
Копирование и именование листов EXCEL датами по возрастающей
 
#
20.11.2025 12:43:06
Всем доброго времени суток!

Прошу помочь с макросом по копированию листов в документе(по кнопке)  и переименование их датой, следующей за предыдущей
Т.е. я переименовал 1 лист в 22.11, по кнопке 22.11 копируется с данными в нем и переименовывается датой 23.11, следующий 24.11... и т.д.
Изменено: evg_glaz - 20.11.2025 12:46:59
 
Перейти    
Подсветка значения в диапазоне (столбце), если в тексте в ячейке есть данное значение
 
#
30.05.2025 09:11:42
Sanja, в примере всё работает, в моем файле ругается на строку
Код
                arr = Range("P2:P" & Cells(Rows.Count, "P").End(xlUp).Row)
именно arr выделяет синим.
Если закомментировать Option Explicit,
Заменил код на измененный Вами, но всё равно цвет по умолчанию срабатывает, но подсветки не происходит.

Нашел ошибку... в своих руках/глазах. Всё отлично работает, большое спасибо!
Изменено: evg_glaz - 30.05.2025 09:44:15
 
Перейти    
Подсветка значения в диапазоне (столбце), если в тексте в ячейке есть данное значение
 
#
29.05.2025 17:56:51
Sanja, то что надо!
Большое спасибо за очень оперативное решение задачи!
Хорошего вечера (или ночи)))
 
Перейти    
Подсветка значения в диапазоне (столбце), если в тексте в ячейке есть данное значение
 
#
29.05.2025 17:55:41
Dmitriy XM, маленько криво - подсвечивает, но потом остаются желтыми ячейки.
СПАСИБО в любом случае!!!
 
Перейти    
Подсветка значения в диапазоне (столбце), если в тексте в ячейке есть данное значение
 
#
29.05.2025 16:43:26
Доброго дня!
Помогите решить задачу:
В диапазоне "I9:I108" в ячейках текст (планируемые задачи). В столбце P перечислены регионы (н-р МОСК, ННОВ, САР, НСИБ).
Как сделать (желательно макросом), чтобы если в тексте планируемых задач есть "МОСК", то при активации этой ячейки с задачей "МОСК"  в столбце P подсвечивалось цветом.
Заранее благодарен!
Изменено: evg_glaz - 29.05.2025 16:48:00
 
Перейти    
Напоминание по дате/времени
 
#
23.04.2025 17:10:36
MikeVol, спасибо большое!!!
 
Перейти    
Напоминание по дате/времени
 
#
22.04.2025 12:12:22
MikeVol, Подпилил, докрутил. Заработало. Помогите, пожалуйста, чтобы при срабатывании активировалась/выделялась ячейка с датой строки с напоминанием, которое сработало.
СПАСИБО!
 
Перейти    
Напоминание по дате/времени
 
#
22.04.2025 10:40:05
IKor, как вариант, но в общей книге лист Календарь всегда не активен, могу пропустить событие
 
Перейти    
Напоминание по дате/времени
 
#
22.04.2025 09:39:48
MikeVol, заполнил строки ниже - заработал код. Но, при открытии книги, если время/дата прошло - не срабатывает.
Код
Private Sub Workbook_Open()
    StartChecking
    CheckTask
End Sub
не помогает


 
 
Перейти    
Напоминание по дате/времени
 
#
21.04.2025 14:08:00
MikeVol, ничего не происходит
Изменено: evg_glaz - 21.04.2025 14:08:31
 
Перейти    
Напоминание по дате/времени
 
#
21.04.2025 09:31:06
Цитата
написал:
Ваш файл обрушил мой офис
Капец!!! Файл вновь созданный, из макросов только код часов, больше ничего!
Не понимаю, как такое могло произойти....
Видимо после такого мне вряд ли кто-то решиться помочь((
 
Перейти    
Напоминание по дате/времени
 
#
18.04.2025 14:10:27
Доброго времени суток!
Прошу помочь:
В табличке столбец G - дата, в соседнюю ячейку - время, далее - задача.
Прошу помочь чтобы при совпадении даты и времени с сейчас срабатывало какое нибудь событие (н-р ячейка Е6 меняла цвет, ну или чтото, дальше сам под себя допилю.
У меня этот лист в файле не всегда открыт, потому что то срабатывать (мигать/пищать) будет на соседнем листе.
Мысль моя такова - вся процедура срабатывает по Worksheet_Change в ячейке Е6 (там часы)
Найденные в инете коды либо вешают Ексель, либа с моими руками не работают))))
Спасибо!
Изменено: evg_glaz - 18.04.2025 14:25:41
 
Перейти    
Прекращение работы макроса, если в книге скопирована информация
 
#
18.10.2024 09:11:30
Sanja, добрый день! Никак не пойму куда код вставить... Допустим я открыл файл Ексель и что то там скопировал, как моя основная книга поймет, что выполнение макроса нужно остановить?
 
Перейти    
Прекращение работы макроса, если в книге скопирована информация
 
#
17.10.2024 09:56:42
Sanja, СПАСИБО! Буду тестить
 
Перейти    
Прекращение работы макроса, если в книге скопирована информация
 
#
17.10.2024 09:03:26
Добрый день!
Подскажите, пожалуйста, как прописать в коде ситуацию, когда буфер обмена не пуст (копирование в любом файле Ексель, в том числе, в котором код), то в файле в котором код прекращается работа макроса (End Sub).
 
Перейти    
Поиск первой пустой ячейки в диапазоне
 
#
13.09.2024 07:58:36
Доброго дня!
Поскажите, в чем может быть дело:
Код
Код
        If Not Intersect(Target, Range("Календарь")) Is Nothing Then
            Dim ILastRow As Long
            ILastRow = Cells(9, "G").End(xlDown).Row + 1
            Cells(ILastRow, "G") = Target
            Cells(ILastRow, "G").Offset(0, 1).Select
            Cancel = True
        End If
после перезапуска ексель перестает работать, ругается на строку
Код
Cells(iLastRow, "G") = Target
работает по  Worksheet_BeforeRightClick
 
Перейти    
Подсветка ячейки листа 1 при совпадении условий на листе 2
 
#
13.09.2024 07:54:42
Sanja, дома реже, чем на работе( вроде всё понятно написал...
 
Перейти    
Подсветка ячейки листа 1 при совпадении условий на листе 2
 
#
13.09.2024 07:01:22
Доброго дня!
На листе 1 в ячейке А1 время онлайн (обновляется каждые 30 сек). На листе 2 в столбце А - даты событий, в столбце В - время срабатывания событий (напоминалка своеобразная).
Как прописать, чтобы при совпадении на листе 2 даты (с текущей) и времени из столбца В листа 2 с фактическим (берем из ячейки А1 листа 1, чтобы срабатывало по событию в Worksheet_Change), ячейка А1 листа 1 мигала (два цвета указаны в ячейках В1 и С1 листа 1).
Пример приложить возможности нет, прошу прощения!
Буду благодарен за помощь!
 
Перейти    
При прокрутке листа именованный диапазон всегда виден
 
#
12.09.2024 12:34:39
MikeVol, бывает)  
 
Перейти    
При прокрутке листа именованный диапазон всегда виден
 
#
12.09.2024 10:46:13
MikeVol, алилуйя!!! Спасибо! Оно самое!
 
Перейти    
При прокрутке листа именованный диапазон всегда виден
 
#
12.09.2024 08:48:40
Цитата
написал:
Ну значит это был не просто именованный диапазон
Вполне возможно....
 
Перейти    
При прокрутке листа именованный диапазон всегда виден
 
#
11.09.2024 18:28:05
Hugo, не.... просто при прокрутке листа календарь перемещался и оставался на месте относительно экрана (конечно на изначально "чистом"месте листа, вне таблицы,  иначе удалял из ячеек, через которые переместился, все данные
 
Перейти    
При прокрутке листа именованный диапазон всегда виден
 
#
11.09.2024 18:01:11
Sanja, возможно, но решение было. Жду помощи)  
 
Перейти    
Страницы: 1 2 3 4 5 6 7 8 9 10 11 ... 15 След.
Наверх