Как создать шаблон word для access

0 / 0 / 0

Регистрация: 18.11.2011

Сообщений: 41

1

18.11.2011, 09:41. Показов 39749. Ответов 74


Студворк — интернет-сервис помощи студентам

Пожалуйста, помоги довести базу до ума.
Мне необходимо сделать :
1. Выгрузку данных из формы ПУТЕВКА в шаблон word-кого файла ТУРИСТСКАЯ ПУТЕВКА:
Надо чтобы поля формы выгружались в соответствующие места документа word. При чем выгружалась путем нажатия кнопки на форме.
2. В подчиненной форме формы ТУРИСТЫ необходимо сделать следующее: при двойном нажатии на код путевки открывалась путевка с указанным кодом.



0



Эксперт MS Access

7267 / 4469 / 288

Регистрация: 12.08.2011

Сообщений: 13,512

18.11.2011, 09:55

2

Цитата
Сообщение от Nikololia
Посмотреть сообщение

Пожалуйста, помоги

Кто-то конкретно должен помочь? Вы к кому обращаетесь?
1.Глазки поднимаем и видим:
Путеводитель по форуму
там про Word и не только.

2.Я не буду против того, чтобы увидеть ваш mdb.



0



Модератор

Эксперт MS Access

11342 / 4661 / 748

Регистрация: 07.08.2010

Сообщений: 13,505

Записей в блоге: 4

18.11.2011, 10:26

3

а где шаблон

и

форма ПУТЕВКИ1, которую вы вызываете

по идее вроде должно бы быть
-ленточная

Путевки для навигации и поиска путевок
-при клике на строке —открытие текущей или новой путевки в столбиковой форме и подчиненной для подбора туристов
-в клике на подчиненной -выход на сведения о туристе

соответственно 3 таблицы(не считая справочников)
1-перечень путевок
2—список туристов для некой путевки
3-личные данные туриста(фото,паспорт…..)

перечень путешествий туриста —это уже расчетная величина



0



0 / 0 / 0

Регистрация: 18.11.2011

Сообщений: 41

18.11.2011, 14:23

 [ТС]

4

Спасибо за оперативные ответы. Прошу прощения за не верно составленный текст просьбы.
вот что на данном этапе у меня получилось. но я не знаю как правильно составить программу кнопки для выгрузки в word (в форме ПУТЕВКА). (т.к. не сильна в программировании).
прикрепляю БД и шаблон
Заранее благодарю за помощь откликнувшимся



0



Ameli

2091 / 1167 / 39

Регистрация: 05.11.2009

Сообщений: 1,605

18.11.2011, 16:17

5

Лучший ответ Сообщение было отмечено как решение

Решение

У меня, как и многих других форумчан 2003 офис, и нет возможности открыть accdb, поэтому alvk и просил вас выложить mdb формат. Также просьба перед выкладыванием сжимать бд.
Но могу предложить вам код, который использую я. С помощью него заполняется вордовский документ на основе шаблона, в котором сделаны закладки в нужных местах.

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
Dim app As Word.Application
Dim strPathDot As String, strPathWord As String
 
strPathDot = "ПутьНазвание шаблона.dot"
strPathWord = "ПутьНазвание документа.doc"
 
'Если есть документ с таким же названием и местом расоложения, выдается сообщение о замене
If Dir(strPathWord) <> "" Then
DlgUser = MsgBox("Документ с таким именем ранее уже был создан. Заменить его?", vbYesNo, "admin")
 
'Если нет, открывается старый документ
If DlgUser = vbNo Then
Set app = CreateObject("Word.Application")
With app
.Visible = True
.Documents.Open strPathWord
End With
Set app = Nothing
Else
GoTo nn
End If
Else
 
'Если такого документа нет или, если человек выбрал "да", то создается новый документ взамен старого на основе шаблона
nn:
Set app = New Word.Application
app.Visible = True
app.Documents.Add strPathDot
With app.ActiveDocument
 
'Вставка данных
.FormFields("Название закладки").Result = Forms![Название формы]![Название поля]
 
'и т.д. по всем закладкам
 
.SaveAs strPathWord
.Protect wdAllowOnlyFormFields, True, ""
End With
Set app = Nothing
End If
funOutputWord = True
Exit_:



8



Ameli

2091 / 1167 / 39

Регистрация: 05.11.2009

Сообщений: 1,605

18.11.2011, 17:14

6

Набросала примерчик.
Уточняю, что в редакторе VBA на панели Tools — References надо включить Microsoft Word Object Library.
В шаблоне ворда должны быть созданы текстовые поля с закладками.
Строчка

Visual Basic
1
.Protect wdAllowOnlyFormFields, True, ""

включает защиту формы (все, кроме полей формы). Поэтому смотрите сами, нужна ли она вам

Вложения

Тип файла: rar Новая папка.rar (22.1 Кб, 452 просмотров)



1



0 / 0 / 0

Регистрация: 18.11.2011

Сообщений: 41

18.11.2011, 18:21

 [ТС]

7

Большое спасибо за ответ.
Я сделала как вы сказали, но у меня выходит ошибка Word «Не верно указана единица измерения»
В чем причина?
Кроме того, шаблон все равно не заполняется
Прикрепляю БД с корректировкой

P.s. в формате mdb сохранить не получается (из-за не совместимости)

Вложения

Тип файла: rar БД.rar (3.00 Мб, 164 просмотров)



0



Ameli

2091 / 1167 / 39

Регистрация: 05.11.2009

Сообщений: 1,605

19.11.2011, 13:03

8

В 2007 офисе не нашла, как создавать элементы управления, тем более в вашем случае их использование не обязательно. Поэтому для вставки данных можно воспользоваться обычными закладками ворда:

Visual Basic
1
.Bookmarks("КодПутевки").Range.Text = Forms![ПУТЕВКА]![Код путевки]

У вас закладки были перепутаны, не все добавлены, я их исправила;
Слишком сложное обращение к полю на форме, вот правильное:
Forms![ПУТЕВКА]![Код путевки]
На форме не совпадали названия полей с теми, к которым вы обращались в коде;
К некторым полям со списком надо обращаться к кокретному столбцу:
Forms![ПУТЕВКА]!Страна.Column(1)
В программном коде исправила обращение к шаблону и файлу ворда — путь к текущей базе данных + название шаблона. К названию файла добавила текущий номер путевки (код путевки);
В шаблоне добавила закладки Турист1…Турист5 (один под другим), Покупатель = Туристу1 (если я правильно поняла). В коде добавила цикл по списку туристов, входящих в данную путевку:

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
Dim MyTable As DAO.Recordset
Set MyTable = CurrentDb.OpenRecordset("SELECT Направления.[Код направления], Направления.Направления_Код, [Туристы]![Фамилия] & ' ' & [Туристы]![Имя] & ' ' & [Туристы]![Отчество] AS ФИОтуриста FROM Туристы INNER JOIN Направления ON Туристы.[Код туриста] = Направления.Туристы_Код WHERE (((Направления.Направления_Код)=" & [Forms]![ПУТЕВКА]![Код путевки] & "))")
i = 1
Do While Not MyTable.EOF
        Турист = "Турист" & i
        If i = 1 Then .Bookmarks("Покупатель").Range.Text = CStr(MyTable.Fields("ФИОтуриста"))
        
        .Bookmarks(Турист).Range.Text = CStr(MyTable.Fields("ФИОтуриста"))
        i = i + 1
        MyTable.MoveNext
Loop
MyTable.Close

Вложения

Тип файла: rar БД.rar (120.7 Кб, 609 просмотров)



1



0 / 0 / 0

Регистрация: 18.11.2011

Сообщений: 41

20.11.2011, 21:22

 [ТС]

9

Здорово, спасибо!!!
Пробую это вариант. И делаю дальше.



0



0 / 0 / 0

Регистрация: 18.11.2011

Сообщений: 41

21.11.2011, 11:21

 [ТС]

10

Добрый день!!!
подскажите, пожалуйста,
1) как избавиться правильно от ошибки при незаполненном поле (т.е. если, например, поле стоимость не заполнено, то в шаблон ничего не выгружалось (ну или пробел)
2) можно ли сделать так, чтобы после нажатия кнопки » выгрузка в word», данный документ открывался сразу (необходимо для дальнейшего редактирования).
Заранее благодарю за ответ.

Вложения

Тип файла: rar БД.rar (139.3 Кб, 186 просмотров)



0



shanemac51

Модератор

Эксперт MS Access

11342 / 4661 / 748

Регистрация: 07.08.2010

Сообщений: 13,505

Записей в блоге: 4

22.11.2011, 13:51

11

Цитата
Сообщение от Nikololia
Посмотреть сообщение

1) как избавиться правильно от ошибки при незаполненном поле (т.е. если, например, поле стоимость не заполнено, то в шаблон ничего не выгружалось (ну или пробел)

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
Private Sub Кнопка54_Click()
Dim app As Word.Application
Dim strPathDot As String, strPathWord As String
 
strPathDot = CurrentProject.Path & "Туристская путевка.dotx"
strPathWord = CurrentProject.Path & "Туристская путевка " & Forms![ПУТЕВКА]![Код путевки] & ".doc"
 
'Если есть документ с таким же названием и местом расоложения, выдается сообщение о замене
If Dir(strPathWord) <> "" Then
DlgUser = MsgBox("Документ с таким именем ранее уже был создан. Заменить его?", vbYesNo, "admin")
 
'Если нет, открывается старый документ
If DlgUser = vbNo Then
Set app = CreateObject("Word.Application")
With app
.Visible = True
.Documents.Open strPathWord
End With
Set app = Nothing
Else
GoTo nn
End If
Else
 
'Если такого документа нет или, если человек выбрал "да", то создается новый документ взамен старого на основе шаблона
nn:
Set app = New Word.Application
app.Visible = True
app.Documents.Add strPathDot
With app.ActiveDocument
 
'Вставка данных
    .Bookmarks("КодПутевки").Range.Text = "" & Forms![ПУТЕВКА]![Код путевки]
    .Bookmarks("Страна").Range.Text = "" & Forms![ПУТЕВКА]!Страна.Column(1)
    .Bookmarks("Отель").Range.Text = "" & Forms![ПУТЕВКА]!Отель.Column(1)
    .Bookmarks("Туроператор").Range.Text = "" & Forms![ПУТЕВКА]![Туроператор].Column(1)
    .Bookmarks("Маршрут").Range.Text = "" & Forms![ПУТЕВКА]!Маршрут.Column(1)
    .Bookmarks("Катег_проездн_билета").Range.Text = "" & Forms![ПУТЕВКА]!Катег_проездн_билета.Column(1)
    .Bookmarks("Рейс").Range.Text = "" & Forms![ПУТЕВКА]!Рейс
    .Bookmarks("Тип_номера").Range.Text = "" & Forms![ПУТЕВКА]!Тип_номера.Column(1)
    .Bookmarks("Питание").Range.Text = "" & Forms![ПУТЕВКА]!Питание.Column(1)
    .Bookmarks("Виза").Range.Text = "" & Forms![ПУТЕВКА]!Виза
    .Bookmarks("Страховка").Range.Text = "" & Forms![ПУТЕВКА]!Страховка
    .Bookmarks("Трансфер").Range.Text = "" & Forms![ПУТЕВКА]!Трансфер
    .Bookmarks("Экскурсии").Range.Text = "" & Forms![ПУТЕВКА]!Экскурсии
    .Bookmarks("Начало_маршрута").Range.Text = "" & Forms![ПУТЕВКА]!Начало_маршрута
    .Bookmarks("Окончание_маршрута").Range.Text = "" & Forms![ПУТЕВКА]!Окончание_маршрута
    .Bookmarks("Стоимость").Range.Text = "" & Forms![ПУТЕВКА]!Стоимость
Err.Clear ' Очищаем поток от ошибки при отсутствии элемента
Dim MyTable As DAO.Recordset
Set MyTable = CurrentDb.OpenRecordset("SELECT Направления.[Код направления], Направления.Направления_Код, [Туристы]![Фамилия] & ' ' & [Туристы]![Имя] & ' ' & [Туристы]![Отчество] AS ФИОтуриста FROM Туристы INNER JOIN Направления ON Туристы.[Код туриста] = Направления.Туристы_Код WHERE (((Направления.Направления_Код)=" & [Forms]![ПУТЕВКА]![Код путевки] & "))")
 
i = 1
Do While Not MyTable.EOF
        Турист = "Турист" & i
        If i = 1 Then .Bookmarks("Покупатель").Range.Text = CStr(MyTable.Fields("ФИОтуриста"))
        
        .Bookmarks(Турист).Range.Text = CStr(MyTable.Fields("ФИОтуриста"))
        i = i + 1
        MyTable.MoveNext
Loop
 
MyTable.Close
 
.SaveAs strPathWord
On Error GoTo 999 ' Включаем обработку ошибки
End With
Set app = Nothing
End If
funOutputWord = True
Exit Sub
''Exit_:
999:
    MsgBox Err.Description  'Ошибка
    Err.Clear
    app.Quit
End Sub
 
'''' и не забывайте закрывать WORD



1



2091 / 1167 / 39

Регистрация: 05.11.2009

Сообщений: 1,605

22.11.2011, 16:51

12

Или с помощью ф-ии Nz(), которая возвращает пустую строку «» или другое указанное значение, если переменная в скобках = Null. Добавим ее перед каждым обращением к полю формы для вставки в шаблон ворда

Вложения

Тип файла: rar БД.rar (146.8 Кб, 210 просмотров)



1



0 / 0 / 0

Регистрация: 18.11.2011

Сообщений: 41

23.11.2011, 14:23

 [ТС]

13

2.

Цитата
Сообщение от Nikololia
Посмотреть сообщение

2. В подчиненной форме формы ТУРИСТЫ необходимо сделать следующее: при двойном нажатии на код путевки открывалась путевка с указанным кодом.

Сделала сама. ))))



0



0 / 0 / 0

Регистрация: 18.11.2011

Сообщений: 41

23.11.2011, 15:10

 [ТС]

14

теперь у меня возникли следующие вопросы:
1) когда нажимаю на кнопку » выгрузка в шаблон word» в форме ПУТЕВКА возникают ошибки
пожалуйста, подскажите как от них избавиться?
2) а можно как-то сделать чтобы при нажатии на указанную выше кнопку сразу открывался для дальнейшего редактирования созданный вновь документ? (а то совсем не удобно выполнять следующие действия: нажать на кнопку; пропустить ошибки; потом зайти в папку, где лежит шаблон; открыть шаблон; затем может зависнуть word; закрыть шаблон и только потом можно работать с новым документом)



0



0 / 0 / 0

Регистрация: 18.11.2011

Сообщений: 41

23.11.2011, 15:46

 [ТС]

15

приложила в формате 2003



0



0 / 0 / 0

Регистрация: 18.11.2011

Сообщений: 41

23.11.2011, 20:17

 [ТС]

16

с горем на пополам я изменила версии access и word.
помогите избавиться от ошибок и сделать возможным открывать новый выгруженный документ сразу после нажатия кнопки в форме ПУТЕВКА
Заранее благодарю за помощь (ответ)



0



Эксперт MS Access

7267 / 4469 / 288

Регистрация: 12.08.2011

Сообщений: 13,512

24.11.2011, 07:51

17

Лучший ответ Сообщение было отмечено как решение

Решение

Посмотрите как сделано здесь и продублируйте:
Кнопка для экспорта



1



2091 / 1167 / 39

Регистрация: 05.11.2009

Сообщений: 1,605

24.11.2011, 08:58

18

Базу данных с ошибкой вы так и не приложили ни в каком формате — ни в 2003, ни в 2007. Мой приложенный пример у меня работает без проблем — ошибки не выскакивают, открывать документ не нужно, он открывается сам, правда свернутый.
У вас мой приложенный пример (пост № 12) открывается также? или выскакивают ошибки?
Приложите базу с ошибкой хоть в каком-нибудь формате



0



0 / 0 / 0

Регистрация: 18.11.2011

Сообщений: 41

24.11.2011, 09:49

 [ТС]

19

прикрепила
ошибки все равно есть



0



0 / 0 / 0

Регистрация: 18.11.2011

Сообщений: 41

24.11.2011, 11:16

 [ТС]

20

прикрепила в той версии, над которой я сейчас тружусь

Вложения

Тип файла: rar БД.rar (259.2 Кб, 263 просмотров)



0



Всем привет, сегодня мы поговорим о том, как можно выгрузить данные из Access в такие приложения как Word и Excel. Но не о стандартном способе, который есть в  Access (связь с Office), а о способе, который позволяет выгружать данные в заданный шаблон как в Word, так и в Excel.

Другими словами, это нужно тогда, когда создать отчет в Access по шаблону, который уже существует, например, в Word, невозможно или слишком трудоемко. Как Вы знаете, отчет в Access может выводиться просто коряво или, самый распространенный вариант, это когда много текста, который в отчете Access не так хорошо форматируется как в Word, а данных не так много, но отчет необходимо автоматизировать, например это какие-то договора, заявления и так далее.

Использование слияния из самого Word-а не очень удобно, поэтому сегодня я расскажу, как можно заполнять такие шаблоны напрямую из Access, путем нажатия на одну кнопку.

Кроме выгрузки в шаблон Word, иногда возникает и необходимость выгрузки в шаблон Excel, и этот способ мы тоже сегодня рассмотрим.

Содержание

  1. Экспорт данных из Access в шаблон Word
  2. Код VBA для выгрузки данных в шаблон Word
  3. Экспорт данных из Access в шаблон Excel
  4. Код VBA для выгрузки данных в шаблон Excel

Вся разработка делится на две части, это:

  • Настройка шаблона Word;
  • Настройка выгрузки данных в шаблон.

Суть настройки шаблона заключается в том, чтобы проставить необходимые поля в тех местах шаблона, где нужно выводить те или иные данные. Это делается с помощью полей формы.

Примечание! Я использую Microsoft Word 2003.

Открываем шаблон Word, для начала добавим необходимую панель инструментов, для этого нажимаем «Вид -> Панель инструментов» и ставим галочку «Формы». Теперь у Вас отобразилась панель инструментом «Формы». Все, что осталось сделать — это вставить в местах, в которых необходимо выводить данные, элементы «Текстовое поле», которые доступны на только что добавленной панели инструментов.

После добавления поля, у Вас появится серая область, которая свидетельствует о том, что поле добавлено. Теперь необходимо задать имя этого поля, для того чтобы потом из access вставлять в него значения (стандартное названия не очень удобное). Для этого щелкните правой кнопкой мыши по полю и нажмите «Свойства». В поле закладка напишите желаемое имя этого поля, я в примере назвал его MyTestPole.

Скриншот 1

Курс по SQL для начинающих

Создайте столько полей, сколько Вам нужно.

На этом настройка шаблона закончена, рекомендую сделать этот шаблон только для чтения, а то пользователь возьмет, сформирует документ и сохранит его, и шаблон тем самым потеряется, а если сделать его только для чтения, то у него такой возможности не будет, только сохранять через «Сохранить как».

Переходим к более интересной задачи, это к реализации самой выгрузки из 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:testfile.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 использовал позднее связывание, для того чтобы не добавлять необходимые библиотеки и обеспечить совместимость.

Надеюсь, мои примеры Вам помогут!

Если вы часто создаете документ определенного типа, например ежемесячный отчет, прогноз продаж или презентацию с логотипом компании, сохраните его в качестве шаблона, чтобы использовать его в качестве отправной точки вместо повторного создания файла с нуля каждый раз, когда он вам нужен. Начните с уже созданного документа, скачавшего документа или нового шаблона Майкрософт , который вы настроили. 

Сохранение шаблона

  1. Чтобы сохранить файл как шаблон, щелкните вкладку Файл и выберите команду Сохранить как.

  2. Дважды щелкните пункт Компьютер (в приложениях Office 2016 — Этот компьютер).

    Окно "Сохранение документа" с отображением списка расположений, в которых можно сохранить документ

  3. Введите имя шаблона в поле Имя файла.

  4. Чтобы создать базовый шаблон, выберите соответствующий пункт в списке Тип файла. Например, в Word следует выбрать Шаблон Word.

    Сохранение документа в виде шаблона

    Если ваш документ содержит макросы, щелкните Шаблон Word с поддержкой макросов.

    При этом Office автоматически перейдет в папку «Настраиваемые шаблоны Office».

  5. Нажмите кнопку Сохранить.

Совет: Чтобы изменить расположение для автоматического сохранения шаблонов, на вкладке Файл выберите пункт Параметры, щелкните категорию Сохранение и укажите путь к нужной папке в поле Расположение личных шаблонов по умолчанию. Все новые шаблоны будут сохраняться в указанном расположении, а если на вкладке Файл выбрать команду Создать и перейти в категорию Личные, будут показаны шаблоны из этой папки.

Редактирование шаблона

Чтобы обновить свой шаблон, откройте файл, внесите необходимые изменения и сохраните шаблон.

  1. Щелкните Файл > Открыть.

  2. Дважды щелкните пункт Компьютер (или Этот компьютер).

  3. Перейдите в папку Пользовательские шаблоны Office, которая находится в папке Документы.

  4. Щелкните шаблон и нажмите кнопку Открыть.

  5. Внесите необходимые изменения, а затем сохраните и закройте шаблон.

Создание нового документа с помощью шаблона

Чтобы запустить новый файл на основе шаблона, щелкните Файл > Создать > Пользовательский и щелкните шаблон.

Ссылка на личные шаблоны

Примечание: Если вы используете Office 2013, на этой кнопке может быть указано личное , а не настраиваемое.

Использование шаблонов из предыдущих версий Office

Если вы создали шаблоны в более ранней версии Office, то можете использовать их в Office 2013 или 2016. Для этого сначала переместите соответствующие файлы в папку «Настраиваемые шаблоны Office», чтобы они стали доступны в приложении. Для быстрого перемещения шаблонов используйте инструмент Fix it.

Word

  1. Откройте документ Word, который требуется сохранить в виде шаблона.

  2. В меню Файл выберите команду Сохранить как шаблон.

  3. В поле Сохранить как введите имя нового шаблона.

  4. (Необязательно) В поле Где выберите расположение, в котором будет сохранен шаблон.

  5. Рядом с полем Формат файла щелкните Шаблон Microsoft Word (.dotx) или, если документ содержит макросы, щелкните Microsoft Word Macro-Enabled шаблон (DOTM).

  6. Нажмите кнопку Сохранить.

    Если вы не выберете другое расположение, шаблон сохраняется в папке /Users/username/Library/Group Containers/UBF8T346G9. Office/User Content/Templates.

    Чтобы изменить, где Word автоматически сохраняет шаблоны, в меню Word щелкните Параметры, а затем в разделе Личные параметры выберите пункт Расположения файлов. В разделе Расположения файлов выберите Шаблоны пользователей в списке и нажмите кнопку Изменить. Введите новую папку и путь, которые вы хотите использовать, и Word сохранит все новые шаблоны в этой папке.

Существующий шаблон можно изменить, чтобы сделать его более полезным. Добавьте статические данные в существующий шаблон и повторно сохраните файл (как шаблон).

  1. В меню Файл выберите команду Создать из шаблона.

  2. Щелкните шаблон, похожий на шаблон, который вы хотите создать, и нажмите кнопку Создать.

    Примечание: Если не удается найти шаблон, его можно найти по ключевым словам в поле Поиск по всем шаблонам .

  3. Добавьте, удалите или измените текст, изображения или форматирование и внесите в шаблон другие изменения, которые должны отражаться во всех новых документах, основанных на нем.

  4. В меню Файл выберите команду Сохранить как шаблон.

  5. В поле Сохранить как введите имя нового шаблона.

  6. (Необязательно) В поле Где выберите расположение, в котором будет сохранен шаблон.

  7. Рядом с полем Формат файла щелкните Шаблон Microsoft Word (.dotx) или, если шаблон содержит макросы, щелкните Microsoft Word Macro-Enabled шаблон.

  8. Нажмите кнопку Сохранить.

    Если вы не выберете другое расположение, шаблон сохраняется в папке /Users/username/Library/Group Containers/UBF8T346G9. Office/User Content/Templates.

    Чтобы изменить, где Word автоматически сохраняет шаблоны, в меню Word щелкните Параметры, а затем в разделе Личные параметры выберите пункт Расположения файлов. В разделе Расположения файлов выберите Шаблоны пользователей в списке и нажмите кнопку Изменить. Введите новую папку и путь, которые вы хотите использовать, и Word сохранит все новые шаблоны в этой папке.

Чтобы открыть новый документ на основе шаблона, в меню Файл щелкните пункт Создать из шаблона, а затем выберите нужный шаблон.

  1. В finder откройте /Users/username/Library/Group Containers/UBF8T346G9. Office/User Content/Templates.

  2. Перетащите в корзину шаблоны, которые нужно удалить.

PowerPoint

  1. Откройте пустую презентацию и на вкладке Вид выберите Образец слайдов.

    Образец слайдов — это самое крупное изображение слайда в верхней части списка эскизов слайдов. Под ним расположены связанные с ним макеты.

    Образец слайдов в PowerPoint для Mac

  2. Чтобы изменить образец слайдов или макеты, на вкладке Образец слайдов сделайте следующее:

    Образец слайдов в PowerPoint для Mac

    • Чтобы добавить красочную тему со специальными шрифтами и эффектами, нажмите Темы и выберите тему.

    • Чтобы изменить фон, щелкните Стили фона и выберите нужный вариант.

    • Чтобы добавить заполнитель для текста, изображения, диаграммы и других объектов, в области эскизов щелкните макет слайда, в котором хотите разместить заполнитель. В разделе Вставить заполнитель выберите тип добавляемого заполнителя и перетаскиванием обозначьте его размер.

      Вставка заполнителя в PowerPoint для Mac

  1. Откройте презентацию, которую нужно сохранить в виде шаблона.

  2. На вкладке Файл выберите команду Сохранить как шаблон.

  3. В поле Сохранить как введите имя нового шаблона.

  4. (Необязательно) В поле Где выберите расположение, в котором будет сохранен шаблон.

  5. Рядом с полем Формат файла щелкните Шаблон PowerPoint (.potx) или, если презентация содержит макросы, выберите Элемент PowerPoint Macro-Enabled Шаблон (POTM).

  6. Нажмите кнопку Сохранить.

    Если вы не выберете другое расположение, шаблон сохраняется в папке /Users/username/Library/Group Containers/UBF8T346G9. Office/User Content/Templates.

Существующий шаблон можно изменить, чтобы сделать его более полезным. Добавьте статические данные в существующий шаблон и повторно сохраните файл (как шаблон).

  1. В меню Файл выберите команду Создать из шаблона.

  2. Щелкните шаблон, похожий на шаблон, который вы хотите создать, и нажмите кнопку Создать.

    Примечание: Если не удается найти шаблон, его можно найти по ключевым словам в поле Поиск по всем шаблонам .

  3. Добавьте, удалите или измените текст, изображения или форматирование и внесите в шаблон другие изменения, которые должны отражаться во всех новых презентациях, основанных на нем.

  4. В меню Файл выберите команду Сохранить как шаблон.

  5. В поле Сохранить как введите имя нового шаблона.

  6. (Необязательно) В поле Где выберите расположение, в котором будет сохранен шаблон.

  7. Рядом с полем Формат файла щелкните Шаблон PowerPoint (.potx) или, если шаблон содержит макросы, щелкните PowerPoint Macro-Enabled Шаблон (.potm).

  8. Нажмите кнопку Сохранить.

    Если вы не выберете другое расположение, шаблон сохраняется в папке /Users/username/Library/Group Containers/UBF8T346G9. Office/User Content/Templates.

Чтобы начать новую презентацию на основе шаблона, в меню Файл выберите команду Создать из шаблона, а затем выберите шаблон, который вы хотите использовать.

  1. В finder откройте /Users/username/Library/Group Containers/UBF8T346G9. Office/User Content/Templates.

  2. Перетащите в корзину шаблоны, которые нужно удалить.

Excel

  1. Откройте книгу, которую нужно сохранить в виде шаблона.

  2. В меню Файл выберите команду Сохранить как шаблон.

  3. В поле Сохранить как введите имя нового шаблона.

  4. (Необязательно) В поле Где выберите расположение, в котором будет сохранен шаблон.

  5. Рядом с полем Формат файла щелкните Шаблон Excel (.xltx) или, если книга содержит макросы, щелкните Excel Macro-Enabled шаблон (XLTM).

  6. Нажмите кнопку Сохранить.

    Если вы не выберете другое расположение, шаблон сохраняется в папке /Users/username/Library/Group Containers/UBF8T346G9. Office/User Content/Templates.

Существующий шаблон можно изменить, чтобы сделать его более полезным. Добавьте статические данные в существующий шаблон и повторно сохраните файл (как шаблон).

  1. В меню Файл выберите команду Создать из шаблона.

  2. Щелкните шаблон, похожий на шаблон, который вы хотите создать, и нажмите кнопку Создать.

    Примечание: Если не удается найти шаблон, его можно найти по ключевым словам в поле Поиск по всем шаблонам .

  3. Добавьте, удалите или измените содержимое, графику или форматирование, а также внесите любые другие изменения, которые должны отображаться во всех новых книгах, на основе шаблона.

  4. В меню Файл выберите команду Сохранить как шаблон.

  5. В поле Сохранить как введите имя нового шаблона.

  6. (Необязательно) В поле Где выберите расположение, в котором будет сохранен шаблон.

  7. Рядом с полем Формат файла щелкните Шаблон Excel (XLTX)или, если шаблон содержит макросы, щелкните Excel Macro-Enabled Шаблон (XLTM).

    В окне "Сохранить как" выделен шаблон Word

  8. Нажмите кнопку Сохранить.

    Если вы не выберете другое расположение, шаблон сохраняется в папке /Users/username/Library/Group Containers/UBF8T346G9. Office/User Content/Templates.

Чтобы запустить новую книгу на основе шаблона, в меню Файл выберите команду Создать из шаблона, а затем выберите шаблон, который вы хотите использовать.

  1. В finder откройте /Users/username/Library/Group Containers/UBF8T346G9. Office/User Content/Templates.

  2. Перетащите в корзину шаблоны, которые нужно удалить.

См. также

Различия между шаблонами, темами и стилями Word

Word

  1. Откройте документ.

  2. Добавьте, удалите или измените текст, изображения или форматирование и внесите в шаблон другие изменения, которые должны отражаться во всех новых документах, основанных на нем.

  3. В меню Файл выберите пункт Сохранить как.

  4. Во всплывающем меню Формат выберите пункт Шаблон Word (.dotx).

  5. В поле Сохранить как введите имя нового шаблона, а затем нажмите кнопку Сохранить.

    Если вы не выбрали другое расположение, шаблон сохраняется в папке /Users/username/Library/Application Support/Microsoft/Office/User Templates/My Templates.

  6. В меню Файл выберите команду Закрыть.

    Чтобы упорядочить шаблоны, с помощью Средства поиска создайте новую папку в папке /Users/username/Library/Application Support/Microsoft/Office/User Templates/My Templates, а затем сохраните шаблон в новой папке. 

    Примечание: В Mac OS X 7 (Lion) папка Library по умолчанию скрыта. Чтобы отобразить папку Библиотека, в finder щелкните меню Перейти , а затем удерживайте нажатой клавишу OPTION.

Существующий шаблон можно изменить, чтобы сделать его более полезным. Добавьте статические данные в существующий шаблон и повторно сохраните файл (как шаблон).

  1. На стандартной панели инструментов щелкните Создать из шаблона Кнопка "Создать из шаблона".

  2. В области навигации слева в разделе Шаблоны нажмите кнопку Все.

    Примечание: Если не удается найти шаблон, его можно найти по ключевым словам в поле Поиска .

  3. Щелкните наиболее подходящий шаблон и нажмите кнопку Выбрать.

  4. Добавьте, удалите или измените текст, изображения или форматирование и внесите в шаблон другие изменения, которые должны отражаться во всех новых документах, основанных на нем.

  5. В меню Файл выберите пункт Сохранить как.

  6. Во всплывающем меню Формат выберите пункт Шаблон Word (.dotx).

  7. В поле Сохранить как введите имя нового шаблона, а затем нажмите кнопку Сохранить.

    Если вы не выбрали другое расположение, шаблон сохраняется в папке /Users/username/Library/Application Support/Microsoft/Office/User Templates/My Templates.

    Чтобы упорядочить шаблоны, с помощью Средства поиска создайте новую папку в папке /Users/username/Library/Application Support/Microsoft/Office/User Templates/My Templates, а затем сохраните шаблон в новой папке. 

    Примечание: В Mac OS X 7 (Lion) папка Library по умолчанию скрыта. Чтобы отобразить папку Библиотека, в finder щелкните меню Перейти , а затем удерживайте нажатой клавишу OPTION.

  1. На стандартной панели инструментов щелкните Создать из шаблона Кнопка "Создать из шаблона".

  2. В области навигации слева в разделе Шаблоны нажмите кнопку Мои шаблоны.

    Примечание: Если для упорядочения шаблонов вы создали папки, они отображаются в разделе Мои шаблоны. Для просмотра шаблонов щелкните нужную папку.

  3. Щелкните созданный шаблон и нажмите кнопку Выбрать.

  1. В finder откройте /Users/username/Library/Application Support/Microsoft/Office/User Templates/My Templates.

    Примечание: В Mac OS X 7 (Lion) папка Library по умолчанию скрыта. Чтобы отобразить ее, в системе поиска щелкните меню Перейти, а затем нажмите и удерживайте клавишу OPTION.

  2. Перетащите в корзину шаблоны, которые нужно удалить.

PowerPoint

  1. Откройте презентацию, на основе которой нужно создать шаблон.

  2. Добавьте, удалите или измените текст, изображения или форматирование и внесите в шаблон другие изменения, которые должны отражаться во всех новых презентациях, основанных на нем.

  3. В меню Файл выберите пункт Сохранить как.

  4. Во всплывающем меню Формат выберите пункт Шаблон PowerPoint (.potx).

  5. В поле Сохранить как введите имя нового шаблона, а затем нажмите кнопку Сохранить.

    Если вы не выбрали другое расположение, шаблон сохраняется в папке /Users/username/Library/Application Support/Microsoft/Office/User Templates/My Templates.

    Чтобы упорядочить шаблоны, с помощью Средства поиска создайте новую папку в папке /Users/username/Library/Application Support/Microsoft/Office/User Templates/My Templates, а затем сохраните шаблон в новой папке. 

    Примечание: В Mac OS X 7 (Lion) папка Library по умолчанию скрыта. Чтобы отобразить папку Библиотека, в finder щелкните меню Перейти , а затем удерживайте нажатой клавишу OPTION.

Существующий шаблон можно изменить, чтобы сделать его более полезным. Добавьте статические данные в существующий шаблон и повторно сохраните файл (как шаблон).

  1. На стандартной панели инструментов щелкните Создать из шаблона Кнопка "Создать из шаблона".

  2. В области навигации слева в разделе Шаблоны нажмите кнопку Все.

    Примечание: Если шаблон не удается найти, можно выполнить поиск по ключевым словам с помощью поля Поиск.

  3. Щелкните наиболее подходящий шаблон и нажмите кнопку Выбрать.

  4. Добавьте, удалите или измените текст, изображения или форматирование и внесите в шаблон другие изменения, которые должны отражаться во всех новых документах, основанных на нем.

    Чтобы не изменять каждый макет или слайд по отдельности, можно применить изменения сразу к нескольким макетам слайдов. Для этого измените образцы слайдов.

  5. В меню Файл выберите пункт Сохранить как.

  6. Во всплывающем меню Формат выберите пункт Шаблон PowerPoint (.potx).

  7. В поле Сохранить как введите имя нового шаблона, а затем нажмите кнопку Сохранить.

    Если вы не выбрали другое расположение, шаблон сохраняется в папке /Users/username/Library/Application Support/Microsoft/Office/User Templates/My Templates.

    Чтобы упорядочить шаблоны, с помощью Средства поиска создайте новую папку в папке /Users/username/Library/Application Support/Microsoft/Office/User Templates/My Templates, а затем сохраните шаблон в новой папке. 

    Примечание: В Mac OS X 7 (Lion) папка Library по умолчанию скрыта. Чтобы отобразить папку Библиотека, в finder щелкните меню Перейти , а затем удерживайте нажатой клавишу OPTION.

  1. На стандартной панели инструментов щелкните Создать из шаблона Кнопка "Создать из шаблона".

  2. В области навигации слева в разделе Шаблоны нажмите кнопку Мои шаблоны.

    Примечание: Если для упорядочения шаблонов вы создали папки, они отображаются в разделе Мои шаблоны. Для просмотра шаблонов щелкните нужную папку.

  3. В области навигации справа можно выбрать цвета, шрифт и размер слайда для шаблона.

  4. Щелкните созданный шаблон и нажмите кнопку Выбрать.

  1. В finder откройте /Users/username/Library/Application Support/Microsoft/Office/User Templates/My Templates.

    Примечание: В Mac OS X 7 (Lion) папка Library по умолчанию скрыта. Чтобы отобразить ее, в системе поиска щелкните меню Перейти, а затем нажмите и удерживайте клавишу OPTION.

  2. Перетащите в корзину шаблоны, которые нужно удалить.

Excel

  1. Откройте книгу, на основе которой нужно создать шаблон.

  2. Добавьте, удалите или измените текст, изображения или форматирование и внесите в шаблон другие изменения, которые должны отражаться во всех новых документах, основанных на нем.

  3. В меню Файл выберите пункт Сохранить как.

  4. Во всплывающем меню Формат выберите пункт Шаблон Excel (.xltx).

  5. В поле Сохранить как введите имя нового шаблона, а затем нажмите кнопку Сохранить.

    Если вы не выбрали другое расположение, шаблон сохраняется в папке /Users/username/Library/Application Support/Microsoft/Office/User Templates/My Templates.

    Чтобы упорядочить шаблоны, с помощью Средства поиска создайте новую папку в папке /Users/username/Library/Application Support/Microsoft/Office/User Templates/My Templates, а затем сохраните шаблон в новой папке. 

    Примечание: В Mac OS X 7 (Lion) папка Library по умолчанию скрыта. Чтобы отобразить папку Библиотека, в finder щелкните меню Перейти , а затем удерживайте нажатой клавишу OPTION.

Существующий шаблон можно изменить, чтобы сделать его более полезным. Добавьте статические данные в существующий шаблон и повторно сохраните файл (как шаблон).

  1. На стандартной панели инструментов щелкните Создать из шаблона Кнопка "Создать из шаблона".

  2. В области навигации слева в разделе Шаблоны нажмите кнопку Все.

    Примечание: Если шаблон не удается найти, можно выполнить поиск по ключевым словам с помощью поля Поиск.

  3. Щелкните наиболее подходящий шаблон и нажмите кнопку Выбрать.

  4. Добавьте, удалите или измените текст, изображения или форматирование и внесите в шаблон другие изменения, которые должны отражаться во всех новых документах, основанных на нем.

  5. В меню Файл выберите пункт Сохранить как.

  6. Во всплывающем меню Формат выберите пункт Шаблон Excel (.xltx).

  7. В поле Сохранить как введите имя нового шаблона, а затем нажмите кнопку Сохранить.

    Если вы не выбрали другое расположение, шаблон сохраняется в папке /Users/username/Library/Application Support/Microsoft/Office/User Templates/My Templates.

    Чтобы упорядочить шаблоны, с помощью Средства поиска создайте новую папку в папке /Users/username/Library/Application Support/Microsoft/Office/User Templates/My Templates, а затем сохраните шаблон в новой папке. 

    Примечание: В Mac OS X 7 (Lion) папка Library по умолчанию скрыта. Чтобы отобразить папку Библиотека, в finder щелкните меню Перейти , а затем удерживайте нажатой клавишу OPTION.

  1. На стандартной панели инструментов щелкните Создать из шаблона Кнопка "Создать из шаблона".

  2. В области навигации слева в разделе Шаблоны нажмите кнопку Мои шаблоны.

    Примечание: Если для упорядочения шаблонов вы создали папки, они отображаются в разделе Мои шаблоны. Для просмотра шаблонов щелкните нужную папку.

  3. Щелкните созданный шаблон и нажмите кнопку Выбрать.

  1. В finder откройте /Users/username/Library/Application Support/Microsoft/Office/User Templates/My Templates.

    Примечание: В Mac OS X 7 (Lion) папка Library по умолчанию скрыта. Чтобы отобразить ее, в системе поиска щелкните меню Перейти, а затем нажмите и удерживайте клавишу OPTION.

  2. Перетащите в корзину шаблоны, которые нужно удалить.

См. также

Изменение образца слайдов

Настройка запуска Excel в Excel для Mac

Различия между шаблонами, темами и стилями Word

Если вы считаете текущий документ шаблоном, вы можете сохранить его с другим именем, чтобы создать новый документ на основе текущего. Когда вы хотите создать такой документ, вы откроете документ в Word в Интернете, перейдите в раздел Файл > сохранить как и создадите документ, который является копией того, с которого вы начали.

Сохранить копию в OneDrive

С другой стороны, если вы думаете о типах шаблонов, которые вы видите, перейдя в файл > Создать, то нет: вы не можете создать их в Word в Интернете.

Вместо этого сделайте следующее.

Если у вас есть классическое приложение Word, используйте команду Открыть в Word в Word в Интернете, чтобы открыть документ в Word на рабочем столе.

Изображение команды "Открыть в классическом приложении"

Создайте шаблон в программе Word. Вы сможете использовать свой шаблон для новых документов, выбрав команду Файл > Создать в классическом приложении Word. Если документы хранятся в Интернете, их можно изменить в Word в Интернете.

См. также

Шаблоны и темы Майкрософт

Скачивание бесплатных готовых шаблонов

Бесплатные шаблоны с фоном для PowerPoint

Изменение шаблонов

Всем привет, сегодня поговорим о выгрузки данных из 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).

03. Данный пример показывает как можно быстро создать документ Word из Microsoft Access, используя шаблон *.dot. Для разметки документа используются специальные закладки.

'==============================================================
'   Создание документа Word по шаблону
'   • Для этого Вы должны создать в Word шаблон la_automat.dot
'   и поставить в нем Закладки, имеющие такие же имена как в форме.
'   Например, Вставка - Закладка ... - Имя закладки=Фирма
'   (Нажмите кнопку Добавить и сохраните шаблон)
'
Private Sub butNewWord_Click()
Dim app As Word.Application  'Приложение программы
Dim strDOC As String ' Имя документа
Dim strDOT As String ' Имя шаблона
Dim ctl As Control ' Управляющие элементы в форме
Dim s As String ' Вспомогательная строка
    
    On Error GoTo 999
    ' Определяем имена шаблона и документа Word
    With Application.CurrentProject
        strDOT = .Path  ""  "la_automat.dot"
        strDOC = .Path  ""  "la_automat.doc"
    End With
    
    ' Управление документом Word
    Set app = New Word.Application 'Новое приложение Word
    app.Visible = True 'Отображаем документ
    app.Documents.Add strDOT 'Добавляем шаблон
    With app.ActiveDocument  'Выбираем активный документ
        On Error Resume Next ' Отключаем ошибки
        ' Просматриваем все элементы формы, если
        ' такой закладки нет, то очищаем поток от ошибки
        For Each ctl In Me.Controls
            If ctl.ControlType = acTextBox Then
                s = ctl.Name ' Определяем название элемента
                .Bookmarks.Item(s).Range.Text = Me(s) 'Устанавливаем текст
                Err.Clear ' Очищаем поток от ошибки при отсутствии элемента
            End If
        Next ctl
        .SaveAs strDOC ' Сохраняем файл
        On Error GoTo 999 ' Включаем обработку ошибки
    End With
    ' app.Quit 'Закрываем приложение
    Exit Sub
999:
    MsgBox Err.Description  'Ошибка
    Err.Clear
    app.Quit
End Sub

Работа с базами данных в текстовом редакторе Microsoft Word

В условиях недостатка времени на изучение такой темы, как “Базы данных”, для ознакомления учащихся с основными понятиями этой темы можно использовать текстовый редактор Microsoft Word. С этой целью может быть применена возможность редактора, которая называется “слияние данных”.

Напомним основные положения (см. также [1]). При проведении слияния задействованы две части: база данных и документ, а сама операция слияния как раз и позволяет объединить их (в документе используются данные из базы данных). Как правило, слияние применяется для оформления в документе текстового редактора писем, информация для которых (фамилии адресатов, их адреса и т.п.) хранится в базе данных. В статье [1] приведен ряд примеров использования слияния документов при решении задач “школьной” жизни. Возможны и другие примеры.

В простейшем случае в качестве базы данных можно использовать таблицу, оформленную в Microsoft Excel, в которой каждому полю соответствует отдельная колонка 1 .

Итак, пусть имеется лист электронной таблицы Microsoft Excel (см. рис. 1). На нем представлена информация об учениках школы: фамилия, имя, класс, пол и дата рождения, а также для каждого учащегося рассчитано число полных лет в его возрасте и определено, является ли он (она) именинником на текущей неделе. Этот лист и будем рассматривать как базу данных.

Сначала учащимся предлагается простое задание: в текстовом редакторе Microsoft Word напечатать список, скажем, 10а класса.

Задача решается следующим образом.

1. Открывается панель инструментов Слияние (Вид — Панели инструментов — Слияние).

2. Во вкладке Рассылки выбирается пункт Выбрать получателей — Использовать существующий список, после чего следует указать файл Excel со списком учеников (см. рис. 2), а в нем — соответствующий лист.

3. Выбираются (по одному) поля базы данных, которые будут использоваться в основном документе (нужные поля слияния). Для этого предназначена кнопка Вставить поля слияния (см. рис. 3 2 ). После вставки полей в документ между их именами нужно сделать необходимое число пробелов.

Если на этом и закончить работу, то будет отобран список всех учеников в таблице, причем на одном листе будут представлены фамилия, имя и обозначение класса лишь одного ученика. Поэтому для решения поставленной задачи надо воспользоваться фильтром — выбрать Изменить список получателей — Фильтр и в окне Фильтр и сортировка выбрать “Класс”, “равно” и “10а” (см. рис. 4).

4. Для объединения всех отобранных записей в одном документе необходимо выполнить команды Найти и объединитьИзменить отдельные документыОбъединить все.

5. Ну а для того, чтобы все фамилии были на одной странице, следует заменить разрыв раздела на знак абзаца по всему документу (см. рис. 5).

Конечный вид документа представлен на рис. 6.

Фактически мы только что продемонстрировали, как создать простейший запрос к базе данных.

После этого можно предложить ученикам самостоятельно выдать список всех, кто родился в текущем месяце, “невезучих”, родившихся 13-го числа, всех, кто родился в первой половине года, и т.п.

Можно также создавать запросы со сложными условиями. Например, получить список всех девочек, родившихся в феврале, или список всех Маш и Марий, список мальчиков для военкомата (тех, кому исполнилось 16 лет) и т.п.

Несколько более сложные запросы возникают, когда мы хотим получить, например, список всех мальчиков 7-х классов. Очень часто ученики не обращают внимания, что в графе (поле) “Класс” стоит обозначение класса с буквой. Это означает, что в фильтре запроса в списке Сравнение (см. рис. 4) необходимо использовать пункт “содержит”.

Думаем, читателям не составит труда придумать десяток-другой запросов к этой очень понятной базе данных.

Интересным аспектом предложенной методики является обсуждение с учащимися преобразования логических выражений (сложных условий). Рассмотрим следующий запрос: “Требуется выдать список девочек старших классов, у которых в поле “Имя” записано Лена или Елена”.

Здесь мы имеем четыре условия:

1) поле “Имя” равно “Лена” (обозначим его для краткости — Л);

2) поле “Имя” равно “Елена” (Е);

3) поле “Класс” содержит 10 (К10);

4) поле “Класс” содержит 11 (К11).

После обсуждения с учащимися общего условия для отбора значений в список можно получить такое:
(Л ИЛИ Е) И (К10 ИЛИ К11), причем именно со скобками, так как операция конъюнкции выполняется раньше, чем операция дизъюнкции. Однако при работе с фильтром (см. рис. 4) скобки расставить нельзя. Как же быть? Ответ такой — надо раскрыть скобки, не забывая, что конъюнкция (И) — это аналог умножения, а дизъюнкция (ИЛИ) — аналог сложения:

(Л ИЛИ Е) И (К10 ИЛИ К11) = Л И К10 ИЛИ Л И К11 ИЛИ Е И К10 ИЛИ Е И К11.

Таким образом, фильтр будет следующим: Имя равно Лена И Класс содержит 10 ИЛИ Имя равно Лена И Класс содержит 11 ИЛИ Имя равно Елена И Класс содержит 10 ИЛИ Имя равно Елена И Класс содержит 11. Фрагмент окна Фильтр и сортировка с таким условием 3 приведен на рис. 7.

Рис. 7. Фрагмент окна Фильтр и сортировка

Опыт показывает, что при применении описанной методики, во-первых, большинство учеников не испытывают особых трудностей в понимании того, что они должны сделать, а стало быть, осваивают основные понятия баз данных и технику создания запросов. Во-вторых, очевидной является и чисто практическая польза с точки зрения общей компьютерной грамотности.

1. Сенокосов А.И. Слияние документов как лучшее средство от головной боли. / Информатика, № 2/2006.

Примечание редакции. Как отмечалось, при описании методики автор использует версию Microsoft Word 2007. В предыдущих версиях редактора вид панели инструментов Слияние отличается от представленного в статье. В таких версиях:

1) для выбора файла Excel со списком учеников в качестве источника данных следует использовать кнопку (Открыть источник данных);

2) для вставки в документ нужных полей слияния предназначена кнопка (Вставить поля слияния);

3) для отображения имен полей или отобранных значений используется кнопка (Поля/данные);

4) окно Фильтр и сортировка вызывается с помощью кнопки (Получатели). После этого надо щелкнуть на стрелке () рядом с надписью на заголовке столбца и выбрать пункт Дополнительно;

5) объединить все отобранные записи в одном документе можно с помощью кнопки (Слияние в новый документ);

6) замена разрыва раздела на знак абзаца по всему документу осуществляется “обычными” средствами Word (Правка — Заменить, с использованием специальных символов).

1 При создании этой таблицы целесообразно ознакомить учащихся с такими понятиями, как “база данных”, “поле”, “запись” и “запрос”. — Прим. ред.

2 Автор использует версию редактора Word 2007. — Прим. ред.

3 В окне условие представлено не полностью (используется вертикальная полоса прокрутки). — Прим. ред.

Как создать базу данных в ворде

В этой статье описана обычная процедура запуска Access и создания базы данных, которая будет использоваться на компьютере, а не в Интернете. В ней рассказано о том, как создать классическую базу данных на основе шаблона или с нуля с собственными таблицами, формами, отчетами и другими объектами. Кроме того, в статье рассмотрены способы импорта существующих данных в новую базу данных.

В этой статье

Обзор

При первом запуске Access, а также при закрытии базы данных без завершения работы Access отображается представление Microsoft Office Backstage.

Представление Backstage является отправным пунктом для создания новых и открытия существующих баз данных, просмотра релевантных статей на сайте Office.com и т. д., то есть для выполнения любых операций с файлом базы данных или вне базы данных, но не в ней.

Создание базы данных

Когда вы открываете Access, в представлении Backstage отображается вкладка «Новое». Создать базу данных можно несколькими способами:

Пустая база данных При этом вы можете начать с нуля. Это хороший вариант, если у вас есть очень конкретные требования к проектированию или есть данные, которые необходимо учитывать или включить.

Шаблон, установленный в Access Если вы хотите начать новый проект и начать его, рассмотрите возможность использования шаблона. В Access по умолчанию установлено несколько шаблонов.

Шаблон из Office.com В дополнение к шаблонам, поставляемым с Access, много других шаблонов доступно на сайте Office.com. Для их использования даже не нужно открывать браузер, потому что эти шаблоны доступны на вкладке Создать.

Добавление объектов в базу данных

При работе с базой данных в нее можно добавлять поля, таблицы и части приложения.

Части приложения — это функция, позволяющая использовать несколько связанных объектов базы данных как один объект. Например, часть приложения может состоять из таблицы и формы, основанной на ней. С помощью части приложения можно одновременно добавить в базу данных таблицу и форму.

Также можно создавать запросы, формы, отчеты, макросы — любые объекты базы данных, необходимые для работы.

Создание базы данных с помощью шаблона

В Access есть разнообразные шаблоны, которые можно использовать как есть или в качестве отправной точки. Шаблон — это готовая к использованию база данных, содержащая все таблицы, запросы, формы, макросы и отчеты, необходимые для выполнения определенной задачи. Например, существуют шаблоны, которые можно использовать для отслеживания вопросов, управления контактами или учета расходов. Некоторые шаблоны содержат примеры записей, демонстрирующие их использование.

Если один из этих шаблонов вам подходит, с его помощью обычно проще и быстрее всего создать необходимую базу данных. Однако если необходимо импортировать в Access данные из другой программы, возможно, будет проще создать базу данных без использования шаблона. Так как в шаблонах уже определена структура данных, на изменение существующих данных в соответствии с этой структурой может потребоваться много времени.

Если база данных открыта, нажмите на вкладке Файл кнопку Закрыть. В представлении Backstage откроется вкладка Создать.

На вкладке Создать доступно несколько наборов шаблонов. Некоторые из них встроены в Access, а другие шаблоны можно скачать с сайта Office.com. Дополнительные сведения см. в следующем разделе.

Выберите шаблон, который вы хотите использовать.

Access предложит имя файла для базы данных в поле «Имя файла». При этом имя файла можно изменить. Чтобы сохранить базу данных в другой папке, отличной от папки, которая отображается под полем «Имя файла», нажмите кнопку , перейдите к папке, в которой ее нужно сохранить, и нажмите кнопку «ОК». При желании вы можете создать базу данных и связать ее с сайтом SharePoint.

Нажмите кнопку Создать.

Access создаст базу данных на основе выбранного шаблона, а затем откроет ее. Для многих шаблонов при этом отображается форма, в которую можно начать вводить данные. Если шаблон содержит примеры данных, вы можете удалить каждую из этих записей, щелкнув область маркировки (затененное поле или полосу слева от записи) и выполнив действия, указанные ниже.

На вкладке Главная в группе Записи нажмите кнопку Удалить.

Щелкните первую пустую ячейку в форме и приступайте к вводу данных. Для открытия других необходимых форм или отчетов используйте область навигации. Некоторые шаблоны содержат форму навигации, которая позволяет перемещаться между разными объектами базы данных.

Дополнительные сведения о работе с шаблонами см. в статье Создание базы данных Access на компьютере с помощью шаблона.

Создание базы данных без использования шаблона

Если использовать шаблон не имеет ничего интересного, вы можете создать базу данных, создав собственные таблицы, формы, отчеты и другие объекты базы данных. В большинстве случаев это может быть связано с одним или обоими из следующих случаев:

Ввести, вставить или импортировать данные в таблицу, которая создается вместе с базой данных, и повторить эту процедуру для новых таблиц, которые создаются с помощью команды Таблица на вкладке Создание.

Импортировать данные из других источников, при этом создав таблицы.

Создание пустой базы данных

На вкладке Файл щелкните Создать и выберите вариант Пустая база данных.

В поле Имя файла введите имя файла. Чтобы сохранить файл в другой папке, отличной от используемой по умолчанию, нажмите кнопку Поиск расположения для размещения базы данных (рядом с полем Имя файла), откройте нужную папку и нажмите кнопку ОК.

Нажмите кнопку Создать.

Access создаст базу данных с пустой таблицей «Таблица1» и откроет ее в режиме таблицы. Курсор будет помещен в первую пустую ячейку столбца Щелкните для добавления.

Чтобы добавить данные, начните вводить их или вставьте из другого источника (см. раздел Копирование данных из другого источника в таблицу Access).

Ввод данных в представлении таблицы аналогиен вводу данных на листах Excel. Структура таблицы создается при вводе данных. При добавлении нового столбца в таблицу в таблице определяется новое поле. Access автоматически задает тип данных каждого поля на основе введите данные.

Если на этом этапе вводить данные в таблицу «Таблица1» не нужно, нажмите кнопку Закрыть . Если вы внесли изменения в таблицу, будет предложено сохранить их. Нажмите кнопку Да, чтобы сохранить изменения, кнопку Нет, чтобы не сохранять их, или кнопку Отмена, чтобы оставить таблицу открытой.

Совет: Access ищет файл с именем Blank.accdb в папке [диск установки]:Program FilesMicrosoft OfficeTemplates1049Access. Если он существует, blank.accdb является шаблоном для всех новых пустых баз данных. Все новые базы данных наследуют содержимое этого файла. Это отличный способ распространения содержимого по умолчанию, например номеров компонентов или заявлений об отказе от ответственности и политик компании.

Важно: Если хотя бы один раз закрыть таблицу «Таблица1» без сохранения, она будет удалена полностью, даже если в нее введены данные.

Добавление таблицы

Добавление таблиц к существующей базе данных осуществляется командами группы Таблицы на вкладке Создать.

Создание таблицы в режиме таблицы. В режиме таблицы можно начать ввод данных сразу, структура таблицы при этом будет создаваться автоматически. Полям присваиваются имена с последовательными номерами («Поле1», «Поле2» и т. д.), а тип данных автоматически задается с учетом вводимых данных.

на вкладке Создание в группе Таблицы нажмите кнопку Таблица.

Access создаст таблицу и выделит первую пустую ячейку в столбце Щелкните для добавления.

На вкладке Поля в группе Добавление и удаление выберите нужный тип поля. Если нужный тип поля не отображается, нажмите кнопку Другие поля .

Откроется список часто используемых типов полей. Выберите необходимый тип поля, и Access добавит в таблицу новое поле в точке вставки.

Поле можно переместить путем перетаскивания. При этом в таблице появляется вертикальная полоса вставки, указывающая место, где будет расположено поле.

Чтобы добавить данные, начните вводить их в первую пустую ячейку или вставьте из другого источника (см. раздел Копирование данных из другого источника в таблицу Access).

Для переименования столбца (поля) дважды щелкните его заголовок и введите новое название.

Присвойте полям значимые имена, чтобы при просмотре области Список полей было понятно, что содержится в каждом поле.

Чтобы переместить столбец, щелкните его заголовок для выделения столбца и перетащите столбец в нужное место. Можно выделить несколько смежных столбцов и перетащить их одновременно. Чтобы выделить несколько смежных столбцов, щелкните заголовок первого столбца, а затем, удерживая нажатой клавишу SHIFT, щелкните заголовок последнего столбца.

Создание таблицы в режиме конструктора. В режиме конструктора сначала следует создать структуру таблицы. Затем можно переключиться в режим таблицы для ввода данных или ввести данные, используя другой способ, например вставить данные из буфера обмена или импортировать их.

На вкладке Создание в группе Таблицы нажмите кнопку Конструктор таблиц.

Для каждого поля в таблице введите имя в столбце Имя поля, а затем в списке Тип данных выберите тип данных.

При желании можно ввести описание для каждого поля в столбце Описание. Это описание будет отображаться в строке состояния, когда в режиме таблицы курсор будет находиться в данном поле. Описание также отображается в строке состояния для любых элементов управления в форме или отчете, которые создаются путем перетаскивания этого поля из области списка полей, и любых элементов управления, которые создаются для этого поля при использовании мастера отчетов или мастера форм.

Когда все необходимые поля будут добавлены, сохраните таблицу:

На вкладке Файл щелкните Сохранить.

Вы можете начать вводить данные в таблицу в любое время, переключившись в таблицу и щелкнув первую пустую ячейку. Вы также можете вкопировать данные из другого источника, как описано в разделе «Копирование данных из другого источника в таблицу Access».

Задание свойств полей в режиме конструктора. Независимо от способа создания таблицы рекомендуется проверить и задать свойства полей. Хотя некоторые свойства доступны в режиме таблицы, другие можно настроить только в режиме конструктора. Чтобы перейти в режим конструктора, в области навигации щелкните таблицу правой кнопкой мыши и выберите пункт Конструктор. Чтобы отобразить свойства поля, щелкните его в сетке конструктора. Свойства отображаются под сеткой конструктора в области Свойства поля.

Щелкните свойство поля, чтобы просмотреть его описание рядом со списком Свойства поля. Более подробные сведения можно получить, нажав кнопку справки.

В следующей таблице описаны некоторые наиболее часто изменяемые свойства полей.

Размер поля

Для текстовых полей это свойство указывает максимально допустимое количество знаков, сохраняемых в поле. Максимальное значение: 255. Для числовых полей это свойство определяет тип сохраняемых чисел («Длинное целое», «Двойное с плавающей точкой» и т. д.). Для более рационального хранения данных рекомендуется выделять для хранения данных наименьший необходимый размер памяти. Если потребуется, это значение позже можно изменить.

Формат поля

Это свойство определяет формат отображения данных. Оно не влияет на фактические данные, сохраняемые в этом поле. Вы можете выбрать встроенный формат или задать собственный.

Маска ввода

Это свойство используется для определения общего шаблона для ввода любых данных в поле. Это позволяет обеспечить правильный ввод и нужное количество знаков для всех данных. Для получения справки по созданию маски ввода нажмите кнопку справа от поля свойства.

Значение по умолчанию

Это свойство позволяет задать стандартное значение, которое будет отображаться в этом поле при добавлении новой записи. Например, для поля «Дата/время», в котором необходимо записывать дату добавления записи, в качестве значения по умолчанию можно ввести «Date()» (без кавычек).

Обязательное поле

Это свойство указывает, обязательно ли вводить значение в поле. Если для него задано значение Да, невозможно будет добавить запись, если в это поле не введено значение.

Копирование данных из другого источника в таблицу Access

Если ваши данные хранятся в другой программе, например Excel, их можно скопировать и вставить в таблицу Access. Как правило, этот метод работает лучше всего, если данные уже разделены на столбцы, как в таблице Excel. Если данные находятся в текстовом редакторе, перед копированием рекомендуется разделить столбцы данных с помощью табуляции или преобразовать данные в таблицу. Если необходимо изменить данные или выполнить с ними другие операции (например, разделить полное имя на имя и фамилию), рекомендуется сделать это перед копированием данных, особенно если вы не знакомы с Access.

При вставке данных в пустую таблицу приложение Access задает тип данных для каждого поля в зависимости от того, какие данные в нем находятся. Например, если во вставляемом поле содержатся только значения даты, для этого поля используется тип данных «Дата/время». Если же вставляемое поле содержит только слова «Да» и «Нет», для этого поля выбирается тип данных «Логический».

Access называет имена полей в зависимости от того, что находится в первой строке в полученных данных. Если первая строка с данными похожа на последующие, Access определяет, что первая строка является частью данных, и присваивает полям общие имена (F1, F2 и т. д.). Если первая строка с данными не похожа на последующие строки, Access определяет, что первая строка состоит из имен полей. Access применит имена полей соответствующим образом и не включит первую строку в данные.

В Access имена присваиваются полям автоматически, поэтому во избежание путаницы поля следует переименовать. Это можно сделать следующим образом:

Нажмите клавиши CTRL+S, чтобы сохранить таблицу.

В режиме таблицы дважды щелкните заголовок каждого столбца и введите описательное имя поля для каждого столбца.

Еще раз сохраните таблицу.

Примечание: Кроме того, для изменения имен полей можно переключиться в режим конструктора. Для этого в области навигации щелкните таблицу правой кнопкой мыши и выберите пункт Конструктор. Чтобы вернуться в режим таблицы, дважды щелкните таблицу в области навигации.

Импорт, добавление или связывание данных из другого источника

Возможно, у вас есть данные, хранящиеся в другой программе, которые вы хотите импортировать в новую таблицу Access или добавить в существующую. Кроме того, если ваши коллеги хранят данные в других программах, может потребоваться создать связь с такими данными. В обоих случаях работа с данными из других источников не представляет сложности. Вы можете импортировать данные из листа Excel, таблицы в другой базе данных Access, списка SharePoint и других источников. Процесс импорта для разных источников немного различается, однако всегда начинается так, как описано ниже.

В Access на вкладке Внешние данные в группе Импорт и связи выберите команду для типа файла, который необходимо импортировать.

Например, чтобы импортировать данные с листа Excel, нажмите кнопку Excel. Если вы не видите нужный тип программы, нажмите кнопку Дополнительно.

Примечание: Если не удается найти нужный тип формата в группе Импорт и связи, может потребоваться запустить программу, в которой созданы эти данные, а затем сохранить в ней данные в файле общего формата (например, как текстовый файл с разделителями) перед импортом данных в Access.

В диалоговом окне Внешние данные нажмите кнопку Обзор, чтобы найти исходный файл данных, или введите в поле Имя файла полный путь к нему.

Выберите нужный параметр (все программы разрешают импорт, а некоторые — для их связываия) в области «Укажите, как и где нужно хранить данные в текущей базе данных». Вы можете создать новую таблицу, использующую импортируемые данные, или (в некоторых программах) данные в существующую таблицу или связанную таблицу, которая поддерживает связь с данными в программе-источнике.

Если будет запущен мастер, следуйте инструкциям на экране. На последней странице мастера нажмите кнопку Готово.

При импорте объектов или связывании таблиц из базы данных Access открывается диалоговое окно Импорт объектов или Связь с таблицами. Выберите нужные элементы и нажмите кнопку ОК.

Точная последовательность действий зависит от выбранного способа обработки данных: импорт, добавление или связывание.

Access предложит сохранить сведения о только что завершенной операции импорта. Если вы планируете повторить ее, нажмите кнопку Сохранить шаги импорта и введите нужные сведения. Позже для повторения этой операции достаточно будет нажать кнопку Сохраненные операции импорта на вкладке Внешние данные в группе Импорт и связи. Если вы не хотите сохранять сведения об операции, нажмите кнопку Закрыть.

Если вы решили импортировать таблицу, Access импортирует данные в новую таблицу и отображает ее в группе Таблицы в области навигации. Если выбрано добавление данных к существующей таблице, данные добавляются к ней. Если вы связываете данные, в группе Таблицы в области навигации создается связанная таблица.

Добавление части приложения

Части приложения можно использовать для расширения функциональности баз данных. Часть приложения может быть просто отдельной таблицей, а может включать несколько объектов, таких как таблицы и связанные формы.

Например, часть приложения «Примечания» состоит из таблицы с полем идентификатора, имеющим тип «Счетчик», поля даты и поля MEMO. Ее можно добавить в базу данных и использовать как есть или с минимальными изменениями.

Откройте базу данных, в которую вы хотите добавить часть приложения.

Откройте вкладку Создание.

В группе Шаблоны нажмите кнопку Части приложения. Появится список доступных частей.

Щелкните часть приложения, которую вы хотите добавить.

Открытие существующей базы данных Access

На вкладке Файл нажмите кнопку Открыть.

В диалоговом окне Открытие файла базы данных найдите базу данных, которую нужно открыть.

Выполните одно из следующих действий.

Чтобы открыть базу данных в режиме по умолчанию, дважды щелкните ее (режим по умолчанию может быть указан в диалоговом окне Параметры Access или установлен административной политикой).

Нажмите кнопку Открыть, чтобы открыть базу данных для общего доступа в многопользовательской среде и предоставить другим пользователям возможность выполнять в ней чтение и запись.

Щелкните стрелку рядом с кнопкой Открыть и выберите вариант Открыть для чтения, чтобы открыть базу данных только для чтения, то есть для просмотра без возможности внесения изменений. При этом другие пользователи смогут выполнять запись в базу данных.

Щелкните стрелку рядом с кнопкой Открыть и выберите вариант Монопольно, чтобы открыть базу данных в монопольном режиме. Если ее затем попытается открыть другой пользователь, он получит сообщение «Файл уже используется».

Щелкните стрелку рядом с кнопкой Открыть и выберите вариант Монопольно для чтения, чтобы открыть базу данных только для чтения. Другие пользователи при этом смогут открывать базу данных только для чтения.

Примечание: Вы можете напрямую открывать файлы данных внешних форматов, например dBASE, Microsoft Exchange или Excel. Кроме того, можно открыть напрямую любой источник данных ODBC, например Microsoft SQL Server. Access автоматически создаст базу данных Access в одной папке с файлом данных и добавит ссылки на все таблицы внешней базы данных.

Советы

Чтобы открыть одну из недавно использовавшихся баз данных, щелкните Последние на вкладке Файл и выберите имя файла базы данных. Access откроет базу данных, используя параметры, которые применялись при ее открытии в прошлый раз. Если список последних использовавшихся файлов не отображается, щелкните Параметры на вкладке Файл. В диалоговом окне Параметры Access нажмите кнопку Параметры клиента. В разделе Вывод на экран укажите количество документов, которые необходимо отобразить в списке «Последние документы» (не больше 50).

Кроме того, на панели навигации представления Backstage можно отдемонстрировать последние базы данных (1) вкладка «Файл», часть 2) базу данных, которую вы хотите открыть. В нижней части вкладки «Последние» выберите поле «Число последних баз данных», а затем укажите нужное количество.

При открытии базы данных с помощью команды Открыть на вкладке Файл можно просмотреть список ярлыков недавно открывавшихся баз данных, нажав в диалоговом окне Открыть кнопку Последние.

Работа с таблицей Word как с базой данных

Обычные таблицы Word, содержащие в верхней строке названия столбцов, а в левом столбце названия строк, могут рассматриваться как простейшие реляционные базы данных (табличная организация данных называется также реляционной, каждая запись в таблице содержит информацию, относящуюся только к одному конкретному объекту).
Названия столбцов в верхней строке являются полями базы данных, а все последующие строки – записями базы данных.
В таблицах Word, содержащих однотипные записи, можно выполнять некоторые операции, характерные для работы с базами данных, например сортировку записей.Строки таблицы (записи) можно отсортировать по возрастанию или убыванию, от старшего к младшему ключу сортировки и т.д. Для этого используют кнопки на панели инструментов ^ Таблицы и границы или команды меню Сортировка®ТАБЛИЦА . В диалоговом окне Сортировка указывают требуемые параметры – тип и порядок сортировки.
Таблицы Word могут также использоваться для выполнения операции слияния документов. Слияние документов – операция, предусматривающая включение в документ информации из базы данных (таблицы). Операция слияния документов используется для быстрого создания типовых писем, контрактов, приглашений, поздравлений, надпечаток конвертов и т.д.
С таблицами Word можно работать в режиме формы данных, при котором каждая строка таблицы отображается как отдельная запись данных, а текст каждого заголовка столбца становится соответствующим полем этой записи. Такой режим используется для упрощения ввода и изменения данных, особенно в больших таблицах.Для представления таблицы в виде формы данных нужно установить курсор внутри таблицы и щелкнуть по кнопке Форма данных на панели инструментов Базы данных.

Вычисления в таблицах Word

В таблицах Word реализованы некоторые функции электронных таблиц. Подобно Excel, Word позволяет выполнять вычисления с помощью формул и функций.Для проведения вычислений в таблице необходимо установить курсор в соответствующей ячейке (с ожидаемым результатом), использовать команду меню ^ Формула®ТАБЛИЦА и ввести данные в диалоговом окне Формула или выбрать нужную функцию. Формула всегда вводится после знака «равно» (=).Word вставляет результаты вычисления в виде полей. При изменении исходных данных в ячейках таблиц Word в отличие от Excel не происходит автоматического пересчета результатов вычислений. Поэтому при изменении исходных данных или ссылок на ячейки таблицы результаты вычислений необходимо обновлять (с помощью клавиши F9 или команды контекстного меню Обновить поле).
При копировании формул ссылки на адреса ячеек в таблицах Word не изменяются автоматически – не «настраиваются», как в Excel, т.е. ссылки на ячейки в таблицах Word всегда являются абсолютными, хотя и отображаются без знака доллара $. Поэтому при копировании формул ссылки на адреса ячеек Word нужно редактировать вручную.

Работа с полями

В документах Word, как и в других приложениях пакета Microsoft Office, используются особые структурные элементы — поля. Поля — это специальные коды, которые дают команды приложению автоматически вставлять в документ, а впоследствии обновлять переменные данные: номера страниц, даты, номера рисунков, таблиц, а также текст, графику, формулы и т. д.

Использование полей позволяет организовать автоматическое обновление сведений о документе (имени файла, количестве страниц и т. п.), выполнять вычисления по формулам, создавать перекрестные ссылки. Поля вставляются автоматически при создании оглавления и предметного указателя. С помощью полей устанавливаются связи с другими документами и объектами, осуществляется непосредственный обмен данными в приложениях Windows, создаются формы и составные документы — конверты, наклейки, почтовые рассылки и т. п. Word поддерживает несколько десятков различных типов полей Наиболее часто в документах встречаются поля ^ РАGЕ (номер страницы) и DАТЕ (дата), которые вставляются с помощью команд Дата и время.® Номера страниц и ВСТАВКА ®ВСТАВКА Для размещения в документе иллюстраций часто используют поля INCLUDEPICTURE.

Понравилась статья? Поделить с друзьями:

А вот еще интересные статьи:

  • Как создать чистый лист в word
  • Как создать чистый лист в excel
  • Как создать числовую последовательность в таблице excel ответ
  • Как создать числовую последовательность в таблице excel какие
  • Как создать числовой ряд в excel

  • 0 0 голоса
    Рейтинг статьи
    Подписаться
    Уведомить о
    guest

    0 комментариев
    Старые
    Новые Популярные
    Межтекстовые Отзывы
    Посмотреть все комментарии