|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
15.02.2012, 15:56 | #11 |
Форумчанин
Регистрация: 22.04.2011
Сообщений: 155
|
|
15.02.2012, 16:16 | #12 |
Новичок
СтарожилДжуниор
Регистрация: 05.02.2008
Сообщений: 9,487
|
там есть ошибка (не понятная для меня). FIND перед циклом не выдает ошибки, когда не найдено ничего, а должен бы, поэтому программа попадает в цикл, поэтому увеличивает R на единичку... и пишет в итоге найдено 1, когда не найдено ничего.
уважаемый, slone2179, код открыт, можете сами аккуратненько эту дыру в коде залатать. программисты, а почему нет ошибки в первом FIND, не подскажете?
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
|
15.02.2012, 16:26 | #13 |
Форумчанин
Регистрация: 22.04.2011
Сообщений: 155
|
Спасибо, многоуважаемый IgorGO за ответ! Покопаюсь. Вы как всегда добры к новичкам!
|
15.02.2012, 17:00 | #14 |
Новичок
СтарожилДжуниор
Регистрация: 05.02.2008
Сообщений: 9,487
|
Do While Err.Number = 0 And Not rg Is Nothing
добавил (красным цветом)
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
|
15.02.2012, 19:49 | #15 |
Форумчанин
Регистрация: 22.04.2011
Сообщений: 155
|
Спасибо большое!
|
23.04.2012, 11:50 | #16 |
Пользователь
Регистрация: 20.07.2011
Сообщений: 47
|
Извините пожалуста какой добавить код чтобы он то что нашел и вытащил в лист2 удалял из листа 1
|
23.04.2012, 12:20 | #17 |
Новичок
СтарожилДжуниор
Регистрация: 05.02.2008
Сообщений: 9,487
|
не надо добавлять.
замените в тексте макроса copy на cut
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Вставка ImageMso как рисунок, на лист. | WizarD.89 | Microsoft Office Excel | 0 | 28.04.2011 15:45 |
Поиск повторяющегося значения и вывод его на другой лист | tissot | Microsoft Office Excel | 6 | 20.01.2011 19:23 |
поиск и перенос на другой лист. | artssp | Microsoft Office Excel | 34 | 01.12.2010 05:58 |
Поиск проблемных значений и вставка строк в другой документ Excel | Gvaridos | Microsoft Office Excel | 3 | 27.10.2010 10:24 |
Поиск и вывод результата на другой лист!!! | Ilnour1986 | Microsoft Office Excel | 12 | 23.10.2009 11:38 |