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

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

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

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

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

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

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

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

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

Выделить жирным определенные слова в тексте ячейки
 
aequit-спасибо за поддержку
Выделить жирным определенные слова в тексте ячейки
 
работает  благодарю Kuzmich !  только к сожалению не ловит такое №встречи:  и  Цели,задачи:   видимо както Pattern надо поменять
Выделить жирным определенные слова в тексте ячейки
 
понятно что макросом - вот и прошу помощи
Выделить жирным определенные слова в тексте ячейки
 
Добрый день всем !

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

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

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

Возникла такая задача - запустить выполнение разных макросов (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 на совпадение со значениями в диапазоне
 
Порылся в интернете
вот так заработало
Код
Dim массив As Variant
массив = Worksheets("Календарь").Range("C3:C100").Value
    ИскомаяСтрока = ComboBox1.Value
    
    If IsNumeric(Application.Match(ИскомаяСтрока, массив, 0)) Then
        MsgBox "Есть такая строка в массиве"
    Else
        MsgBox "Строка в массиве не найдена"
    End If
End Sub
Проверить значение в Combobox на совпадение со значениями в диапазоне
 
Благодарю за ответ, только имелось в виду то что в ComboBox1 могут быть введены значения как вручную, так и из выпадающего списка - и они могут совпадать или несовпадать. В вашем макросе принцип немного другой - сравнивается значение только из выпадающего списка из того же диапазона
Изменено: OlegE - 17.01.2020 21:56:53
Проверить значение в Combobox на совпадение со значениями в диапазоне
 
вот пример сделал
Проверить значение в Combobox на совпадение со значениями в диапазоне
 
Добрый вечер всем !

Имеется форма - в ней ComboBox1
Как проверить ComboBox1.Value по кнопке на совпадение значений (есть ли такие значения в диапазоне Лист "Календарь"  "C3:C" & iLastRow ) ?
Private Sub CommandButton3_Click()
...
Пододвинуть выделенную строку к краю закрепленной области
 
Большое спасибо - способы подходят то что нужно
Код
Application.Goto ActiveCell, True
и
Код
ActiveWindow.ScrollRow = Selection.Row
Пододвинуть выделенную строку к краю закрепленной области
 
ActiveWindow.ScrollRow  к сожалению не подходит тк  он будет иметь разное значение при разных выделенных строках - которые надо подтянуть.
Те для выделенной строки А14 - одно значение ActiveWindow.ScrollRow , для выделенной строки А55 - другое значение ActiveWindow.ScrollRow и тд
Пододвинуть выделенную строку к краю закрепленной области
 
Добрый день всем !

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

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