powered by simpleCommunicator - 2.0.53     © 2025 Programmizd 02
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Не работает VBA код (Access 2007 в Windows 8)
24 сообщений из 24, страница 1 из 1
Не работает VBA код (Access 2007 в Windows 8)
    #38305952
Nebo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Столкнулся с ситуацией, запускаю mdb файл.
И вижу, что VBA код не выполняется.
...
Рейтинг: 0 / 0
Не работает VBA код (Access 2007 в Windows 8)
    #38305954
Nebo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Продолжение:
...
Рейтинг: 0 / 0
Не работает VBA код (Access 2007 в Windows 8)
    #38305957
Nebo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
В центре управления безопасностью включил выполнение макросов.

В чём может быть проблема?
...
Рейтинг: 0 / 0
Не работает VBA код (Access 2007 в Windows 8)
    #38305961
Фотография ПЕНСИОНЕРКА
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Nebo,

--проверьте ссылки
--откомпилируйте модули
...
Рейтинг: 0 / 0
Не работает VBA код (Access 2007 в Windows 8)
    #38306039
Фотография Панург
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
...
Рейтинг: 0 / 0
Не работает VBA код (Access 2007 в Windows 8)
    #38306165
Nebo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ПанургNebo,

Не? - Access 2007 изолированный режим

Спасибо) Пока сижу соображаю что делать. Вчитываюсь.
Вопросы появятся.
У клиента Windows 8. mdb файл
Всё это в другом городе.
Надо как-то настроить удалённо.

Программа заработала. Но:

Медленно, задумчиво открываются некоторые экраны.
Отображаются не все записи.
...
Рейтинг: 0 / 0
Не работает VBA код (Access 2007 в Windows 8)
    #38306168
Nebo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Следующие команды не выполняются (игнорируются):

Forms!frmMain1.Form.List.SourceObject = "frmMainList1"
Forms!frmMain1.Form.List.Form.Requery 'это для работы в Access 2007
...
Рейтинг: 0 / 0
Не работает VBA код (Access 2007 в Windows 8)
    #38306365
Nebo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
В 2007 Аксессе делаю так:

=[List1].[Form].[Recordset].[RecordCount]

Возвращает #Имя?

А в 2003 Аксессе всё работает. В чём может быть дело?
...
Рейтинг: 0 / 0
Не работает VBA код (Access 2007 в Windows 8)
    #38306372
Nebo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Проблемы в MS Access 2007:

В табличной форме на экране 3 записи.

Делаю: Me.List1.SourceObject = Me.List1.SourceObject 'этот вариант для сети

Почему-то в табличной форме остаётся только одна запись.
Что-то Access 2007 не любит команду Me.List1.SourceObject = Me.List1.SourceObject

Может кто знает в чём дело?
...
Рейтинг: 0 / 0
Не работает VBA код (Access 2007 в Windows 8)
    #38306915
Nebo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ребята помогите пожалуйста.
У меня в проекте часто используется установка субформ, примерно так: Me.FormList.SourceObject = "frmList1"

Изначально на форме находится субформа "frmList1" с табличкой. Скажем в табличке на экране 5 записей.

В 2003 Аксессе всё работает отлично.


А в 2007 (2010) Акссесе происходит следующее (глюк):

Я программно меняю источник субформы на другой ("frmList2"), потом опять возвращаюсь к "frmList1"

Команда Me.FormList.SourceObject = "frmList1" срабатывает и ошибок не даёт.
Но субформа "frmList1" теперь отражает НЕ 5 записей, а только одну.
Хотя там простейший запрос.

Это какой-то глюк. Куда копать не знаю. Перерыл Сеть. Найти пока ничего не могу.

То есть это какая-то заморочка с SourceObject
...
Рейтинг: 0 / 0
Не работает VBA код (Access 2007 в Windows 8)
    #38306936
Фотография mds_world
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Nebo, чтобы не гадать понапрасну, сделайте модельный вариант и выложите его здесь.
...
Рейтинг: 0 / 0
Не работает VBA код (Access 2007 в Windows 8)
    #38306938
Nebo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
mds_worldNebo, чтобы не гадать понапрасну, сделайте модельный вариант и выложите его здесь.

Спасибо) Наверное так и сделаю.
Может тогда что-нибудь и прояснится с SourceObject
...
Рейтинг: 0 / 0
Не работает VBA код (Access 2007 в Windows 8)
    #38307496
Nebo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Как и обещал публикую проблему, которая возникает в 2007, 2010 Access:

Главная форма frmMainForm основа на запросе (Примечание: если этот запрос убрать, то проблемы, описанной ниже не возникает).

В субформе могут быть разные списки.
Сейчас форма в исходном положении. Вложенный список: 5 фамилий

Нажмём справа кнопку Фамилии.

Выполнится команда:

Код: vbnet
1.
Forms!frmMainForm.Form.SubFormList.SourceObject = "frmMainFormList1"




Вложенный список станет содержать только 1 фамилию (а должен содержать 5 фамилий).
Смотрим результат в следующем посте.

В 2003 Access такой проблемы нет.
Проблема с SourceObject для вложенной субформы возникает только тогда, когда главная форма основана на RecordSet.
...
Рейтинг: 0 / 0
Не работает VBA код (Access 2007 в Windows 8)
    #38307502
Nebo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Получается странная ситуация.
После выполнения команды:

Код: vbnet
1.
Forms!frmMainForm.Form.SubFormList.SourceObject



вложенный список отображает только одну запись.
...
Рейтинг: 0 / 0
Не работает VBA код (Access 2007 в Windows 8)
    #38307506
Nebo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Публикую MS Access mdb файл:
...
Рейтинг: 0 / 0
Не работает VBA код (Access 2007 в Windows 8)
    #38307643
?????
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
Private Sub BtList1_Click()
'    Me.SubFormList.SourceObject = "frmMainFormList1"
    Forms!frmMainForm.Form.SubFormList.SourceObject = "frmMainFormList1"
    Forms!frmMainForm.Form.SubFormList.LinkMasterFields = ""
    Forms!frmMainForm.Form.SubFormList.LinkChildFields = ""
End Sub

Private Sub BtList2_Click()
'    Me.SubFormList.SourceObject = "frmMainFormList2"
    Forms!frmMainForm.Form.SubFormList.SourceObject = "frmMainFormList2"
    Forms!frmMainForm.Form.SubFormList.LinkMasterFields = ""
    Forms!frmMainForm.Form.SubFormList.LinkChildFields = ""
    
End Sub
...
Рейтинг: 0 / 0
Не работает VBA код (Access 2007 в Windows 8)
    #38307809
Nebo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Применил:

Код: vbnet
1.
2.
    Forms!frmMainForm.Form.LeftList.LinkMasterFields = ""
    Forms!frmMainForm.Form.LeftList.LinkChildFields = ""



Работает только для одной субформы.

Добавил справа вторую субформу, которая зависит от первой субформы.
В этом случае проблема в правой субформе остаётся.

В 2003 и 2007 Аксессе правая субформа не обновляется после установки SourceObject
...
Рейтинг: 0 / 0
Не работает VBA код (Access 2007 в Windows 8)
    #38307946
Nebo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Почему может медленно открываться в форма с вкладками в MS Access 2007?
...
Рейтинг: 0 / 0
Не работает VBA код (Access 2007 в Windows 8)
    #38307949
Nebo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
У меня нет MS Access 2007 и поэтому нет возможности проверить.
Интересует связка Windows 8 и MS Access 2007.
...
Рейтинг: 0 / 0
Не работает VBA код (Access 2007 в Windows 8)
    #38309036
?????
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
В целом решение напоминает выступление члена российской делегации на всемироном конгрессе стоматологов.
...
Рейтинг: 0 / 0
Не работает VBA код (Access 2007 в Windows 8)
    #38309328
Nebo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Как они там в Майкрософте пишут и тестирует Аксесс? Где Quality Assuarance?
Почему банальные баги не исправляются годами?
В данной ситуации с LinkMasterFields - это ни в какие ворота не лезет.
И эта ошибка в 2007, 2010 Аксе.
...
Рейтинг: 0 / 0
Не работает VBA код (Access 2007 в Windows 8)
    #38309461
qwerty112
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
NeboКак они там в Майкрософте пишут и тестирует Аксесс? Где Quality Assuarance?
Почему банальные баги не исправляются годами?
В данной ситуации с LinkMasterFields - это ни в какие ворота не лезет.
И эта ошибка в 2007, 2010 Аксе.
насколько я понял, вы "нарвались" на "удобнейшую" фичу в >=А2007 - автолинк подчинённых форм
это когда Акс сам устанавливает связь между главной и подчинёнными формами, при этом эта связь даже не отображается в свойствах контрола "подч.форма/отчет"

когда-то, про эту фишку писал непоймучка, но топик я найти не смог...

вроде бы как это "счастье" можно отключить через application.SetOption, но какой ключ этого Option, я тоже не в курсАх
...
Рейтинг: 0 / 0
Не работает VBA код (Access 2007 в Windows 8)
    #38309649
Nebo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
qwerty112,


Ага) Нарвался с разбегу)
...
Рейтинг: 0 / 0
Период между сообщениями больше года.
Не работает VBA код (Access 2007 в Windows 8)
    #39603754
Nebo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Читаю https://stackoverflow.com/questions/26373328/linkchildfields-and-linkmasterfields-being-automatically-set-when-changing-recor

Каким ключом можно выключить автоподстановку LinkChildFields ?

У меня в субформе запрос с двумя условиями. Эти условия завязаны на родительскую форму.

Использую у субформы SourceObject для динамческого присваивания формы.

И вижу, что ID главной формы идёт в оба условия запроса в субформе.

При этом LinkChildFields = "" и LinkMasterFields =""

Поменял ID в субформе, скажем, на BookID, как советуется на стэковерфлоу.
Субформа заработала. Но ведь этот танцы с бубном.
...
Рейтинг: 0 / 0
24 сообщений из 24, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Не работает VBA код (Access 2007 в Windows 8)
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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