Обращаюсь за помощью к форумчанам. В файле 3 страницы: Лист1 (из которого берутся данные), контакт (куда нужно выгрузить отобранные записи) и фразы (которые служат для негативного отбора записей). Список фраз может в процессе работы пополняться, поэтому подумал, что загрузка фраз в массив будет правильным решением. Опыта работы с массивами нет. Просмотр форума по первым 3 страницам по массивам мне дал мало информации., возможно не знаю, на что обратить внимание. Нужно каждую строку Листа1 (записей может быть до 3 тысяч) по полю Контакты сравнить с массивом загруженных фраз. Если фраза встречается в записи, то такая запись не должна попадать на страницу «контакт». На странице "контакт" должны попадать записи с фамилиями. При работе не пойму, как совместить два цикла (перебор массива и записей Листа1, и поэтому получил сообщение «Next without For». Подскажите, что исправить?
1. У вас If стоит внутри For ... Next, а End If вы вынесли ниже Next - так делать нельзя. Если вы указываете If внутри цикла For... Next, то и закрывать End If надо внутри For... Next Вот так делать нельзя!
Код
For i = 1 to 100
If i > 10 Then
...
Next i
End If
А вот так можно
Код
For i = 1 to 100
If i > 10 Then
...
End If
Next i
2. у вас не закрыт первый If внутри Do While. Вы же, надеюсь, знаете, что если вы написали If ... то ниже обязательно надо где-то писать End If - а у вас не у каждого If есть End If
New,спасибо! Интересный код. New, не будете ли вы любезны, чуть подправить ваш код так, чтобы получилось как на прилагаемом рисунке. Мне так сразу и не сделать. Видимо я не так объяснил. Фразы служат для негативного отбора, т.е. нужны именно фамилии контактов на одноименной странице , а не сами фразы