Скопировать строку на новый лист, если ячейка содержит определенное значение

@buntar · Регистрация: 16.03.2012

Author24 — интернет-сервис помощи студентам

Добрый день, нужен макрос, или как по другому решить:
Нужно скопировать строку на другой лист, если в ячейке F содержится значение "Процессор", "Жесткий диск", "Монитор".
example.xlsx

@Vlad999 · 12.03.2014, 11:14

Visual Basic

Sub perenos()
Dim i&
Application.ScreenUpdating = False
For i = 1 To Cells(Rows.Count, 6).End(xlUp).Row
If Cells(i, 6) = "Процесор" Or Cells(i, 6) = "Монитор" Or Cells(i, 6) = "Жесткий диск" Then
Rows(i).Copy
Sheets("Лист2").Cells(Sheets("Лист2").Cells(Rows.Count, 6).End(xlUp).Row + 1, 1).PasteSpecial
End If
Next
Application.ScreenUpdating = True
Application.CutCopyMode = False
End Sub

Fairuza · 12.03.2014, 11:16

Фильтр не вариант?

@slava2008 · 28.08.2015, 13:07

Привет Всем!

Вопрос такой:

Можно ли создать условие что-бы скопировать строку определенного цвета на другой лист?

Спасибо!!

@chepik121 · 21.03.2016, 00:32

Добрый вечер! Нашел макрос в этой теме но не получается перенести строку на следующий лист. Помогите перенести строки ТОЛЬКО с ячейкой EURO FX CALL и EURO FX PUT на лист 4. Всего строк с данными может быть на листе 3 максимально 2000шт. Пример привел на листе 4 в ручную, помогите автоматизировать этот процесс.

@buntar 543 / 544 / 181 Регистрация: 16.03.2012 Сообщений: 1,160 Записей в блоге: 2
		1
	Скопировать строку на новый лист, если ячейка содержит определенное значение 12.03.2014, 10:43. Показов 23111. Ответов 4 Метки нет (Все метки) Добрый день, нужен макрос, или как по другому решить: Нужно скопировать строку на другой лист, если в ячейке F содержится значение "Процессор", "Жесткий диск", "Монитор". example.xlsx 0

Fairuza 6024 / 3216 / 720 Регистрация: 23.11.2010 Сообщений: 10,743
	12.03.2014, 11:16	3
	Фильтр не вариант? 0

@slava2008 0 / 0 / 0 Регистрация: 28.08.2015 Сообщений: 2
	28.08.2015, 13:07	4
	Привет Всем! Вопрос такой: Можно ли создать условие что-бы скопировать строку определенного цвета на другой лист? Спасибо!! 0

	21.03.2016, 00:32

Скопировать строку на новый лист, если ячейка содержит определенное значение

Решение