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

Страницы: 1
Перенос строк с одного листа на другой по условию
 
Добрый день всем !

Как перенести строки с листа на лист по условию  макросом?

В книге два листа - лист Практика и лист Результат

Таблица на листе Практика идентична таблице на листе Результат - диапазон таблиц А3:Q

Из листа Практика на лист Результат нужно перенести строки, содержащие в столбце O значение "Назначена встреча"

Строки переносятся в последнюю незаполненную строку по столбцу C листа Результат

При этом с листа Практика строка удаляется

Пример прилагаю.

Выделить жирным определенные слова в тексте ячейки
 
Добрый день всем !

Как в диапазоне E3:F500 выделить жирным определенные слова в тексте ячейки по следующему условию:
выделить жирным слова которые начинаются с пробела и заканчиваются двоеточием

Пример текста в ячейке примерно такой:
Телефон: 8(ххх)ххх-хх-хх Эл.почта: xxx@xxx.ru Возраст: 12 Гражданство: Россия Прописка: Екатеринбург Должность: Специалист по работе с документацией Хобби: Хобби мое Цели,задачи: Цель благая № встречи: 2

те в данном тексте ячейки дб выделены жирным слова Телефон:  Эл.почта: Возраст: Гражданство: Прописка: и прочие слова (начинающиеся с пробела и в конце слова двоеточие  
Изменено: OlegE - 06.02.2020 14:42:56
Выполнение макросов поочередно по кнопке другого макроса
 
Добрый вечер всем !

Возникла такая задача - запустить выполнение разных макросов (5 шт - макрос1, макрос2, макрос3, макрос4, макрос5) поочередно по нажатию кнопки Макрос основной.
Те нажали первый раз Макрос основной. - выполнился макрос1
нажали второй раз Макрос основной. - выполнился макрос2
нажали третий раз Макрос основной. - выполнился макрос3
нажали четвертый раз Макрос основной. - выполнился макрос4
нажали пятый раз Макрос основной. - выполнился макрос5
нажали шестой раз Макрос основной. - выполнился макрос1  и так по кругу

При этом нашел способ как запускать два макроса поочередно с помощью другого макроса
Код
Public Flag As Boolean


Sub ОсновнойМакрос()
If Not Flag Then
MsgBox "Выполняю макрос 1"
Flag = True
Else
MsgBox "Выполняю макрос 2"
Flag = False
End If
End Sub


Таким образом поочередно по нажатию кнопки выполняются два макроса - а нужно и как 5 макросов поочередно запустить ?
Изменено: OlegE - 28.01.2020 21:34:20
Проверить значение в Combobox на совпадение со значениями в диапазоне
 
Добрый вечер всем !

Имеется форма - в ней ComboBox1
Как проверить ComboBox1.Value по кнопке на совпадение значений (есть ли такие значения в диапазоне Лист "Календарь"  "C3:C" & iLastRow ) ?
Private Sub CommandButton3_Click()
...
Пододвинуть выделенную строку к краю закрепленной области
 
Добрый день всем !

Такой вопрос
На листе закреплен диапазон в 3 верхних строки - те строка A3 по нижней границе закреплена

Выделенный диапазон строки например A14 - как его подтянуть на строку A4 - к границе выделенного диапазона ?
Страницы: 1
Наверх