powered by simpleCommunicator - 2.0.59     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Обращение для хорошо знающих программу Excel
3 сообщений из 3, страница 1 из 1
Обращение для хорошо знающих программу Excel
    #32911502
Ilqar
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
в нижепоказанной таблице выполненной на Excel, надо выбрать информацию соответсвующей дате c 08.07.2005 00:00:00 по 09.07.2005 00:00:00. используя какие методы и фунцкии это можно выполнить на Excel?
PC: если таблица существовала бы на Access это выполнить было легко: (Select * from Table Where StartDate
between 08.07.2005 00:00:00 and 09.07.2005 00:00:00)

StartDate Calling Volume Called
07.07.2004 18:37:18 994506400549 2 2049901
07.07.2004 18:53:05 994502049901 28 0506400549
07.07.2005 18:58:38 994502049901 116 0506400549
07.07.2004 19:28:25 994502049901 143 0506400549
07.07.2004 21:04:55 994502049901 164 0506400549
08.07.2004 17:41:10 994502049901 51 0506400549
08.07.2004 18:32:19 994502049901 413 0506400549
08.07.2004 21:32:40 994502049901 178 0506400549
08.07.2005 23:38:08 994502049901 111 0506400549
09.07.2004 01:38:43 994502049901 10 0506400549
09.07.2004 12:02:47 994502049901 133 0506400549
09.07.2004 19:59:56 994502049901 82 0506400549
09.07.2005 21:01:26 994502049901 115 0506400549
09.07.2004 23:49:20 994502049901 90 0506400549
10.07.2004 10:38:39 994502049901 197 0506400549
10.07.2004 12:53:55 994502049901 111 0506400549

Select * from Table Where StartDate
between 08.07.2005 00:00:00 and 09.07.2005 00:00:00

Результат:

08.07.2005 23:38:08 994502049901 111 0506400549
09.07.2005 21:01:26 994502049901 115 0506400549
...
Рейтинг: 0 / 0
Обращение для хорошо знающих программу Excel
    #32911588
AndreyK1970
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Быстрое решение с помощью фильтра (Меню - "Данные\Фильтр\Автофильтр"

В приложении пример
...
Рейтинг: 0 / 0
Обращение для хорошо знающих программу Excel
    #32912257
marvan
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
можно програмно создать расширенный фильтр
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
'например
    ActiveWorkbook.Names.Add Name:="Extract", RefersToR1C1:= _
        Range(Cells(j +  6 , (SheetCols *  2 ) +  3 ), Cells(j +  6 , (SheetCols *  3 ) +  3 ))
    ActiveWorkbook.Names.Add Name:="Database", RefersToR1C1:= _
        Range(Cells( 5 , SheetCols +  2 ), Cells(SheetRows, (SheetCols *  2 ) +  2 ))
    ActiveWorkbook.Names.Add Name:="Criteria", RefersToR1C1:= _
        Range(Cells( 2 , (SheetCols *  2 ) +  2 ), Cells( 3 , (SheetCols *  2 ) +  2 ))
    
    'задаём расширенный фильтр
    ActiveSheet.Range("Database").AdvancedFilter _
    Action:=xlFilterCopy, _
    CriteriaRange:=ActiveSheet.Range("Criteria"), _
    CopyToRange:=ActiveSheet.Range("Extract"), _
    Unique:=False
продробности в справке VBA
...
Рейтинг: 0 / 0
3 сообщений из 3, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Обращение для хорошо знающих программу Excel
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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