Поделиться через

Макрокоманда ShowAllRecords

  • Статья

Область применения: Access 2013, Office 2013

С помощью действия ShowAllRecords можно удалить любой примененный фильтр из активной таблицы, результирующий набор запросов или форму, а также отобразить все записи в таблице или результирующем наборе или все записи в базовой таблице или запросе формы.

Setting

У действия ShowAllRecords нет аргументов.

Замечания

Это действие можно использовать для отображения всех записей (включая все измененные или новые записи) для таблицы, результирующих наборов запросов или формы. Это действие приводит к повторному запросу записей для формы или подчиненной формы.

Это действие также можно использовать для удаления любого фильтра, примененного с помощью действия ApplyFilter , команды Filter на вкладке Главная или аргумента Имя фильтра или Условие Where действия OpenForm .

Это действие имеет тот же эффект, что и при щелчке переключения фильтра на вкладке Главная , либо щелкнуть правой кнопкой мыши отфильтрованное поле и выбрать команду Очистить фильтр из... в режиме формы, макета или таблицы.

Чтобы запустить действие ShowAllRecords в модуле Visual Basic для приложений (VBA), используйте метод ShowAllRecords объекта DoCmd.

Пример

Применение фильтра с помощью макроса

Следующий макрос содержит набор действий, каждое из которых фильтрует записи для формы Списка телефонов клиента. Здесь показано использование действий ApplyFilter, ShowAllRecords и GoToControl . Здесь также показано использование условий для определения того, какая кнопка переключения в группе параметров была выбрана в форме. Каждая строка действия связана с переключателем, который выбирает набор записей, начиная с A, B, C и т. д., или всех записей. Этот макрос должен быть присоединен к событию AfterUpdate группы параметров CompanyNameFilter.

Условие

Макрокоманда

Аргументы: параметр

Примечание

[Фильтры названий компаний] =1

ApplyFilter

Условие where: [название компании], например "[AÀÁÂÃÄ]*"

Отфильтруйте названия компаний, которые начинаются с A, À, Á, Â, Ã или Ä.

[Фильтры названий компаний] =2

ApplyFilter

Условие where: [название компании], например "B*"

Фильтр по названиям компаний, которые начинаются с B.

[Фильтры названий компаний] =3

ApplyFilter

Условие where: [название компании], например "[CÇ]*"

Отфильтруйте названия компаний, которые начинаются с C или Ç.

... Строки действий для D–Y имеют тот же формат, что и от A до C ...

[Фильтры названий компаний] =26

ApplyFilter

Условие where: [название компании], например "[ZÆØÅ]*"

Отфильтруйте названия компаний, которые начинаются с Z, Æ, Ø или Å.

[Фильтры названий компаний] =27

ShowAllRecords

Показать все записи.

[RecordsetClone]. [RecordCount]>0

GoToControl

Имя элемента управления: CompanyName

Если для выбранной буквы возвращаются записи, переместите фокус на элемент управления CompanyName.