|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
04.10.2010, 15:32 | #11 |
Старожил
Регистрация: 11.05.2010
Сообщений: 5,166
|
Что-то я загнул, можно было и попроще:
Код:
Основное - Application.Calculation = xlCalculationManual и LookIn:=xlValues
webmoney: E265281470651 Z422237915069 R418926282008
|
04.10.2010, 17:00 | #12 |
Форумчанин Подтвердите свой е-майл
Регистрация: 14.11.2007
Сообщений: 163
|
Вот так можно:
Код:
Jungo must die!!! (C) Bill Gates.
|
04.10.2010, 17:14 | #13 |
Старожил
Регистрация: 11.05.2010
Сообщений: 5,166
|
Не, прямо так не пойдёт.
Так пойдёт: Код:
webmoney: E265281470651 Z422237915069 R418926282008
|
05.10.2010, 05:09 | #14 |
Новичок
Джуниор
Регистрация: 03.10.2010
Сообщений: 7
|
Ай, какая красота! работает чисто)) Огромнейшее спасибо!!!
|
05.10.2010, 06:01 | #15 |
Старожил
Регистрация: 05.12.2007
Сообщений: 4,180
|
Могу добавить.
1. С позволения авторов кода, предложенного выше, можно чуть упростить. Например, так: Код:
Код:
Чем шире угол зрения, тем он тупее.
|
05.10.2010, 09:09 | #16 |
Старожил
Регистрация: 11.05.2010
Сообщений: 5,166
|
Только вот опять же, в данной задаче просто так
Set x = [L:L].Find("удалить") не годится...
webmoney: E265281470651 Z422237915069 R418926282008
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Код символа "BackSpase" в ANSI(Если такой есть...) | ChEaTeR-abc | Помощь студентам | 3 | 30.06.2010 17:39 |
Удалить строки "(пусто)" в сводной таблице | kipish_lp | Microsoft Office Excel | 12 | 06.05.2010 10:21 |
Как удалить ярлык из папки "Автозагрузка"? | docbrain | Общие вопросы Delphi | 5 | 15.01.2010 11:27 |
необходимо сообщение - "не введено число", если вводится слово | Sour | Помощь студентам | 6 | 23.08.2007 19:49 |
как удалить анти вирус( касперский 2006)если она не работает и ее не возможно удалить | Alar | Общие вопросы Delphi | 0 | 29.10.2006 21:36 |