A. Создание макроса

     При открытии любой базы данных автоматически запускается макрос AutoExec, вспомните командный файл DOS «autoexec.bat». В этот макрос для примера можно вставить программы Access, например, команду увеличения приложения до максимального размера и команду открытия формы «Мой калькулятор».

B. Проверка знаний

     Теперь Вы научились создавать макросы в Access. Для просмотра объектов базы данных нажмите кнопку [Проверка N8], для продолжения учебы, нажмите кнопку Вперед>

08.06.2000 Виктор Конюков, mailto:LiderAccess@bigfoot.com

Public Function funCreateMacro(strMacro As String) As Boolean

Dim frm As Form

    On Error GoTo 999 'Переход по ошибке

    funCreateMacro = False 'Возвращаем значение при ошибке

    'Импортируем макрос

    appAccess.DoCmd.TransferDatabase acImport, "Microsoft Access", appFolder & "\Старый калькулятор.mdb", acMacro, strMacro, strMacro

    funCreateMacro = True 'Возвращаем значение

    Exit Function 'Выходим из программы

999:

    MsgBox Err.Description 'Сообщаем об ошибке

    Err.Clear 'Очищаем поток от ошибок

---