Пример 2 кода на VBA в приложении на MS Access