Microsoft Access является полезным приложением, поскольку позволяет создавать и хранить данные во многих связанных таблицах, предлагая большую эффективность и стандартизацию, чем электронные таблицы.
Таблицы являются основой базы данных.
Но, в отличие от обычных таблиц Excel, где ввод данных — очень медленная и утомительная процедура, создание форм в Access-формах выполняется с использованием удобных многочисленных функций.
Простые формы доступа
Все формы основаны на одной или нескольких таблицах базы данных, поэтому перед созданием форм сначала необходимо создать первичную таблицу. Существует много способов создания формы в Access. Программа создает базовую форму всего за один клик, поэтому пользователь может получить полностью настроенную форму с нуля.
Чтобы выбрать форму, необходимо войти на вкладку «Создать» на ленте меню, и найти раздел «Формы». При нажатии этой кнопки автоматически создается базовая форма, основанная на исходной таблице, выделенной на левой панели навигации. Это самый простой вариант для создания форм в Access, хотя предоставляет меньшую гибкость.
Разделенная форма фактически отображает данные из двух таблиц. Одна часть выглядит как электронная форма, расположенная ниже. Простая форма в Access показывает только одну запись, разделенная же имеет несколько строк, чтобы пользователи вводили много данных на экране. Этот тип формы полезен для ввода длинных списков, у которых столбцов не много.
Создание проекта с нуля
После того как будет выбран один из вариантов формы, пользователь приступает к созданию формы для ввода данных в Access с нуля, применяя дополнительные функции программы. Для этого нужно перейти в Дополнительные формы -> Мастер форм и далее нажать стрелку раскрывающегося списка «Больше форм», найти опцию для Мастера форм. После чего Access проведет пользователя по этапам создания формы и даст возможность использовать множество настроек, создавая баланс между программой, чтобы Access выполнила большую часть работы, и пользователем, создающему форму самостоятельно.
Существует много вариантов, которые можно реализовать с помощью создания форм MS Access. Можно создать два основных типа форм:
- Связанные формы.
- Несвязанные формы.
Связанные формы (Bound Forms) взаимодействуют с некоторыми базами данных, такими как оператор SQL, запрос или таблица. Этот вид используется для ввода или редактирования данных в базе.
Несвязанные формы (Unbound Forms) не зависят от источника данных. Они могут быть в форме диалоговых окон и коммутационных площадок, используемых для навигации с базой данных в целом. Существует много режимов создания форм в Access.
Типы связанных форм:
- Форма единого элемента, самая популярная, когда записи отображаются в одной записи единовременно.
- Несколько элементов, отображает ряд записей за один раз из связанного источника данных.
- Сплит-форма, разделяется на половину, горизонтально или вертикально. Одна отображает элемент или запись, а другая — предоставляет данные нескольких записей из базового источника данных.
База данных Access
Для создания форм access формы имеется несколько способов. Для этого нужно открыть базу данных и войти на «Создать». Во вкладке «Формы» в правом углу нажать кнопку «Мастер форм». На первом экране выбирают поля, которые нужно будет отобразить в форме. Алгоритм действия:
- В мастере форм выбрать tblProjects для таблиц/запросов и несколько необходимых полей, таких как ProjectStart, ProjectName, ProjectID, и ProjectEnd. Они перейдут в рабочие поля.
- Выбрать tblTasks для таблиц / запросов и разместить по полям.
- Нажать «Далее».
- Выбрать вид упорядочивания создания форм и отчетов в access. Если нужно создать плоскую форму, выбирают организацию tblTasks, а при создании иерархической формы, можно упорядочить данные с помощью tblProjects.
- Выбрать форму с подформами (s) и затем нажать «Далее». На следующем экране можно выбрать макет для своей подформы. По умолчанию выбран Datasheet View. Он похож на Table View.
- Нажать «Далее».
- На следующем экране необходимо указать имя формы и «Готово».
Создание форм в Microsoft Access через дополнительную форму выполняют через раскрывающееся меню «Дополнительные формы». Далее нужно создать форму «Несколько элементов», форму Datasheet, форму «Сплит» или форму «Модальный диалог».
Это обычно связанные формы. Выбрать объект, который нужно привязать к этой форме. Это не относится к формам модального диалога.
Выбрать объект в навигационной панели, выделить tblEmployees, появится форма «Несколько элементов», в которой будут перечислены все данные.
Мастер приложения
Перед созданием форм Access их можно увидеть на экране и использовать для просмотра данных в таблице. Для этого существуют кнопки навигации в нижней части экрана: первая запись, следующая запись, предыдущая запись, завершающая запись, которые позволяют перемещаться по таблице. Можно также ввести новейшую запись, нажав кнопку «Новая». Алгоритм создания форм в субд. Access следующий:
- Нажать вкладку «Создать» на ленте и кнопку «Мастер форм».
- В раскрывающемся списке «Таблицы / Запросы» выбрать «Члены клуба», и нажать двойной шеврон (>>), чтобы переместить все поля в окно справа.
- В списке параметров макета выбрать Columnar и «Далее».
- Назвать форму и «Готово».
- Отредактировать форму и прикрепить изображение. Можно добавить логотип или другое изображение в форму, нажав вкладку «Главная»> «Вид»> «Дизайн» для формы.
- Открыть «Инструменты дизайна форм»> «Дизайн» и нажать «Вставить изображение» > Обзор.
- Найти изображение, которое будет использоваться в форме, выбрать его, а затем перетащить, чтобы создать окно.
- Чтобы изменить размер изображения, нажать мышью, выбрать «Свойства» и перейти на вкладку «Формат».
- Установить режим размера для увеличения и выравнивания изображения в верхнем левом углу, а затем использовать размерные ручки для определения размера.
- Можно изменить размер некоторых текстовых полей формы, если они слишком большие.
- После окончания выбрать «Главная»> «Вид»> «Форма», чтобы вернуться к использованию и просмотру формы.
Альтернативная форма доступа
Способы создания форм в Access позволяют сделать ввод данных более удобным для пользователей, используя бесплатные альтернативы. Microsoft Access — это сложный инструмент базы данных с трудным процессом обучения. Существуют более интуитивные альтернативы с аналогичными функциями. Прежде чем будет создана форма, пользователю придется импортировать базу данных. Набор информации:
- Начать с избрания «Пустое содержимое базы данных».
- Импортировать данные, используя «Внешние данные» в правом верхнем углу экрана.
- Выбрать XML-файл на вкладке «Внешние данные».
- Перейти в папку, в которую разархивировали файл, и выбрать, где будет предоставлено меню импорта XML.
- Нажать OK для импорта в новую базу данных.
- В левом столбце будут указаны доступные объекты базы данных, и если все работает исправно, пользователь должен увидеть импортированные объекты данных contact_information и member и дважды кликнуть их, чтобы открыть элемент.
Настраиваемые объекты дизайна
Создание базы данных в Access-формах позволяет предоставлять пользовательский доступ и настраивать объекты дизайна. Хорошо разработанная форма может повысить эффективность и точность ввода. На вкладке «Инструменты компоновки форм» содержатся поля настройки формы. Выбор его приведет к экрану с настройками дизайнерских форм и эстетических возможностей. На вкладке «Главная» нужно найти опцию и просмотреть доступные виды форм. Design View предоставляет более подробное представление о структуре формы, чем представление макета. Он также позволяет изменять форму без каких-либо помех.
Большинство задач могут выполнятьсякак в представлении Design View, так и в Layout View, но есть некоторые свойства формы, которые могут быть изменены только в Design. Layout View предоставляет более визуальный макет для редактирования формы. Он имеет близкое сходство с фактической формой.
Большинство модификаций форм могут быть сделаны в представлении макета, но в некоторых случаях Access сообщает, что нужно переключиться на Design View, чтобы внести определенные изменения. Когда активирована функция «Формирование дизайна форм», ленточная панель добавляет три новые позиции вверху под заголовком «Инструменты дизайна форм»:
- Дизайн-изменение цветов и тем. Добавляет в форму кнопки, поля, метки и другие объекты.
- Упорядочить — меняет макет и выравнивает объекты в форме.
- Формат — изменение текста, фоновых изображений и фигур чертежа.
Инструмент быстрой разработки
Мастер Access Form Wizard — это полезный инструмент форм, который открывает возможности проектирования, предоставляя варианты для столбцов, строк, размеров таблиц, языков и тем. Можно использовать мастер создания форм Access, чтобы быстро решить, какой стиль формы подходит для базы данных и предпочтений пользователя. В зависимости от данных есть несколько других форматов, а также элементы управления дизайном, чтобы помочь пользователю в навигации:
- Мастера форм.
- Дополнительные опции.
Использование мастера открывает новые параметры, добавляет новые поля и убирает ненужные. Эта добавленная гибкость обеспечивает высокое качество управления и экономию времени.
Вместо создания форм с нуля можно использовать Мастер форм и настроить его по своему усмотрению. Это экономит время и повышает эффективность, позволяя сразу начать работу.
Удобный интерфейс позволяет создавать нужные поля двойным щелчком.
Формы четырех форматов
Один из этих четырех форматов имеется в каждой конфигурации базы данных Access, с которой столкнется пользователь. В работе нужно применять панель свойств.
Это полезная боковая панель, расположенная на вкладке «Инструменты компоновки форм», содержит множество важной информации о форме и может быть использована для быстрого редактирования, изменения и переключения множества опций с удобной подсказкой в левом нижнем углу экрана.
Виды форматов:
- Единая таблица — одна форма, соответствующая одной таблице базы данных. Она функциональная, базовая и может применяться для выполнения ряда задач.
- Форма одиночной таблицы с полем поиска: использует только одну единственную настройку базы данных, поиск позволяет отображать данные из другой таблицы или базы данных, или создавать обобщенные значения диапазона данных.
- Форма Master / Detail — одна основная форма направляет множество подформ.
- Форма Master / subform — дополнительными полями поиска в главном или подчиненном виде.
Блокировка разделов
Защита доступа к базе данных от других пользователей нужна тогда, когда владелец не хочет, чтобы кто-то вмешивался в тонко настраиваемую внутреннюю работу таблиц и запросов и особенно кодов VBA. Доступ предоставляет ряд способов предотвращения случайного изменения данных пользователями в формах. Один из вариантов — установить свойства управления Enable и Locked для предотвращения ввода данных. Например, при создании подчиненной формы Access, которая будет применяться для внесения изменений в адреса клиентов.
Первое управление — это поле поиска, используемое для нахождения клиентского номера. Когда, например, выбирается номер, имя и адрес клиента автоматически отображаются в соответствующих элементах управления.
Однако если не нужно, чтобы другие пользователи вносили изменения в поле «Имя клиента», можно его заблокировать. Далее следует перейти к списку свойств, которые нужно редактировать. Изменения будут применяться ко всей форме.
Примерно на полпути вниз по списку свойств можно увидеть варианты редактирования.
Порядок наложения запрета:
- Изменить каждое свойство на ПО.
- Перейти к представлению дизайна и в раскрывающемся списке свойств листа выбрать форму.
- Переключить режим «Разрешить макет» на «Нет». Это останавливает доступ всех дополнительных пользователей к виду макета, где они могут непосредственно редактировать форму.
- Теперь сохраняют форму для этого преобразовывают файл из.accdb в.accde, ограничивая любые дальнейшие изменения дизайна или редактирование полей.
- Сохранить текущую базу данных в важном месте.
- Перед конвертированием файла в Access убедиться, что сделана копия (или две) исходного файла базы данных. В случае ее повреждения она будет главной копией.
- Перейти в файл> Сохранить.
Командные кнопки Access
Создание кнопочной формы в Access используется для обеспечения доступа к функциям базы данных, таких как открытие связанных форм, сохранение или печать данных. Они также используюется для запуска одного действия или для нескольких, которые помогают другим функциям получить доступ к базе данных. Например, пользователь может создать кнопку команды в форме, чтобы открыть другую.
Чтобы запустить Command Button, пользователям необходимо написать процедуру или макрос события в свойстве On Click. Шаги для создания главной кнопочной формы Access следующие:
- Выбрать и открыть форму, в которую нужно вставить кнопку Command.
- Закрыть все формы, запущенные в системе, чтобы избежать путаницы.
- Нажать мышью по форме и открыть ее в режиме разработки.
- Выбрать вкладку «Дизайн» в панели «Лента» и нажать значок кнопки.
- Пользователи могут заметить, что их курсор превратился в знак плюса и должны использовать его для рисования или создания структуры кнопки в своей форме.
После того как пользователь решил создать новую кнопку, на экране автоматически появляется Мастер создания кнопочной формы в Access. Обычно кнопка может вызывать предустановленную функцию в форме и запускаться на Macro или через специальный код VBA.
Пользователи закрепляют эти изменения, выбрав «Операция формы» в «Окна»> «Печать текущей формы» из окна действий, затем нажать дальше.
Пользователь может выбрать два варианта: использовать изображение или значок на кнопке Command или использовать текстовое название.
Можно внести изменения с помощью мастера команд, где MS Access также позволяет пользователям просматривать изображения из своей системы.
Чтобы применить изменения в форме, нужно нажать «Готово». Указать имя, используя мастер кнопок команд. После внесения всех необходимых изменений нужно сберечь форму. Проверить форму, чтобы убедиться, что она работает правильно.
MS Access поддерживает особый порядок создание формы. Удобный пользовательский интерфейс проектирования форм позволяет настроить базовую форму, нажав всего лишь на один значок. Встроенные менеджеры программы — отличный способ изменить дизайн форм вручную и настроить форму доступа с нуля.
Источник: https://www.syl.ru/article/386704/sozdanie-form-v-access-dlya-vvoda-dannyih
Готовые шаблоны для MS Access: где скачать?
Если вы только начинаете работу с MS Access или хотите сэкономить время, вы можете использовать бесплатные шаблоны баз данных. Где их скачать, расскажем в этой статье.
Создание баз данных Access по шаблону оптимально для начинающих пользователей — как для наработки навыка, так и при разработке первой собственной базы данных. Шаблоны Access позволяют сэкономить много усилий, потому что в них уже включены запросы, связи, формы, макросы и отчеты в дополнение к соответствующим таблицам. Рассказываем, где их найти.
Оффлайн-шаблоны баз данных для Access
Создание базы данных по шаблону в MS Access
Для начала следует упомянуть, что Microsoft уже заблаговременно позаботилась об удобстве пользователей и включила в Access несколько шаблонов. Поэтому простейший способ достать шаблон для своей будущей БД — использовать встроенный. Процедура, описанная ниже, относится к Access 2010:
- Перейдите на вкладку Создать, а затем выберите Примеры шаблонов.
- В разделе Доступные шаблоны выберите шаблон базы данных, который больше всего соответствует вашим потребностям. Естественно, любой из них потом можно будет настроить в соответствии с вашими пожеланиями.
- Теперь введите имя файла. При необходимости вы можете изменить местоположение хранилища.
- После этого создайте новую базу данных Access, нажав Создать.
MS Access: где скачать дополнительные шаблоны?
Если вы не нашли подходящий шаблон среди предустановленных, то можете попробовать скачать шаблоны для Access из Интернета. К сожалению, количество загрузочных порталов, предоставляющих такие шаблоны, невелико, особенно в Рунете.
Microsoft TemplatesДля тех, кто владеет языками, существует сайт, Microsoft Templates. Он предлагает хорошую коллекцию бесплатных англоязычных шаблонов для любых продуктов Office, включая Access. Сайт содержит качественную подборку баз данных Access, разбитых по категориям — бизнес, нон-профит, для использования в образовании и так далее. Помимо этого, на сайте доступны шаблоны для Word, Excel, PowerPoint и других программ из офисного пакета MS.
- Существует огромная англоязычная коллекция шаблонов для Microsoft Access — Access Templates. Сайт предлагает солидное количество шаблонов баз данных Access для самых различных отраслей, от образования и медицины до бухучета и программирования. Шаблоны сорируются по версиям Access, дате, популярности. Однако, для полноценного скачивания требуется платная регистрация, которая стоит $88 и достаточно неудобна для России, так как работает через PayPal. В шаблонах, скачанных бесплатно, будут заблокированы таблицы (впрочем, разблокировка — вопрос умения).
- На русском языке существует неплохой проект Access Help. Несмотря на коммерческую направленность проекта, его создатели свободно выкладывают примеры созданных ими баз в Интернет, чтобы их мог использовать любой желающий. Для скачивания доступны готовые базы данных Access для самых разных организаций, особенно для бизнеса.
Источник: https://ichip.ru/sovety/besplatnye-shablony-dlya-ms-access-gde-skachat-176672
Выгрузка данных из Access в шаблон Word и Excel |
Всем привет, сегодня мы поговорим о том, как можно выгрузить данные из Access в такие приложения как Word и Excel. Но не о стандартном способе, который есть в Access (связь с Office), а о способе, который позволяет выгружать данные в заданный шаблон как в Word, так и в Excel.
Другими словами, это нужно тогда, когда создать отчет в Access по шаблону, который уже существует, например, в Word, невозможно или слишком трудоемко.
Как Вы знаете, отчет в Access может выводиться просто коряво или, самый распространенный вариант, это когда много текста, который в отчете Access не так хорошо форматируется как в Word, а данных не так много, но отчет необходимо автоматизировать, например это какие-то договора, заявления и так далее.
Использование слияния из самого Word-а не очень удобно, поэтому сегодня я расскажу, как можно заполнять такие шаблоны напрямую из Access, путем нажатия на одну кнопку.
Кроме выгрузки в шаблон Word, иногда возникает и необходимость выгрузки в шаблон Excel, и этот способ мы тоже сегодня рассмотрим.
Экспорт данных из Access в шаблон Word
Вся разработка делится на две части, это:
- Настройка шаблона Word;
- Настройка выгрузки данных в шаблон.
Суть настройки шаблона заключается в том, чтобы проставить необходимые поля в тех местах шаблона, где нужно выводить те или иные данные. Это делается с помощью полей формы.
Примечание! Я использую Microsoft Word 2003.
Открываем шаблон Word, для начала добавим необходимую панель инструментов, для этого нажимаем «Вид -> Панель инструментов» и ставим галочку «Формы». Теперь у Вас отобразилась панель инструментом «Формы». Все, что осталось сделать — это вставить в местах, в которых необходимо выводить данные, элементы «Текстовое поле», которые доступны на только что добавленной панели инструментов.
После добавления поля, у Вас появится серая область, которая свидетельствует о том, что поле добавлено.
Теперь необходимо задать имя этого поля, для того чтобы потом из access вставлять в него значения (стандартное названия не очень удобное).
Для этого щелкните правой кнопкой мыши по полю и нажмите «Свойства». В поле закладка напишите желаемое имя этого поля, я в примере назвал его MyTestPole.
- Создайте столько полей, сколько Вам нужно.
- На этом настройка шаблона закончена, рекомендую сделать этот шаблон только для чтения, а то пользователь возьмет, сформирует документ и сохранит его, и шаблон тем самым потеряется, а если сделать его только для чтения, то у него такой возможности не будет, только сохранять через «Сохранить как».
- Переходим к более интересной задачи, это к реализации самой выгрузки из Access в этот шаблон на VBA.
Примечание! Я использую Access в связке с MS SQL 2008, поэтому и данные буду брать от туда.
Код VBA для выгрузки данных в шаблон Word
Допустим, у Вас есть форма, сделайте на ней кнопку (я назвал ее testbutton) и в событие нажатие кнопки вставьте следующий код VBA:
Private Sub testbutton_Click()
‘Объявляем переменные
Dim FileDialog As FileDialog
Dim rsd As ADODB.Recordset
Dim strSQL As String
Dim WordApOb As Object
Dim WordOb As Object
Dim path As String
Set rsd = New ADODB.Recordset
‘запрос к базе данных для получения необходимых данных
strSQL = «select * from dbo.table where KOD = » & Me.kod & «»
rsd.open strSQL, CurrentProject.Connection
‘Выбираем шаблон
Set FileDialog = Application.FileDialog(msoFileDialogOpen)
‘убираем множественный выбор, он нам не нужен
FileDialog.AllowMultiSelect = False
‘очистим и установим фильтры
FileDialog.Filters.Clear
FileDialog.Filters.add «Word», «*.doc»
‘установим фильтр по умолчанию
FileDialog.FilterIndex = 1
‘проверяем, что сделал user, если выбрал шаблон, то начинаем работу
If FileDialog.Show = False Then
‘Если нет, то выходим
Set dlgFile = Nothing
Exit Sub
End If
‘получаем путь к файлу
path = Trim(FileDialog.SelectedItems(1))
‘Очистим переменную
Set FileDialog = Nothing
If path «» Then
‘Будем отслеживать ошибки
On Error GoTo Err_testbutton_Click
‘Создаем объект Word
Set WordOb = CreateObject(«Word.document»)
‘Задаем нашему документу значение из шаблона
Set WordOb = GetObject(path)
‘Задаем значение объекту word.Application
Set WordApOb = WordOb.Parent
‘делаем приложение word видимым
WordApOb.Visible = True
‘ищем наше поле в шаблоне
WordOb.Bookmarks(«mytestpole»).Select
‘задаем ему новое значение из нашего Recordset
WordApOb.Selection.TypeText Text:=Nz(rsd.Fields(«field»).Value, » «)
‘и так далее по всем полям
‘в конце перейдем на начало нашего документа
WordApOb.Selection.Goto wdGoToFirst
‘и активируем его
WordApOb.Activate
‘Очистим переменные
Set WordOb = Nothing
Set WordApOb = Nothing
Exit_testbutton_Click:
Exit Sub
Err_testbutton_Click:
MsgBox Err.Description
‘в случае ошибки будем делать следующие
‘закроем word без сохранения
WordOb.Close (wddonotsavechanges)
WordApOb.Quit
‘и также очистим переменные
Set WordOb = Nothing
Set WordApOb = Nothing
Resume Exit_testbutton_Click
End If
End Sub
Код прокомментирован, поэтому сложностей возникнуть не должно. Здесь весь смысл сводится к созданию объекта word.document и word.application. А после мы уже работаем с нашими объектами, т.е. заполняем их.
Экспорт данных из Access в шаблон Excel
В шаблоне Excel уже не нужно создавать поля как в Word, так как здесь мы уже будем ориентироваться по адресам ячеек.
Существует несколько способов, как заполнять Excel шаблон, я опишу два, первый — это тогда, когда Вам просто необходимо проставить несколько полей, т.е. в источнике данных будет всего одна строка с несколькими столбцами. Второй — это когда строк будет уже несколько, причем Вы не знаете, сколько именно (в зависимости от каких то условий).
В шаблоне по умолчанию отведено для этого все пару строк, поэтому мы будем нужные нам строки добавлять, для того чтобы наши данные не накладывалась на строки ниже (допустим там примечание, подпись руководителя и т.д.). И совет, я здесь, для примера, использую всего один источник данных, а Вы, если Вам необходимо заполнить шапку, примечание и некое количество строк (т.е.
область данных), можете использовать несколько источников (Recordset).
Код VBA для выгрузки данных в шаблон Excel
Сначала добавьте кнопку на форму (я ее назвал testexcel) и вставьте следующий код в событие «Нажатие кнопки».
Private Sub testexcel_Click()
‘Объявляем переменные
Dim XL As Object
Dim XLT As Object
Dim newrow As Object
Dim rsd As ADODB.Recordset
Dim strSQL As String
Set rsd = New ADODB.Recordset
‘Запрос к базе данных
strSQL = «select * from dbo.table where kod = » & Me.kod & «»
rsd.open strSQL, CurrentProject.Connection
‘Создаем необходимые объекты
Set XL = CreateObject(«Excel.Application»)
‘для примера показываю, как можно сразу загружать шаблон без выбора
Set XLT = XL.Workbooks.open(«C: estfile.xls»)
‘1 способ — если в источнике данных всего одна строка
With XLT.Worksheets(«Лист1»)
.[a1] = rsd.Fields(«field1»)
.[b1] = rsd.Fields(«field2»)
.[c1] = rsd.Fields(«field3»)
.[d1] = rsd.Fields(«field4»)
End With
2 способ — если строк в источнике несколько’причем мы учтем то, что у нас есть шапка и примечание в Excel’и мы не знаем, сколько строк у нас вставится’и поэтому строки будем добавлять в случае необходимости’зададим, с какой строки будем начинать вставлять данные
Rowss = 10
‘для нумерации
numrow = 1’запускаем цикл, он будет работать до тех пор, пока не закончатся строки в нашем источнике
While Not (rsd.EOF)’смотрим, если строк больше чем мы задали в шаблоне
If Rowss >= 12 Then
‘то добавляем строку
XLT.Worksheets(«Лист1»).Rows(Rowss).Insert’Запомним нашу строку
Set newrow = XLT.Worksheets(«Лист1»).Rows(Rowss)’и вставим туда копию предыдущей строки’для того если вдруг у вас там есть объединенные ячейки или какие-то нужные данные
‘так как новая строка создастся без всяких объединений и значений
XLT.Worksheets(«Лист1»).Rows(Rowss — 1).Copy newrow
‘это просто для примера как можно очистить некий диапазон внутри документа
‘XLT.Worksheets(«Лист1»).Range(«A10:F10»).ClearContents
‘динамически формируем адрес нужной ячейки
cell = «a» & Rowss
‘и задаем ей значение
XLT.Worksheets(«Лист1»).Range(cell) = numrow
cell = «b» & Rowss
XLT.Worksheets(«Лист1»).Range(cell) = rsd.Fields(«field5»).Value
‘переходим на следующую строку
Rowss = Rowss + 1
‘переходим на следующую строку в источнике данных
rsd.MoveNext
Else
‘а это выполняется до тех пор, пока не закончатся заданные строки в шаблоне
‘т.е. если строк в источнике всего 1, то в код, который выше мы даже не попадем
cell = «a» & Rowss
XLT.Worksheets(«Лист1»).Range(cell) = numrow
cell = «b» & Rowss
XLT.Worksheets(«Лист1»).Range(cell) = rsd.Fields(«field5»).Value
Rowss = Rowss + 1
rsd.MoveNext
End If
‘для нумерации
numrow = numrow + 1
‘конец цикла
Wend
‘это просто пример как можно удалить строку целиком
‘XLT.Worksheets(«Лист1»).Rows(20).Delete
‘делаем Excel видимым
XL.Visible = True
‘Очищаем переменные
Set XL = Nothing
Set XLT = Nothing
Set newrow = Nothing
End Sub
Здесь я также все подробно прокомментировал, но если есть вопросы, то задавайте их в х к данной статье.
Для сведения, я здесь при создании объекта и Word.Application и Excel.Application использовал позднее связывание, для того чтобы не добавлять необходимые библиотеки и обеспечить совместимость.
Источник: https://info-comp.ru/obucheniest/299—access-export-v-word-excel.html
Ведение договоров
Где можно найти программу для ведения договоров, чтобы можно было их регистрировать, отслеживать сроки оплаты и исполнения по ним? Добавлено через 1 минуту
Уточняю — программа нужна для юридического отдела собьемом примерно 200 договоров в год, нужно. чтобы высвечивались просроченные договора или по которым сроки действия скоро заканчиваются
Ведите базу договоров в Microsoft Access: Microsoft Access — реляционная СУБД корпорации Microsoft. Имеет широкий спектр функций, включая связанные запросы, сортировку по разным полям, связь с внешними таблицами и базами данных. Благодаря встроенному языку VBA, в самом Access можно писать приложения, работающие с базами данных.
Ведение договоров [Только зарегистрированные пользователи могут видеть ссылки] Программа предназначена для учета договоров в организациях. Четыре интерфейса: Администратор, Пользователь, Только ввод и Только просмотр . Возможность задания пользователю режима доступа только к своим договорам (может быть несколько ответственных).
Журнал договоров, поиски по журналу. Преддоговорная работа. Возможность настройки правила формирования номера договора (в том числе для каждого филиала). Оповещение по незакрытым договорам, по которым скоро истекает срок действия. Печать журнала договоров, вывод в Office, возможность настройки отчета в MS Excel (OO Calc). Карточка договора.
Возможность вставки «оригинала» договора в любом формате, поддержка сканера. Учет этапов договора и субподрядных договоров. Согласование договора, оповещение о задержке согласования. Счета-фактуры, счета, накладные, акты сдачи-приемки, дополнительные соглашения, протоколы разногласий к договору. Поэтапная оплата по договору.
Оповещение по поэтапной оплате. Возможность настройки оповещений для каждого пользователя. Спецификации к договору, векселя к договору с формированием документов в MS Word (OO Writer). Выборки по разным критериям с расчетом итоговых сумм. Экспорт карточки и журнала в MS Word (OO Writer).
Формирование договора в MS Word (OO Writer) по шаблону (на базе шаблонов *.dot ). Ведение учета и аналитика по трем видам валют (рубль, евро, доллар). Возможность ведения договоров любого количества фирм, в каждой из которых несколько филиалов.
Экспорт в MS Excel (OO Calc) выбранных полей результата поиска по журналам договоров и контрагентов.
Респект: Учет договоров – универсальный программный продукт для организации системы договорной работы на предприятии. Программа автоматизирует учет реестра договоров, и позволяет интегрировать ведение договоров в планово-финансовый контур предприятия. Только зарегистрированные пользователи могут видеть ссылки] Основные возможности программы: Подготовка и согласование договоров Формирование бланков документов Ведение журнала (реестра) договоров предприятия Планирование и контроль исполнения договоров Формирование универсальных отчетов Интеграция в 1С:Бухгалтерию 8 Интеграция в 1С:Управление торговлей 8 Хранение договоров Программа предназначена для: Руководителей предприятия Финансовой службы и бухгалтерии Производства Договорного отдела Юридической службы Отдела продаж и снабжения Службе IT деморолик работа с реестром договоров ([Только зарегистрированные пользователи могут видеть ссылки]) деморолик карточка договора ([Только зарегистрированные пользователи могут видеть ссылки])
Источник: http://nowa.cc/archive/index.php/t-192700.html
Выгрузка данных из Access в шаблон Word
Всем привет, сегодня поговорим о выгрузки данных из Access в такие приложения как Word и Excel. Но не о стандартном способе, который есть в Access (связь с Office), а о способе, который позволяет выгружать данные в заданный шаблон как в Word, так и в Excel.
Другими словами это нужно тогда когда создать отчеты в Access по шаблону, который уже существует, например, в Word, невозможно или слишком трудоемко или как Вы знаете, может получаться просто коряво или самый распространенный вариант это когда много текста, который в отчете Access не так хорошо форматируется как в Word, а данных не так много, но необходимо автоматизировать, например это какие-то договора, заявления и так далее. Использование слияния из самого Word-а не очень удобно, поэтому я расскажу сегодня, как можно заполнять такие шаблоны напрямую из Access, путем нажатия на одну кнопку. Также как и необходимость выгрузки в шаблон Word, существует и необходимость выгрузки в шаблон Excel, и этот способ мы тоже сегодня рассмотрим.
- Начнем с Word.
- Вся разработка делится на две части это:
- • Настройка шаблона Word;
- • Настройка выгрузки данных в шаблон.
Суть настройки шаблона заключается в том, что необходимо проставить необходимые поля в тех местах шаблона, где нужно выводить то или иное поле. Это делается с помощью полей формы.
Открываем шаблон Word, для начала добавим необходимую панель инструментов, для этого нажимаем вид->панель инструментов и ставим галочку «формы». Теперь у вас отобразилась панель инструментом «Формы» все, что осталось сделать это встать на то место где необходимо добавить нужное поле и на панели выбрать «Текстовое поле».
После в том месте у Вас появится серая область, которая свидетельствует о том, что поле добавлено. Теперь необходимо задать имя этого поля, для того чтобы потом из access вставлять в него значения (стандартное названия не очень удобное). Для этого щелкните правой кнопкой мы по полю и нажмите «Свойства».
В поле закладка напишите желаемое имя этого поля, я в примере назвал его MyTestPole
- Создайте столько полей, сколько Вам нужно.
- Ну и настройка шаблона закончена, только единственное сделайте этот шаблон только для чтения, а то пользователь возьмет, сформирует документ и сохранит его, и шаблон тем самым потеряется, а если сделать только для чтения, то у него такой возможности не будет только сохранять через «Сохранить как».
- Переходим к более интересной задачи это к реализации самой выгрузки из Access в этот шаблон.
Примечание! Я использую Access в связке с MS Sql 2008 поэтому и данные буду брать от туда.
- Допустим у Вас есть форма, сделайте на ней кнопку (я назвал ее testbutton) и в событие нажатие кнопки вставьте следующий код:
- Private Sub testbutton_Click()
- ‘Объявляем переменные
- Dim FileDialog As FileDialog
- Dim rsd As ADODB.Recordset
- Dim strSQL As String
- Dim WordApOb As Object
- Dim WordOb As Object
- Dim path As String
- Set rsd = New ADODB.Recordset
- ‘запрос к базе данных для получения необходимых данных
strSQL = «select * from dbo.table where KOD = » & Me.kod & «»
rsd.open strSQL, CurrentProject.Connection
- ‘Выбираем шаблон
- Set FileDialog = Application.FileDialog(msoFileDialogOpen)
- ‘убираем множественный выбор, он нам не нужен
- FileDialog.AllowMultiSelect = False
- ‘очистим и установим фильтры
FileDialog.Filters.Clear
FileDialog.Filters.add «Word», «*.doc»
- ‘установим фильтр по умолчанию
- FileDialog.FilterIndex = 1
- ‘проверяем, что сделал user если выбрал шаблон, то начинаем работу
- If FileDialog.Show = False Then
- ‘Если нет то выходим
- Set dlgFile = Nothing
- Exit Sub
- End If
- ‘получаем путь к файлу
- path = Trim(FileDialog.SelectedItems(1))
- ‘Очистим переменную
- Set FileDialog = Nothing
- If path «» Then
- ‘Будем отслеживать ошибки
- On Error GoTo Err_testbutton_Click
- ‘Создаем объект Word
- Set WordOb = CreateObject(«Word.document»)
- ‘Задаем нашему документу значение из шаблона
- Set WordOb = GetObject(path)
- ‘Задаем значение объекту word.Application
- Set WordApOb = WordOb.Parent
- ‘делаем приложение word видимым
- WordApOb.Visible = True
- ‘ищем наше поле в шаблоне
WordOb.Bookmarks(«mytestpole»).Select’задаем ему новое значение из нашего Recordset
WordApOb.Selection.TypeText Text:=Nz(rsd.Fields(«field»).Value, » «)’и так далее по всем полям’в конце перейдем на начало нашего документа
WordApOb.Selection.Goto wdGoToFirst ‘и активируем его WordApOb.Activate ‘Очистим переменные
- Set WordOb = Nothing
- Set WordApOb = Nothing
- Exit_testbutton_Click:
- Exit Sub
- Err_testbutton_Click:
- MsgBox Err.Description
- ‘в случае ошибки будем делать следующие
- ‘закроем word без сохранения
- WordOb.Close (wddonotsavechanges)
- WordApOb.Quit
- ‘и также очистим переменные
- Set WordOb = Nothing
- Set WordApOb = Nothing
- Resume Exit_testbutton_Click
- End If
- End Sub
Код прокомментирован, поэтому сложностей возникнуть не должно. Здесь весь смысл сводится к созданию объекта word.document и word.application, конечно же. А после мы уже работаем с нашими объектами, т.е. заполняем их.
Теперь перейдем к Excel.
В шаблоне Excel уже ненужно создавать поля как в Word, так как здесь мы уже будем ориентироваться по адресам ячеек.
Существует несколько способов, как заполнять Excel шаблон, я опишу два, первый это тогда когда Вам просто необходимо проставить несколько полей, т.е.
в источнике данных будет всего одна строка с несколькими полями и второй это когда строк будет уже несколько, причем Вы не знаете, сколько именно (в зависимости от каких то условий), но в шаблоне по умолчанию отведено для этого все пару строк, поэтому мы будем нужные нам строки добавлять, для того чтобы наши данные не накладывалась на строки ниже (допустим там примечание, подпись руководителя и т.д.). И совет, я здесь для примера использую всего один источник данных, а вы, если Вам необходимо заполнить шапку, примечание и некое количество строк (т.е. область данных) то для этих задач используйте несколько источников (Recordset).
Источник: https://webhamster.ru/mytetrashare/index/mtb172/1484021382ad7j4krlfd