Прокрутка данных формы колисиком мыши в access 2010

@фельдшерАнтоний · Регистрация: 25.01.2011

Студворк — интернет-сервис помощи студентам

Добрый вечер!
Работая в access 2003 мне было удобно пролистывать записи в форме с помощью колесика мыши. Установив access 2010, такая возможность работы с мышью отчего-то пропала. Подскажите, как мне сделать, что бы в access 2010, работая с формами можно было листать записи в поле с помощью колесика мыши

@VinniPuh · 05.08.2013, 07:55

Такая возможность уже в 2007 отсутствовала, это была одна из причин, по которй вернулся в 2000.

mobile · 05.08.2013, 09:56

Я думаю, что вариант 2010 более последователен и логичен. Вот смотрите, стандартная прокрутка мышом в таблице и табличной форме не меняет текущую запись. И это соотвествует ожиданиям - выбрали запись, потом покрутились мышом по таблице, но выбранная запись не потеряна и всегда можно возвратиться в нее. В 2003 для таблиц и табличных форм действует такая же логика, но для простых форм эта логика иная - прокрутка мышом меняет активную запись. Получается, что в одном и том же объекте (форма), в зависимости от DefaultView действует различная логика. Особенно это заметно, когда главная форма простая, а подформа табличная. Находясь в главной - крутятся записи, в табличной подформе прокрутка не меняет активную запись. И юзеры долго не могут привыкнуть к такому двоякому поведению по колесику мышки и часто ошибаются. Так что, если по мне, то поведение в А2010 мне представляется более логичным и оправданным. И уж, во всяком случае, юзеру, особенно малоопытному, не надо гадать как поведет себя форма.

@VinniPuh · 05.08.2013, 11:15

Сообщение от mobile

...малоопытному...

mobile - А как быть среднеопытному? Если допустим 100-1000 записей, то нужно где то в середине найти запись, то я должен 400-500 раз нажать на кнопочку следующей записи

, это как то не ЛЯ и сильно раздражает. Возможно, тем кто не прочувствовал всего удобства прокрутки скролом, это и кажется в порядке вещей, а вот лично по мне - некоторые преимущества 2007 ни коим образом не покрывают такое казалось бы не значительное событие, как прокрутка. Вот

mobile · 05.08.2013, 11:43

Сообщение от kmv-puh

mobile - А как быть среднеопытному? Если допустим 100-1000 записей, то нужно где то в середине найти запись, то я должен 400-500 раз нажать на кнопочку следующей записи

, это как то не ЛЯ и сильно раздражает.

Все, что за пределами экрана, должно находиться поиском. А не глазами. Пожалейте глаза и время своих пользователей.

@VinniPuh · 05.08.2013, 12:06

Сообщение от mobile

должно находиться поиском

mobile - А если сам еще не знаешь или забыл, что именно нужно, только когда увидишь глазками, что это именно то что было надо.

У Вас разве такого не бывало ни когда?

mobile · 05.08.2013, 12:17

Нельзя делать редкую ситуацию стандартом. Проиграют частые.
Надо искать глазами в большом массиве - вызывайте табличную форму.

@VinniPuh · 05.08.2013, 12:27

Не, меня не убедить

@фельдшерАнтоний · 05.08.2013, 16:04 **[ТС]**

Благодарю за ответы

Но что можно сказать по существу заданного мною вопроса?

Лично я очень согласен с мнением kmv-puh. Возможно ли создать процедуру обработки прокручивания колесика мыши, что бы оно вновь прокручивала записи в активных полях?

mobile · 05.08.2013, 16:53

Сообщение от kmv-puh

Не, меня не убедить

Не входит в мои обязанности. Опыт убедит.

фельдшерАнтоний, если владеете АПИ, можно. Не думаю, что просто.

@фельдшерАнтоний · 08.08.2013, 22:21 **[ТС]**

Если бы владел АПИ, думаю, не создал такой темы

Благодарю за ответы. Надеюсь в будущем все-таки найду решение своего вопроса.

@фельдшерАнтоний · 12.05.2014, 00:25 **[ТС]**

Спустя почти год нашел решение указанной проблемы:

Откройте форму в режиме конструктора.
Используйте сочетание клавиш Alt + F11 или выберите команду Просмотреть код в группе "Сервис" на ленте, чтобы открыть окно редактора Microsoft Visual Basic.
Вставьте следующий код в окно кода.

Private Sub Form_MouseWheel(ByVal Page As Boolean, ByVal Count As Long)

If Not Me.Dirty Then

If (Count < 0) And (Me.CurrentRecord > 1) Then

DoCmd.GoToRecord , , acPrevious

ElseIf (Count > 0) And (Me.CurrentRecord <= Me.Recordset.RecordCount) Then

DoCmd.GoToRecord , , acNext

End If

Else

MsgBox "The record has changed. Save the current record before moving to another record."

End If

End Sub

Сохранить и затем открыть форму в режиме формы.
http://support.microsoft.com/kb/2458709/ru

@Eujine · 13.05.2014, 01:43

Сообщение от mobile

В 2003 для таблиц и табличных форм действует такая же логика, но для простых форм эта логика иная - прокрутка мышом меняет активную запись.

Обратный вопрос - а как можно это запретить в 2003-ем Аксе? У меня в бд есть одиночные формы, в которых я намеренно убираю кнопки перехода по записям, но юзеры все равно слетают с нужной записи из-за прокрутки.. ((

Добавлено через 37 минут
Можно, конечно, написать:

Visual Basic
1
2
3
4
5
6
7
Private Sub Form_MouseWheel(ByVal Page As Boolean, ByVal Count As Long)
If Count > 0 Then
Me.Recordset.MovePrevious
Else
Me.Recordset.MoveNext
End If
End Sub

Но есть засада - при резкой прокрутке код не работает,а а заморачиваться с субклассами в VBA боязно..

@Волшебник 307 · 13.05.2014, 16:12

Eujine,
В свойствах формы вкладка Другие
Поставь Цикл табуляции - текущая запись.

@Eujine · 13.05.2014, 17:08

Волшебник 307, в 2003 Аксе не работает. Все равно перескакивает на другие записи.

@ltv_1953 · 13.05.2014, 17:36

отключить мышь в форме

Не по теме:

Все придумано до нас

@VinniPuh · 13.05.2014, 18:37

Сообщение от ltv_1953

...Все придумано до нас...

Извращение какое то, колёсико САМАЯ НУЖНАЯ ВЕСТЧЬ при работе с БД.
Тем более если быстро скрол крутитить, все равно записи меняются.

@ltv_1953 · 13.05.2014, 18:45

В варианте alvk - нет.

Не по теме:

Иногда это нужно - сразу только одно вспоминается - форма для документов с автозаполнением реквизитами и т.п.. Т.е. при ее вызове, если документа еще не было, он заполняется из справочников. Формы большие и пользователи пытаются для перемещения по форме скроллить, попадают на новую запись.

@VinniPuh · 13.05.2014, 19:06

Сообщение от ltv_1953

...В варианте alvk - нет...

Есть - я попробовал.
Вы ващЕ лучше мыша отключите, тогда точно не будет ни чего крутиться.
Куда катится мир, я Ваще фигею от таких ценностей как - Чем меньше возможностей, тем ЛУЧШЕ - ПИМПЕЦ КАКОЙТА, так и до перфокарт скоро дойдем, вот всем будет удобно, набил дырочек в течении часа как надо и все будет как хочется.
Помню еще те крутые

времена.

@ltv_1953 · 13.05.2014, 19:16

Сообщение от kmv-puh

так и до перфокарт скоро дойдем, вот всем будет удобно,

Не по теме:

Перфокарты - это что, вот переключив десяток-другой тумблеров на системном пульте у БЭСМ-2, запустить задание с перфоленты - это было развлечение

Новые блоги и статьи Все статьи Все блоги /
Символические и жёсткие ссылки в Linux. algri14 15.03.2026 Существует два типа ссылок — символические и жёсткие. Ссылка в Linux — это запись в каталоге, которая может указывать либо на inode «файла-ИСТОЧНИКА», тогда это будет «жёсткая ссылка» (hard link),. . .	[Owen Logic] Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ФедосеевПавел 14.03.2026 Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ВВЕДЕНИЕ Выполняя задание на управление насосной группой заполнения резервуара,. . .	делаю науч статью по влиянию грибов на сукцессию anaschu 13.03.2026 прикрепляю статью	SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++ 8Observer8 10.03.2026 Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:
Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE 8Observer8 10.03.2026 Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .	Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки Neotwalker 08.03.2026 Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .	Модульная разработка через nuget packages DevAlt 07.03.2026 Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .	Модульный подход на примере F# DevAlt 06.03.2026 В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .

@фельдшерАнтоний 0 / 0 / 0 Регистрация: 25.01.2011 Сообщений: 37

	Прокрутка данных формы колисиком мыши в access 2010 05.08.2013, 02:23. Показов 9065. Ответов 21 Метки нет (Все метки) Добрый вечер! Работая в access 2003 мне было удобно пролистывать записи в форме с помощью колесика мыши. Установив access 2010, такая возможность работы с мышью отчего-то пропала. Подскажите, как мне сделать, что бы в access 2010, работая с формами можно было листать записи в поле с помощью колесика мыши 0

@VinniPuh 9131 / 6143 / 593 Регистрация: 27.03.2013 Сообщений: 20,011
	05.08.2013, 07:55
	Такая возможность уже в 2007 отсутствовала, это была одна из причин, по которй вернулся в 2000. 0

mobile 26826 / 14506 / 3192 Регистрация: 28.04.2012 Сообщений: 15,782
	05.08.2013, 09:56
	Я думаю, что вариант 2010 более последователен и логичен. Вот смотрите, стандартная прокрутка мышом в таблице и табличной форме не меняет текущую запись. И это соотвествует ожиданиям - выбрали запись, потом покрутились мышом по таблице, но выбранная запись не потеряна и всегда можно возвратиться в нее. В 2003 для таблиц и табличных форм действует такая же логика, но для простых форм эта логика иная - прокрутка мышом меняет активную запись. Получается, что в одном и том же объекте (форма), в зависимости от DefaultView действует различная логика. Особенно это заметно, когда главная форма простая, а подформа табличная. Находясь в главной - крутятся записи, в табличной подформе прокрутка не меняет активную запись. И юзеры долго не могут привыкнуть к такому двоякому поведению по колесику мышки и часто ошибаются. Так что, если по мне, то поведение в А2010 мне представляется более логичным и оправданным. И уж, во всяком случае, юзеру, особенно малоопытному, не надо гадать как поведет себя форма. 0

mobile 26826 / 14506 / 3192 Регистрация: 28.04.2012 Сообщений: 15,782
	05.08.2013, 12:17
	Нельзя делать редкую ситуацию стандартом. Проиграют частые. Надо искать глазами в большом массиве - вызывайте табличную форму. 0

@VinniPuh 9131 / 6143 / 593 Регистрация: 27.03.2013 Сообщений: 20,011
	05.08.2013, 12:27
	Не, меня не убедить 0

@фельдшерАнтоний 0 / 0 / 0 Регистрация: 25.01.2011 Сообщений: 37
	05.08.2013, 16:04 [ТС]
	Благодарю за ответы Но что можно сказать по существу заданного мною вопроса? Лично я очень согласен с мнением kmv-puh. Возможно ли создать процедуру обработки прокручивания колесика мыши, что бы оно вновь прокручивала записи в активных полях? 0

@фельдшерАнтоний 0 / 0 / 0 Регистрация: 25.01.2011 Сообщений: 37
	08.08.2013, 22:21 [ТС]
	Если бы владел АПИ, думаю, не создал такой темы Благодарю за ответы. Надеюсь в будущем все-таки найду решение своего вопроса. 0

@фельдшерАнтоний 0 / 0 / 0 Регистрация: 25.01.2011 Сообщений: 37
	12.05.2014, 00:25 [ТС]
	Спустя почти год нашел решение указанной проблемы: Откройте форму в режиме конструктора. Используйте сочетание клавиш Alt + F11 или выберите команду Просмотреть код в группе "Сервис" на ленте, чтобы открыть окно редактора Microsoft Visual Basic. Вставьте следующий код в окно кода. Private Sub Form_MouseWheel(ByVal Page As Boolean, ByVal Count As Long) If Not Me.Dirty Then If (Count < 0) And (Me.CurrentRecord > 1) Then DoCmd.GoToRecord , , acPrevious ElseIf (Count > 0) And (Me.CurrentRecord <= Me.Recordset.RecordCount) Then DoCmd.GoToRecord , , acNext End If Else MsgBox "The record has changed. Save the current record before moving to another record." End If End Sub Сохранить и затем открыть форму в режиме формы. http://support.microsoft.com/kb/2458709/ru 0

@Волшебник 307 1396 / 331 / 45 Регистрация: 16.04.2013 Сообщений: 786 Записей в блоге: 2
	13.05.2014, 16:12
	Eujine, В свойствах формы вкладка Другие Поставь Цикл табуляции - текущая запись. 0

@Eujine 73 / 47 / 9 Регистрация: 24.03.2014 Сообщений: 470
	13.05.2014, 17:08
	Волшебник 307, в 2003 Аксе не работает. Все равно перескакивает на другие записи. 0

@ltv_1953 17536 / 7288 / 1663 Регистрация: 21.06.2012 Сообщений: 13,957
	13.05.2014, 17:36
	отключить мышь в форме Не по теме: Все придумано до нас 0

@ltv_1953 17536 / 7288 / 1663 Регистрация: 21.06.2012 Сообщений: 13,957
	13.05.2014, 18:45
	В варианте alvk - нет. Не по теме: Иногда это нужно - сразу только одно вспоминается - форма для документов с автозаполнением реквизитами и т.п.. Т.е. при ее вызове, если документа еще не было, он заполняется из справочников. Формы большие и пользователи пытаются для перемещения по форме скроллить, попадают на новую запись. 0