Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Макросы / 12 сообщений из 12, страница 1 из 1
24.01.2003, 13:37
    #32095890
Sfagnum
Sfagnum
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Макросы
Народ есть трабла.
Я хочу на открытие и закрытие БД выполнить некии телодвижения с помощью VBA, код VBA я запихал в модуль. Я слышал что его можно вроде выполнить как то с помощью макроса, но так получилось что я в этом не ухом не рылом.

Подскажите, на пальцах, как выполнить модуль на открытие/закрытие БД

Заранее спасибо
Sfagnum
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
24.01.2003, 13:39
    #32095893
Sfagnum
Sfagnum
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Макросы
Ах да... я совсем забыл... юзаю Access'97
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
24.01.2003, 13:46
    #32095902
Guesticha
Guesticha
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Макросы
ОткрытьМодуль, в макросе, сохранить как Autoexec...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
24.01.2003, 13:49
    #32095906
Guesticha
Guesticha
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Макросы
+ др макрос ЗапускМакроса, повесив в настройках на закрытие, или запуск БД...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
24.01.2003, 14:03
    #32095929
Sfagnum
Sfagnum
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Макросы
To Guesticha:
Если можно то на пальчиках пожалуста.

1.
> ОткрытьМодуль, в макросе, сохранить как Autoexec...
т.е. в макросе на Action выбрать OpenModule ну и там прописать всё как надо?.. - модуль открывает, а как его просто выполнить

2
> + др макрос ЗапускМакроса, повесив в настройках на закрытие, или запуск БД...
ЗапускМакроса - понял...
повесив в настройках на закрытие - не подскажете хде это?

т.е. у меня щас остались вопросы
1. как макросом запустить модуль
2. где ентот макрос и за что подвесить
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
24.01.2003, 14:12
    #32095940
...
...
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Макросы
естественно можно, ты же мне помощь оказывал...))
Маркакоманда...ОткрытьМодуль...(Имя модуля)...(Имя запускаемой процедуры)
сохранить как Autoexec для того, чтобы выполнялся при запуске..., в код вставить ссылку на его запуск при запрытии БД:

Код: plaintext
1.
2.
3.
4.
Dim stDocName As String

    stDocName = ChrW( 1052 ) & ChrW( 1072 ) & ChrW( 1082 ) & ChrW( 1088 ) & ChrW( 1086 ) & ChrW( 1089 ) & ChrW( 49 )
    DoCmd.RunMacro stDocName
    DoCmd.Close
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
24.01.2003, 14:27
    #32095957
Shark
Shark
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Макросы
Про закрытие.
При открытии открывать невидимую форму, а на ее закрытие написать код.
В autoexec не надо открывать никаких модулей, просто выполнить команду:
Запуск программы
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
24.01.2003, 14:41
    #32095974
Sfagnum
Sfagnum
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Макросы
Маркакоманда...ОткрытьМодуль...(Имя модуля)...(Имя запускаемой процедуры) - открывает модуль, а не запускает процедуру в модуле
RunCode...(Function) - вроде должно работать, но не работает...
Autoexec - выполняется.
А выделенный текст не понял куда вставить

То Shark:
Невидимая форма это как? Какое свойство отвечает за её невидимость?
(Access'97)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
24.01.2003, 14:52
    #32095990
Shark
Shark
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Макросы
1) Про невидимость- В Docmd.OpenForm есть параметр
2) Функция должна быть public для макроса
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
24.01.2003, 15:05
    #32096012
Sfagnum
Sfagnum
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Макросы
То Shark

1. Спасибо помогло
2. RunCode...(Function) - не работает. Не паблик процедуры видны и назначались, поменял на паблик - не помогло...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
24.01.2003, 15:10
    #32096023
Sfagnum
Sfagnum
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Макросы
Ссорьки работает но как то срраннно - таблицы/запросы удалить - пожалуста.
а как новые создать фигушки вамушки... млин....
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
24.01.2003, 15:15
    #32096025
Sfagnum
Sfagnum
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Макросы
Во млин до чего себе глаза замылил...
Вообщем на RunCode...(Function) Sub ставить нельзя(???) только Function причём паблик не паблик - побарабану.

Всем спасибо
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Макросы / 12 сообщений из 12, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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