Как скопировать все найденные ячейки в excel - Word и Excel

Задача

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

Решение

Нужно искать через фильтр или условное форматирование.

Фильтр

1. Выделяем столбец и жмём «Сортировка и фильтр» → включаем фильтр.

2. Разворачиваем окно фильтра и в поле поиска указываем запрос. Я ищу https:// в столбце URL.

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

Форматирование

1. Выделяем столбец и жмём «Условное форматирование» → Правила выделения ячеек → Текст содержит…

2. Указываем запрос. Я ищу https://

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

Источник

Копирование только видимых ячеек

Смотрите также потом нашел тут — выделяете диапазон данный момент отфильтрованы логику панели не «ВыделитьВидемыеЯчейки»? В Excel-2003 IsEmpty(ActiveCell.Value) ‘…находим пустую a As Doubleanabioss13 вставка» но точно которое мы зададим в первой ячейке. «Ctrl» + «Shift» особенно, если много(Выделить группу ячеек). книгу, щелкните вкладку вы можете скопироватьПримечание: , и сделал, A2:A12—Вставить. В этом только ячейки с ломать).

ее можно найти ячейку ниже ActiveSheet.Paste Dim c As: На примере работает.. не скажу. условным форматированием и В нашем примере, + кнопку (стрелочку) строк.Выберите опцию другого листа или только итоговых данныхМы стараемся как чтобы запускалось в случае ячейки которые данными, пустые ячейки8) закрыть панель в настройках панелей Application.CutCopyMode = False Integer Dim r

Но файл у

Алексей200485954 формулой. Смотрите, как мы написали число800 вниз (или кнопкуПервый способ -

Visible cells only выберите другую книгу из структурированных листа. можно оперативнее обеспечивать
каждом файле) кнопки скрыты не изменятся, скрыты. настройки. управления. Else ActiveSheet.Paste Application.CutCopyMode As Integer Dim меня намного больше
: Офигеть, все получилось. это сделать, в в ячейку D2 вверх, зависит отобычный
(Только видимые ячейки) и выделите левуюСделайте следующее: вас актуальными справочными
сделать пока не Но в выделенныхЯ пока решаюПосле вышеописанных действийА где именно? = False End

 i As Integer и если так Огромное спасибо! статье «Закрасить ячейку столбца D. Немного того, где хотим. и нажмите верхнюю ячейку областиВыделите ячейки, которые нужно

 материалами на вашем смог, но горячие ячейках останутся формулы, это так: снимаю кнопка «ВыделитьВидемыеЯчейки» будетСемен Казменко If End If Dim EndRow As делать, то почемуdgrom

support.office.com

Как скопировать только видимые ячейки в Excel

по условию в не по теме, выделить ячейки –Возьмем такую таблицу.OK

вставки. скопировать подробнее, читайте

языке. Эта страница клавиши работают. которые заменить на фильтр, потом копирую

там куда вы: Расскажу только про Next i End

Integer ‘как работает? то вставляет всего: Вот что гласит
Excel формулой». но хочется сказать ниже или выше Таблица будет одна.Примечание: статью выберите ячеек, переведена автоматически, поэтому
ячейки. Как исправить это? значения можно будет весь столбец В ее перетащили и Excel-2003. Дома под SubP.S. Мало данных
_ ‘ Выделям 2 первых ячейки. справка.Алексей200485954
здесь. Сочетание клавиш ячейки, в которой для всех примеров.Excel выделит видимые ячейки. При копировании значения последовательно

диапазонов, строк и

ее текст можетМне надо чтобы
после снятия фильтра.
через специальную вставку

можно будет выполнить

office-guru.ru

Вставить в видимые строки в Excel.

 рукой только он. — раз! Все  ячейку с нужнымanabioss13В меню ПРАВКА: Есть большая таблица. «Ctrl» + R написали число).Уберем фильтром все цифры Теперь нажмите сочетание вставляются в строки столбцов на листе. содержать неточности и не копировались ячейкиThe_Prist с галкой «Пропускать все действия из1) левой кнопкой мыши что выше можно значением. Далее ОК.
: Все. Я разобрался. жмем «перейти». В Выбрал через фильтр
– копирует данныеТеперь, или нажимаем 2 из таблицы.
Ctrl+C и столбцы. ЕслиСовет: грамматические ошибки. Для скрытые фильтром.: пустые ячейки», а моего предыдущего сообщения. по любой панели сделат массивом. Но ‘Если фильтр уже Из за другого появившемся окошке жмем нужные строки (20 по строке Excel сочетание клавиш «Ctrl» В оставшиеся видимые, чтобы скопировать диапазон.
область вставки содержит
Чтобы отменить выделение ячеек, нас важно, чтобы
Помню раньше, когдаiksrman вот есть ли
Кстати, если впоследствии
кнопок (например, обычно я как-то задействован — выделяем фильтра не вставлялось «выделить». В появившейся шт). Когда начинаю (в нашем примере + G, или ячейки поставим цифруВыберите ячейку скрытые строки или щелкните любую ячейку эта статья была то, получалось нормально: The_Prist,отличная штука! Всем возможность копирования, НЕ
Вам будет нужно включена панель «Стандартная»).с массивами не любую видимую ячейку. как надо. Спасибо, менюшке выбираем «только делать вставку в – строка 2, клавишу F5. Выйдет 600. В ячейкуA6 столбцы, возможно, потребуется на листе.

вам полезна. Просим копировать, но не советую! Давно себе снимая фильтр? удалить какие-то кнопки2) в появившемся очень. А так _ ‘ Далее вы мне помогли. видимые ячейки». Готово. другом документе он копировали число 800 диалоговое окно «Переход». В2 ставим числои нажмите отобразить их, чтобыЩелкните вас уделить пару знаю почему так делал себе надстройкуSanja с панелей, то контекстном меню список — чем мог, по ходу a_Boroda_[email protected]@ вставляет все строки, из ячейки D2). Нажимаем кнопку «Выделить…». 600, затем копируемCtrl+V увидеть все скопированныеГлавная
 секунд и сообщить,
происходит. из этого макроса.: А просто выделить их можно перетаскивать панелей экранных кнопок, тем помог. = InputBox(prompt:=»Введите значение: Для удобства можно: Alt+; которые попадают в Получилось так. И, в новом его вниз по, чтобы вставить диапазон. данные. > помогла ли онаDemetry Спасибо Вам. отфильтрованные значение и
в обратном порядке в самом низуOlya1985 фильтра», _ Title:=»Копирование вытащить на панельа у меня диапазон выделенных ячеек.Третий способ. диалоговом окне «Выделение столбцу (тянем за

excel-office.ru

Проблемка с копированием отфильтрованных ячеек

Результат:По умолчанию Excel копируетНайти и выделить вам, с помощью: Надо выделить нужныеRulsan скопировать их не при наличии на пункт «настройка». Выбрать: хорошо. спасибо!
значений», _ Default:=ActiveCell.Value) быстрого доступа кнопочку эта комбинация клавишСкажите пожалуйста какВ новом столбце

 группы ячеек» ставим правый нижний уголУрок подготовлен для Вас как видимые, так
, а затем выберите кнопок внизу страницы. ячейки, потом Ctrl-G: Благодарю, , то
пробовали? экране окна «Настройка». его.Семен Казменко Selection.AutoFilter Field:=1, Criteria1:=a с черными квадратиками перестала работать в корректно скопировать и (в нашем примере

галочку у слов ячейки В2). Значения командой сайта office-guru.ru

 и скрытые ячейки. пункт Для удобства также

 — Выделить… -Только что нужно, огромноеgling
Например, выбрали кнопку3) появится окно: Предложенный Вам вариант c = ActiveCell.Column (как на рисунке обоих версиях после

 вставить в другом – столбец Е)
«Только видимые ячейки». скопировались только вИсточник: http://www.excel-easy.com/examples/copy-visible-cells-only.html Однако можно скопироватьВыделение группы ячеек приводим ссылку на видимые ячейки. Потом
спасибо. Теперь как: Копировать можно, вставить

planetaexcel.ru

Как скопировать ячейки с фильтром (Формулы/Formulas)

 «Сохранить» (дискетка) и «Настройка», там на такой заумный. Все EndRow = ActiveSheet.UsedRange.Row ниже) переустановки винды (7) месте несколько отфильтрованных выделяем ячейки. НажимаемНажимаем «ОК». Затем вставляем видимые ячейки. ТочноПеревел: Антон Андронов только видимые ячейки.

. оригинал (на английском обычным копипастом.

 бы заставить работать нельзя в отфильтрованный перетащили ее отпустив вкладке «Команды» два это можно сделать — 1 +»Выделить видимые ячейки» (хотя раньше часто

 строк. клавишу F5. Выйдет как обычно. также можно вставлятьАвтор: Антон АндроновВ этом примере строка

Выберите параметр языке) .Алексей пинчук эти макросы во диапазон, вставка происходит на окне «Настройка». списка.

простым копированием. Для
_ ActiveSheet.UsedRange.Rows.Count ‘Клавишами это Альт

excelworld.ru

Вставить скопированные строки в Excel с учетом фильтра

 пользовалась)Pankratd диалоговое окно «Переход».Ещё один способ и формулы. МыВставить только в видимые 2 скрыта:только видимые ячейкиЕсли некоторые ячеек, строк: > На самом всех открытых файлах даже в теOlya19854) в правом

 этого: Находим последнюю строку точка_с_запятойв чем может: Сталкивался с такой Нажимаем кнопку «Выделить…». вызвать диалоговое окно в ячейке С2 строки вЕсли просто скопировать, аи нажмите кнопку и столбцов на деле я применил Excel, а не строки которые скрыты.: спасибо! у меня списке выбрать категорию1) Выделить нужный _ рабочей областиOlya1985 быть причина? же проблемой, делаю И, в новом «Выделение группы ячеек». пишем такую формулу.Excel затем вставить этотОК листе не отображается, не фильтр к только когда открываетсяRulsan тоже excel 2003. «Правка» диапазон. For i =: Подскажите, пожалуйста, можноanabioss13 так: диалоговом окне «Выделение На закладке «Главная» =А2*10числа, формулы, текст диапазон, результат получается. у вас есть диапазону, а скрыл файл с примером: Да, как сказал, а еще можно5) в левом2) Нажать кнопку 1 To EndRow ли в excel
: Здравствуйте. Подскажите пожалуйстаОткрываю буфер обмена группы ячеек», ставим в разделе «Редактирование»

Получилось так. можно несколькими способами.

 следующим:Щелкните возможность копирования всех некоторые строки Tips_Macro_CopyPasteInHiddenCells.xls , копировать то
этот пункт добавить появится список команд
«ВыделитьВидемыеЯчейки». If Cells(i, c).Value
2003 после копирования как скопировать последний (меню «правка» в
галочку у слов нажимаем на кнопкуОтменим фильтр. Получилась такая Когда нужно вставитьЧтобы скопировать только видимыеКопировать

 ячеек, или толькоЭто и естьP.S. Имеется ввиду, можно, я уже в меню edit. этой категории.3) Начать копирование
= a Then

 столбца с отфильтрованными столбец с данными 2003, или лента «Только видимые ячейки».
«Найти и выделить». таблица. числа, формулы, текст ячейки, выполните несколько
(или нажмите клавиши видимые ячейки. По ответ на вопрос. чтобы прикрутить как-то пробовал копировать толькоRulsan
6) почти в (ну а далее Cells(i, c).Select Selection.Copy данными сделать так,
и вставить в «главная» в 2007). Нажимаем «ОК». Теперь,
В появившемся спискеФормула и цифры вставились не во все
простых действий: CTRL+C). умолчанию Excel копирует Высота строки (а
в виде кнопок видимые ячейки, по: Привет всем. самом конце этого обычно). Cells(EndRow + 5, чтобы при их другой файл, чтобыКопиую отфильтрованный диапазон
не отменяя выделения, нажимаем на функцию
только в отфильтрованные строки таблицы, можноВыделите диапазонВыделите левую верхнюю ячейку скрытых или отфильтрованных скрытие строки — в ленту или
всякому, но вставляетПосоветуйте, пожалуйста, есть (см.п.5) списка кнопкаВопрос в другом. c).Activate ‘ Активируем вставке в отедельный скопировалось только то в буфер, при в первой ячейке «Выделение группы ячеек». строки. воспользоваться фильтром. Как

A1:A4 области вставки и ячейки не только просто установка её горячих клавиш, чтобы то оно подряд,

CyberForum.ru

Копирование отфильтрованного диапазона данных

 ли возможность в «ВыделитьВидемыеЯчейки»
Где найти кнопку последнюю строку _ столбец они вставлялись что видимо. А копировании дапзон выделяется столбца (у нас ЧтобыВторой способ. установить фильтр и. нажмите кнопку видимые ячейки. Если высоты в 0)
всегда была возможность а не в Excel или надстройке7) на нее «ВыделитьВидемыеЯчейки»? В Excel-2003 плюс 5 строк. с учетом фильтра, то когда копируешь бегущими муравьями. Снимаю – Е2) вводим

заполнить видимые ячейки вТакже отфильтруем данные. как фильтровать вНа вкладкеВставить

 это не является будет копироваться, только такого копирования-вставки. отфильтрованные. PLEX копирования данных нужно нажать левой

 ее можно найти If Not IsEmpty(Cells(EndRow то есть тольке как обычно оно этих муравьев «Esc» формулу, цифру, т.д. выделенных столбцах Excel В первой ячейке Excel, смотрите вHome

(или нажмите клавиши вас не устраивают, если копируется всяP.S.S. Ни разуgling из отфильрованного диапазона клавишей мыши, перетащить в настройках панелей + 5, c).Value) те данные которые вставляется со значениями и вставляю фрагмент Нажимаем сочетание клавиш, нажимаем сочетание клавиш

 пишем число, формулу, статье «Фильтр в

(Главная) нажмите кнопку Ctrl + V). выполните действия, описанные строка. То есть не делал, но: Можно такой вариант

 из столбца В и отпустить на управления. Then ‘ если видны нам и которые скрыты внутри.. из буфера. Вставляется «Ctrl» + «Enter». «Ctrl» + D. текст, т.д. Теперь, Excel». Но, чтобы
Find & SelectСовет: в этой статье, надо выделить не прочитал пост выше, использовать: Написать формулу в столбец А?
любой панели кнопокOlya1985 строка не пустая, не hidden.TimSha все как надо,В Excel ячейки И все выделенные если строк тысячи, вставить данные только(Найти и выделить) Чтобы скопировать выделенный фрагмент

planetaexcel.ru

Excel: Когда копирую отфильтрованные ячейки и вставляю их на другой лист, то вставляются также и скрытые фильтром ячейки

чтобы скопировать только
конкретные ячейки, а что можно сделать в А2 =B2;
В столбце В (лучше где-то в: Вопрос в другом. тогда… Do ActiveCell.Offset(1,Igor_Tr

: Только видимое и без скрытых строк. можно выделить цветом столбцы заполнятся данными то выделяем ячейки в видимые ячейки,

 и кликните по на другой лист видимые ячейки. Например строки полностью. в виде надстройки, копируете ячейку A2
на картинке на конце панели, чтоб Где найти кнопку 0).Select Loop Until: Sub Копировать_Отфильтрованное() Dim выделяем (см .скрин)…Как вариант «Специальная по поределенному условию, или формулой, как так: нажимаем клавиши нужны свои способы,Go To Special

или в другую

Источник

Приветствую Товарищи!
Вопрос: допустим я во всей таблице с помощю поииска (ctrl+F) нашел все строки где встречается слово «ПРАВДА» и таких строк 563шт.
Как из таблички результатов поиска скопировать результаты и быстро создать отдельный список именно только со строками содержащими слово «ПРАВДА»?

Создать _автофильтр_ и отфильтровать таблицу по условию «содержит».

А есть ли там возможность указать диапазон — т.е. беру список (1000строк и 20 столбцов), и указываю область поиска (это столбцы 1 — 12 т.е. с января по декабрь) в которых и ищу слово «ПРАВДА» ?

Можно задать условия хоть по всем 20 столбцам. Если слово встречается сразу в нескольких столбцах, проще воспользоваться расширенным автофильтром.

Да, конечно.
записываете в свободный столбец формулу (например это тринадцатый столбец M)

=A1&B1&C1&D1&E1&F1&G1&H1&I1&J1&K1&L1, растягиваете на все нужные строки.
Затем выделяете те ячейки, среди которых нужно сделать поиск + тот столбец M, создаёте фильтр, как посоветовал Barbarian12 и фильтруете по условию «содержит». копируете из результата уже без 13-го столбца (он был вспомогательный).
Если Вы планируете ещё использовать это, то не удаляйте этот столбец, а просто скройте его

Да в принципе тоже неплохо, но хотелось бы как в Автокаде, нашел результаты, скопировал их.
И еще я не понял как устроет _автофильтр_ — я сейчас ищу все строки где есть знак «-»
Делаю так:
завожу условия «содержит» далее указываю символ «-«
)без ковычек конечно) но фильтр не видит таких строк, когда я прямо смотрю на строку с ячейкой -0,039
Зато в качестве эксперемента, если я выбираю условие «равно» и указываю точно «-0,039» то эта строка появляется! Бред?
Как же мне найти именно знак минус в этом столбце, каким условием «содержит» «начинается» или фильтр не ищет знаки…?

перед некоторыми специальными знаками ставится знак ~ для их поиска.

Вот таблица в ней в столбцах D по столбец O значения, некоторые из них отрицательные т.е. со знаком «-» и мне нужно составить отдельный список из строк, в которых в диапазоне D — O есть хоть один «минусик»

ну вы немного неправильно скопировали формулу.
в ячейку, ниже той, в которой написано «Столбец 17» нужно писать формулу «=D2&E2&F2&G2&H2&I2&J2&K2&L2&M2&O2&P2» и после этого растянуть.
в вашем примере получается таких 31 строк.

Q2:

=И(ЕОШ(ПОИСК("-";D2:P2)))
формула массива (вводится с помощью CTRL+SHIFT+ENTER)
тянем вниз и фильтруем по ЛОЖЬ

Если осуществляется поиск минуса, можно, как вариант, задать условие в автофильтре «меньше 0».

Да я понял ваш столбец «помошник» собирает все значения чтобы только по одному нему проверить фильтром, а потом скопировать, идея классная. Вот только я попробовал в принципе на примере одного столбца найти строку содержащую «минус» и фильтр не смог ее найти.
Попробовал я сейчас поставить условие «меньше» и значение «0» и фильтр нашел строку -0,039
Но! мне не нужно исать все число, мне нужно именно «минус» найти!!! И его я понимаю нужно искать по условию «начинается» или «содержит»
так вот фильтр не показывает мне строки где явно отрицательное число и содержит «-» и даже начинается с этого символа.
Как заставить фильтр искать знаки «-» «=» «+» или другие любые математические знаки, знаки припенания и другие символы?

Вот товарищ пишет:
перед некоторыми специальными знаками ставится знак ~ для их поиска.
Может быть в этом проблема?
Но и выбрав условие «содержит» или «начинается» поставив ~ впереди «минуса» фильтр отказывается находить =(
см.фото

после того, как ты собираешь при помощи символа & — значение той ячейка превращается в текстовую, а до этого она по видимому число. в числах не получился искать отрицательные числа при помощи фильтра «содержит знак минуса». либо превращать в текстовые отдельно либо соединять нескольок в одну.

если просто по одному столбцу искать минус, то поставь фильтр «меньше 0 или содержит ~-«, попробуй, может у тебя в столбце смесь чисел и текстовых данных

Добавил файл в свое сообщение выше.

Да скорее всего фильтр ищет только текстовый «-» т.е. он ищет сивол не «нминус» а «тире» но как же быть в случае если у меня в ячейки формула или ссылка, я же не могу его переформатировать в текст…гемор =(
Придется попробовать именно слить в один столбец через & а потом уже в нем искать знак «-»

Цитата: star282 от 09.06.2012, 15:57
Как заставить фильтр искать знаки «-» «=» «+» или другие любые математические знаки, знаки припенания и другие символы?

Если нужно выделить строки в которых есть формулы то можно поступить следующим сложным образом:
1. F5- Выделить..-формулы
2. То, что выделили можно отформатировать каким-нибудь отличающимся форматом (например процентным).
3. Затем в ячейку Q2 следующую формулу:

=ИЛИ(ЯЧЕЙКА("формат";СМЕЩ(C17;;Ч(ИНДЕКС(СТОЛБЕЦ(D17:P17)-3;))))="P0")
4. Протягиваем вниз и фильтруем столбец Q по ИСТИНА

Чтобы вернуть формат:
5. Заменяем формулу в столбце Q на значения
6. Возвращаем всем данным старый формат

Условие отбора «содержит» действует только на текстовые ячейки. То есть, например если даже вам нужно будет найти ячейки содержащие цифру 5, то при помощи условия «содержит 5» вы не отфильтруете. Если вам нужно искать только в одном столбце создайте рядом новый столбец (например столбец B), напишите в B2 «=ТЕКСТ(A2)» и ищите по этому столбцу и минусы, и цифры, и даже звёздочки (~*), а когда скопируете что надо удалите столбец.
З.Ы. Если у Вас возникают дополнительные вопросы, пишите их здесь.

Профессиональные приемы работы в Microsoft Excel
►
Обмен опытом
►
Microsoft Excel
►
Как создать список из результатов поиска (ctrl+F) ?

Источник

dava002

Пользователь

Сообщений: 11
Регистрация: 01.09.2015

Здравствуйте! Подскажите пожалуйста, как при использовании инструмента найти и заменить выделить все найденные ячейки и вставить их в один столбец? на листе в разброс указанны ячейки с ссылками необходимо все их вставить в один столбец

dava002 Пользователь Сообщений: 11 Регистрация: 01.09.2015	если это имеет значение ячейки которые нужно скопировать и вставить в один столбец являются последними значениями в строке

The_Prist Пользователь Сообщений: 14182 Регистрация: 15.09.2012 Профессиональная разработка приложений для MS Office	Надо отдельный макрос писать по поиску и выделению. Стандартно через Найти их не выделить. Даже самый простой вопрос можно превратить в огромную проблему. Достаточно не уметь формулировать вопросы…

Пользователь

Сообщений: 5018
Регистрация: 22.12.2012

08.09.2015 16:41:14

в n1 вставляем формулу и тянем вниз

Код
=ПРОСМОТР("яяя";A1:M1)

jakim

Пользователь

Сообщений: 1947
Регистрация: 01.03.2013

08.09.2015 16:47:29

Код
=IF(LEFT($A1;4)="http";$A1;IF(LEFT($B1;4)="http";$B1;IF(LEFT($C1;4)="http";$C1;IF(LEFT($D1;4)="http";$D1;IF(LEFT(E1;4)="http";$E1;"")))))

TheBestOfTheBest

Пользователь

Сообщений: 2366
Регистрация: 03.04.2015

Excel 2010 +PLEX +SaveToDB +PowerQuery

08.09.2015 16:54:03

С помощью этого инструмента вставить данные в «другую», относительно найденного, ячейку не получится.
Кодом

Код

Sub ReplaceAll()
'Модуль листа
Dim rngCurr As Range, intLastColumn As Integer
intLastColumn = Me.Range("A1").CurrentRegion.Columns.Count
Application.ScreenUpdating = False
For Each rngCurr In Me.Range("A1:D" & Me.Cells(Rows.Count, 1).End(xlUp).Row)
    If Left(rngCurr.Text, 4) = "http" Then
        Cells(rngCurr.Row, intLastColumn).Value = rngCurr.Text
        rngCurr.Clear
    End If
Next rngCurr
Application.ScreenUpdating = True
End Sub

Изменено: TheBestOfTheBest — 08.09.2015 16:57:25

Неизлечимых болезней нет, есть неизлечимые люди.

dava002 Пользователь Сообщений: 11 Регистрация: 01.09.2015	всем спасибо за помощь Изменено: dava002 — 08.09.2015 17:03:59

Пытливый

Пользователь

Сообщений: 4587
Регистрация: 22.12.2012

08.09.2015 17:12:52

Ну и запоздало я еще втиснусь с честно стыренным макросом из примера по Range.Find

Код

Sub t()
Dim objC As Range
Dim lngI As Long
Dim strA As String
Dim A() As Variant
A = [a1].CurrentRegion.Value
    Set objC = [a1].CurrentRegion.Find("http", LookIn:=xlValues)
    lngI = 1
        If Not objC Is Nothing Then
            strA = objC.Address
                Do
                    A(lngI, 1) = objC.Value
                    Set objC = [a1].CurrentRegion.FindNext(objC)
                    lngI = lngI + 1
                Loop While Not objC Is Nothing And objC.Address <> strA
        End If
    [e1].Resize(lngI - 1, 1) = A
End Sub

В файле на листе пример — фигура с побуждающий надписью.

Прикрепленные файлы

пример1.xlsm (17.96 КБ)

Кому решение нужно — тот пример и рисует.

Источник

Как скопировать ячейки, если столбец содержит определенное значение / текст в Excel?

Предположим, у вас есть длинный список данных, и теперь вы хотите найти и скопировать ячейки, содержащие определенное значение или текст в Excel, как быстро это сделать? Здесь мы предлагаем вам три метода копирования ячеек, если столбец содержит определенное значение или текст в Excel.

Скопируйте ячейки, если столбец содержит определенное значение / текст с помощью команды «Фильтр»
Скопируйте ячейки, если столбец содержит определенное значение / текст с помощью команды поиска
Скопируйте ячейки, если столбец содержит определенное значение/текст с Kutools for Excel

Скопируйте ячейки, если столбец содержит определенное значение / текст с помощью команды «Фильтр»

Команда «Фильтр» может помочь нам легко отфильтровать ячейки, соответствующие определенным критериям в столбце, поэтому мы можем легко скопировать эти конкретные ячейки в Excel.

1. Выберите столбец, в который вы будете копировать ячейки, если столбец содержит определенное значение или текст, а затем щелкните значок Данные > Фильтр.

2. Теперь щелкните стрелка в левой части первой ячейки выбранного столбца, а затем щелкните значок Текстовые фильтры > Комплект из выпадающего списка.

3. В открывшемся диалоговом окне Custom AutoFilter введите конкретный текст в поле за содержит и нажмите OK кнопку.

Теперь все ячейки, содержащие определенный текст, отфильтровываются сразу.

4. Выберите все отфильтрованные ячейки в определенном столбце и скопируйте их, нажав Ctrl + C одновременно.

5. Выберите пустую ячейку и вставьте эти ячейки, нажав Ctrl + V одновременно.

Легко выбрать / выделить / скопировать всю строку, если столбец содержит то же значение, что и значения в другом списке в Excel

Kutools for ExcelАвтора Выберите одинаковые и разные ячейки Утилита позволяет пользователям Excel сравнивать два столбца, а затем легко выбирать / копировать / выделять целые строки на основе одинаковых или разных значений.

Скопируйте ячейки, если столбец содержит определенное значение / текст с помощью команды поиска

Этот метод поможет вам найти все ячейки, содержащие определенное значение или текст, с помощью команды «Найти», а затем легко скопировать все найденные ячейки.

1. Выберите столбец, в который вы будете копировать ячейки, если столбец содержит определенное значение или текст.

2. Откройте диалоговое окно «Найти и заменить», нажав кнопку Ctrl + F тем временем, затем в диалоговом окне «Найти и заменить» введите конкретный текст в поле Найти то, что и нажмите Найти все кнопку.

Внимание: Вы также можете открыть диалоговое окно «Найти и заменить», нажав Главная > Найти и выбрать > Найти.

Затем обнаруживаются все ячейки, содержащие определенные ячейки в определенном столбце, и они перечисляются в нижней части диалогового окна «Найти и заменить».

3. Выделите все найденные ячейки, нажав Ctrl + A ключи и закройте диалоговое окно «Найти и заменить». Теперь все ячейки, содержащие определенный текст, выделяются в определенном столбце.

4. Скопируйте всю выделенную ячейку, нажав Ctrl + C ключи, а затем выберите пустую ячейку и вставьте их, нажав Ctrl + A ключи.

Скопируйте ячейки, если столбец содержит определенное значение/текст с Kutools for Excel

Kutools for Excel — Включает более 300 удобных инструментов для Excel. Полнофункциональная бесплатная пробная версия 30-день, кредитная карта не требуется! Get It Now

1. Выберите указанный столбец и щелкните Кутулс > Выберите > Выберите специальные ячейки.

2. В открывшемся диалоговом окне Select Special Cells,

(1) В Тип выбора раздел, проверка Ячейка вариант;
(2) В Конкретный тип раздел, щелкните первое поле и выберите Комплект из раскрывающегося списка, а затем введите указанный текст (в нашем случае введите сумма) в следующее поле;
(3) Щелкните значок Ok кнопка. Затем появляется вторая строка Select Specific Cells, показывающая, сколько ячеек выбрано. Щелкните значок OK чтобы закрыть его.

3. Теперь выбираются ячейки, содержащие определенное значение / текст. Нажмите Ctrl + C ключи для их копирования; выберите ячейку, в которую вы будете вставлять ячейки, и нажмите Ctrl + V ключи.

Демо: скопируйте ячейки, если столбец содержит определенное значение / текст в Excel

Статьи по теме

Лучшие инструменты для работы в офисе

Kutools for Excel Решит большинство ваших проблем и повысит вашу производительность на 80%

Снова использовать: Быстро вставить сложные формулы, диаграммы и все, что вы использовали раньше; Зашифровать ячейки с паролем; Создать список рассылки и отправлять электронные письма …
Бар Супер Формулы (легко редактировать несколько строк текста и формул); Макет для чтения (легко читать и редактировать большое количество ячеек); Вставить в отфильтрованный диапазон…
Объединить ячейки / строки / столбцы без потери данных; Разделить содержимое ячеек; Объединить повторяющиеся строки / столбцы… Предотвращение дублирования ячеек; Сравнить диапазоны…
Выберите Дубликат или Уникальный Ряды; Выбрать пустые строки (все ячейки пустые); Супер находка и нечеткая находка во многих рабочих тетрадях; Случайный выбор …
Точная копия Несколько ячеек без изменения ссылки на формулу; Автоматическое создание ссылок на несколько листов; Вставить пули, Флажки и многое другое …
Извлечь текст, Добавить текст, Удалить по позиции, Удалить пробел; Создание и печать промежуточных итогов по страницам; Преобразование содержимого ячеек в комментарии…
Суперфильтр (сохранять и применять схемы фильтров к другим листам); Расширенная сортировка по месяцам / неделям / дням, периодичности и др .; Специальный фильтр жирным, курсивом …
Комбинируйте книги и рабочие листы; Объединить таблицы на основе ключевых столбцов; Разделить данные на несколько листов; Пакетное преобразование xls, xlsx и PDF…
Более 300 мощных функций. Поддерживает Office/Excel 2007-2021 и 365. Поддерживает все языки. Простое развертывание на вашем предприятии или в организации. Полнофункциональная 30-дневная бесплатная пробная версия. 60-дневная гарантия возврата денег.

Вкладка Office: интерфейс с вкладками в Office и упрощение работы

Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!

Источник

Задача

Решение

Фильтр

Форматирование

Копирование только видимых ячеек

Как скопировать только видимые ячейки в Excel

Вставить в видимые строки в Excel.

Проблемка с копированием отфильтрованных ячеек

Как скопировать ячейки с фильтром (Формулы/Formulas)

Вставить скопированные строки в Excel с учетом фильтра

Копирование отфильтрованного диапазона данных

Excel: Когда копирую отфильтрованные ячейки и вставляю их на другой лист, то вставляются также и скрытые фильтром ячейки

Как скопировать ячейки, если столбец содержит определенное значение / текст в Excel?

Скопируйте ячейки, если столбец содержит определенное значение / текст с помощью команды «Фильтр»

Легко выбрать / выделить / скопировать всю строку, если столбец содержит то же значение, что и значения в другом списке в Excel

Скопируйте ячейки, если столбец содержит определенное значение / текст с помощью команды поиска

Скопируйте ячейки, если столбец содержит определенное значение/текст с Kutools for Excel

Демо: скопируйте ячейки, если столбец содержит определенное значение / текст в Excel

Статьи по теме

Лучшие инструменты для работы в офисе

Kutools for Excel Решит большинство ваших проблем и повысит вашу производительность на 80%

Вкладка Office: интерфейс с вкладками в Office и упрощение работы

А вот еще интересные статьи: