нужно выделить строки в которых содержатся в определенных двух столбцах нужные значения
потом вырежу и перенесу в новый файл(это решено)
дайте ссылки на нормальные справочники по excel
Примечание:
неопределенное кол-во строк
совпадение значений т. е. a(i)=x b(i)=y
мне кажется что останется выделение только последней строки
Примечание:
i = 1
Set R = Rows(1)
Do While Cells(i, 4).Value = t
If Cells(i, 4).Value = t And Cells(i, 6).Value = material Then
Set R = Union(R, Rows(i))
End If
R.Select
i = i + 1
Loop
это подходит только первая строка выделяется не проверяясь
Примечание:
i = 1
Set R = Rows(1)
в этом месте поставлю цикл с exit
Примечание:
нужен перебор всех строк
типа for each...
как организовать?
Примечание:
i = 1
For i = 1 To ActiveSheet.UsedRange.Rows.Count
If Cells(i, 4).Value = t And Cells(i, 6).Value = material Then
Set R = Rows(i)
Exit For
End If
Next i
Do While Cells(i, 4).Value = t
If Cells(i, 4).Value = t And Cells(i, 6).Value = material Then
Set R = Union(R, Rows(i))
End If
R.Select
i = i + 1
Loop
рабочий код
RPI.su - самая большая русскоязычная база вопросов и ответов. Наш проект был реализован как продолжение популярного сервиса otvety.google.ru, который был закрыт и удален 30 апреля 2015 года. Мы решили воскресить полезный сервис Ответы Гугл, чтобы любой человек смог публично узнать ответ на свой вопрос у интернет сообщества.
Все вопросы, добавленные на сайт ответов Google, мы скопировали и сохранили здесь. Имена старых пользователей также отображены в том виде, в котором они существовали ранее. Только нужно заново пройти регистрацию, чтобы иметь возможность задавать вопросы, или отвечать другим.
Чтобы связаться с нами по любому вопросу О САЙТЕ (реклама, сотрудничество, отзыв о сервисе), пишите на почту [email protected]. Только все общие вопросы размещайте на сайте, на них ответ по почте не предоставляется.