Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / справочник клиентов в excel / 5 сообщений из 5, страница 1 из 1
06.08.2009, 15:31:45
    #36130351
PlanB
PlanB
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
справочник клиентов в excel
Вот, сделал чудовище, может пригодится кому.
Основано на использовании расширенного фильтра.

Приятно, что при вводе в поле клиент условия "*саша", выборка будет производиться по всем записям, содержащим слово "саша". А при "???я" - по всем записям, содержашим букву "я" на третьей позиции.

Коды:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Row =  2  And Target.Column <=  3  Then
        Call AdF
    End If
End Sub

Private Sub AdF()
On Error Resume Next
'сбрасываем условия перед началом работы, иначе тормозит
    ActiveSheet.ShowAllData
ThisWorkbook.ActiveSheet.Range("a4:c65536").AdvancedFilter _
    Action:=xlFilterInPlace, _
    CriteriaRange:=Range("a1:c2"), _
    Unique:=False
End Sub
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
06.08.2009, 16:04:47
    #36130484
Khromykhm
Khromykhm
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
справочник клиентов в excel
да, мне когда-то такая штука нужна была. спасибо!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
07.08.2009, 08:00:44
    #36131483
Infinity Creator
Infinity Creator
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
справочник клиентов в excel
PlanB,

Скажите, как вы сделали только три столбца в воркшите?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
07.08.2009, 08:40:26
    #36131512
Korcar
Korcar
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
справочник клиентов в excel
Infinity Creator, они скрыты
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
07.08.2009, 10:40:59
    #36131736
PlanB
PlanB
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
справочник клиентов в excel
KorcarInfinity CreatorPlanB,

Скажите, как вы сделали только три столбца в воркшите?Infinity Creator, они скрытыНу, да, не велика хитрость
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / справочник клиентов в excel / 5 сообщений из 5, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 492ms
Закрыть
start [/forum/topic.php?fid=61&mobile=1&tid=2179185]:
 0ms
get settings:
 7ms
get forum list:
 17ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 214ms
get topic data:
 8ms
get forum data:
 2ms
get page messages:
 31ms
get tp. blocked users:
 1ms
others: 206ms
total:  492ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]