Этот баннер — требование Роскомнадзора для исполнения 152 ФЗ.
«На сайте осуществляется обработка файлов cookie, необходимых для работы сайта, а также для анализа использования сайта и улучшения предоставляемых сервисов с использованием метрической программы Яндекс.Метрика. Продолжая использовать сайт, вы даёте согласие с использованием данных технологий».
Политика конфиденциальности

Новые сообщения [новые:0]
Дайджест
Горячие темы
Избранное [новые:0]
Форумы
Пользователи
Статистика
Статистика нагрузки
Мод. лог
Поиск
|
|
23.09.2004, 13:49
|
|||
|---|---|---|---|
|
|||
Остановка выполнения рабочего кода из Win98 в WinXP |
|||
|
#18+
Уважаемые! Помогите понять, в чем затык - есть кусочек кода, отлично работавший на 98 и 2000 виндах Columns("B:B").Select Set R = Selection.Find(What:=lineval, After:=ActiveCell, LookIn:=xlValues, _ LookAt:=xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext, _ MatchCase:=True) If R Is Nothing Then Sumline1 = 0 Else Selection.Find(What:=lineval, After:=ActiveCell, LookIn:=xlValue, _ LookAt:=xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext, _ MatchCase:=False).Activate ActiveCell.Select End if На винХР все тормозится тут Selection.Findf(What:=lineval, After:=ActiveCell, LookIn:=xlValue, _ LookAt:=xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext, _ MatchCase:=False).Activate Неужели синтаксис поменяли? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
23.09.2004, 16:06
|
|||
|---|---|---|---|
Остановка выполнения рабочего кода из Win98 в WinXP |
|||
|
#18+
... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|

start [/forum/topic.php?fid=60&mobile=1&tid=2168823]: |
0ms |
get settings: |
8ms |
get forum list: |
15ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
54ms |
get topic data: |
9ms |
get forum data: |
2ms |
get page messages: |
34ms |
get tp. blocked users: |
1ms |
| others: | 234ms |
| total: | 363ms |

| 0 / 0 |
