выбор значений по критерию

[Volodymyr]

добрый день!
Прошу Вашей помощи в решении следующей задачи:

есть таблица "SS1", в которой указаны адреса объектов в столбах "street", "city", "zip", ... , "key1"

мне необходимо выбрать все записи в таблице, в которых значение "key1" совпадает со значением в форме и циклом их вписать в документ Word, начиная Bookmarks.Item("field13")
по очереди: улица
город
индекс
для каждой строчки.

Спасибо всем,
с уважением, Владимир.

[gluk_fm]

Постройте отчёт в чём проблема?

[LittleFatCat]

Доброго времени суток!

Dim wdApp as Word.Application
Dim wdDoc as Word.Document
Dim rsTabl as Recordset
Dim strSQL as String

set wdApp = CreateObject("Word.Application")
set wdDoc = wdApp.Documents.Add
strSQL = "Select * From SS1 Where SS1.Key1 = " & MyCritery
set rsTabl = CurrentDB.OpenRecordset (strSQL)
rsTabl.MoveFirst
wdApp.Visuble = True
Do While not rsTAbl.EOF
  With wdApp
    .Selection.TypeText Text:= rsTabl.Fields("Street").Value & vbTab
    .Selection.TypeText Text:= rsTabl.Fields("City").Value & vbTab
    .Selection.TypeText Text:= rsTabl.Fields("Zip").Value & vbCrLf
  End With
  rsTabl.MoveNext
Loop
set rsTabl = Nothing
set wdDoc = Nothing
set wdApp = Nothing

Ну вот как-то так... MyCriteria - значение Key1 по которому отбираются записи. Про BookMark я не понял к чему это

[Volodymyr]

Спасибо LittleFatCat и gluk_fm.
за предложенные варианты.

Сейчас попробую и напишу о результате.