VBA программирование, свежие головы есть?
2551
11
Подскажите, уважаемые.
В MS Access в модуле нужно написать примерно то, что делают руками:
1)Открыть форму
2)Нажать кнопку на форме
Просьба сразу дать пример кода ,т.к. потом будет еще вопрос.
ps.
Сходу не нашел активного форума по VBA. Где бы не написал, сообщение лежит неделями неотвеченное...![:а\?:](https://m.forum.ngs.ru/static/img/graemlins/confused.gif)
В каких форумах VBA'шники тусуются?![:pivo:](https://m.forum.ngs.ru/static/img/graemlins/fist.gif)
В MS Access в модуле нужно написать примерно то, что делают руками:
1)Открыть форму
2)Нажать кнопку на форме
Просьба сразу дать пример кода ,т.к. потом будет еще вопрос.
ps.
Сходу не нашел активного форума по VBA. Где бы не написал, сообщение лежит неделями неотвеченное...
![:а\?:](https://m.forum.ngs.ru/static/img/graemlins/confused.gif)
В каких форумах VBA'шники тусуются?
![:pivo:](https://m.forum.ngs.ru/static/img/graemlins/fist.gif)
Что-то не везет... То ли вопрос простой, то ли сложный очень?
В 3-х местах вопрос лежит без ответа.
А там http://bbs.vbstreets.ru/viewforum.php?f=7
после публикации вопроса, что-то упало![:death:](https://m.forum.ngs.ru/static/img/graemlins/die.gif)
SQL Error : 1030 Got error 28 from table handler![:безум:](https://m.forum.ngs.ru/static/img/graemlins/crazy.gif)
В 3-х местах вопрос лежит без ответа.
А там http://bbs.vbstreets.ru/viewforum.php?f=7
после публикации вопроса, что-то упало
![:death:](https://m.forum.ngs.ru/static/img/graemlins/die.gif)
SQL Error : 1030 Got error 28 from table handler
![:безум:](https://m.forum.ngs.ru/static/img/graemlins/crazy.gif)
А в чём проблема то ? Всё это элементарно:
1)Открыть форму - UserForm1.Show
2)Нажать кнопку на форме - Здесь не понял, что имено требуеться
?
1)Открыть форму - UserForm1.Show
2)Нажать кнопку на форме - Здесь не понял, что имено требуеться
![:спок:](https://m.forum.ngs.ru/static/img/graemlins/cool.gif)
О, спасибо, а то я уж хотел
1) DoCmd.OpenForm "ФормаМоя"
2) Есть на форме кнопка, если нажать руками, все ok. Если в форму вставить в процедуру "активизации формы", вызов той функции, которая кнопкой запускается, имеем ошибку, т.к. форма еще не до конца загрузилась и инициализировалась.
ps.
Еще один сервер упал от этого вопроса.
http://www.vbrussian.com/
1) DoCmd.OpenForm "ФормаМоя"
2) Есть на форме кнопка, если нажать руками, все ok. Если в форму вставить в процедуру "активизации формы", вызов той функции, которая кнопкой запускается, имеем ошибку, т.к. форма еще не до конца загрузилась и инициализировалась.
ps.
Еще один сервер упал от этого вопроса.
![:смущ:](https://m.forum.ngs.ru/static/img/graemlins/blush.gif)
Всё равно я не понял, что ты хочешь сделать
Можешь это более подробно объяснить?
И не плохо было бы включить в сообщение нерабочий код.
Процедуру в Студию![:улыб:](https://m.forum.ngs.ru/static/img/graemlins/smile.gif)
!
![:а\?:](https://m.forum.ngs.ru/static/img/graemlins/confused.gif)
И не плохо было бы включить в сообщение нерабочий код.
Если в форму вставить в процедуру "активизации формы"В форму можно вставить только объекты (кнопки, чекбоксы, поля итд).
Процедуру в Студию
![:улыб:](https://m.forum.ngs.ru/static/img/graemlins/smile.gif)
![:спок:](https://m.forum.ngs.ru/static/img/graemlins/cool.gif)
1)Открыть форму - UserForm1.ShowНе удалось так
![:а\?:](https://m.forum.ngs.ru/static/img/graemlins/confused.gif)
Так работает
DoCmd.OpenForm "ФормаМоя", acNormal, , , acFormEdit, acWindowNormal, ""
DoCmd.GoToControl "Кнопка65"
SendKeys """{Enter}""", True
Но мне не нравится - криво как-то
![:безум:](https://m.forum.ngs.ru/static/img/graemlins/crazy.gif)
Всё равно я не понял, что ты хочешь сделатьЕсть база Access, обычно ее пользователь запускает, открывает форму, нажимает кнопку, по которой открывается excel файл, сохраняет его, все закрывает.Можешь это более подробно объяснить?
Нужно сделать все то же самое, но автоматически.
Например, если в каталоге имеется файл ex.flg, то Access при запуске сам все делает (открывает форму, нажимает кнопку, сохраняет и все закрывает).
Все это уже сделал.
![:ха-ха!:](https://m.forum.ngs.ru/static/img/graemlins/grin.gif)
попутно возник еще вопрос.
открыл форму DoCmd.OpenForm "ФормаМоя" и хочу перед нажатием кнопки проверить состояние записи источника данных формы. Как?
Про "активизацию формы"(Свойства формы - события - включение) пока забудем - ничего полезного там не нашел, бросил это...
Сейчас читают
Zosia:"Утонула в кошках! Пожалуйста, помогите!!!" (часть 5)
66019
328
Средства для ухода за животными (обмен/продажа) - читать 1 пост
1024127
965
Бесит!!
95480
477
Можно, конечно, и так. Работает же?
Хотя можно и проще. Можно создать обработчик события открытия БД и скопировать туда обработчик события кнопки![:спок:](https://m.forum.ngs.ru/static/img/graemlins/cool.gif)
Хотя можно и проще. Можно создать обработчик события открытия БД и скопировать туда обработчик события кнопки
![:спок:](https://m.forum.ngs.ru/static/img/graemlins/cool.gif)
Скопировать обработчик события кнопки я тоже хотел, но... ![:death:](https://m.forum.ngs.ru/static/img/graemlins/die.gif)
Форма, из которой нажимается кнопка так сделана (не мной), что там очень много кода, инициализирующего массу трудно разобрать чего... пока в этом разберешься...
По поводу работоспособности... Один раз все зависло с предложением обратится к разработчику или послать что-то в их сторону...![:а\?:](https://m.forum.ngs.ru/static/img/graemlins/confused.gif)
![:death:](https://m.forum.ngs.ru/static/img/graemlins/die.gif)
Форма, из которой нажимается кнопка так сделана (не мной), что там очень много кода, инициализирующего массу трудно разобрать чего... пока в этом разберешься...
![:eek:](https://m.forum.ngs.ru/static/img/graemlins/eek.gif)
По поводу работоспособности... Один раз все зависло с предложением обратится к разработчику или послать что-то в их сторону...
![:а\?:](https://m.forum.ngs.ru/static/img/graemlins/confused.gif)
Понимаю...
Ничего хуже, чем копаться в чужом коде наверное нет
![:спок:](https://m.forum.ngs.ru/static/img/graemlins/cool.gif)
Ничего хуже, чем копаться в чужом коде наверное нет
![:ухмылка:](https://m.forum.ngs.ru/static/img/graemlins/smirk.gif)
![:спок:](https://m.forum.ngs.ru/static/img/graemlins/cool.gif)
Понимаю...Сначала да, потом привыкаешь и всё ок :). Да и чемунить новому можно научиться
Ничего хуже, чем копаться в чужом коде наверное нет
ТОП 5
2
3