Как заполнить Combobox в документе Word из программы, написанной на VBA-Access

@nalivajkin · Регистрация: 17.01.2013

При работе с VBA на Аксцессе столкнулся с ситуацией (думаю, не я один).
Приходится формировать документы типа Ексель-Ворд из данных, хранящихся в Базе.
При этом синтаксис ВБА для всех трех составляющих явно отличается.

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

Подскажите (напишите), кто знает - как написать код правильно,
потому как мне не удалось найти это на форумах или в букварях

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

~~dev.Free~~ · 21.06.2013, 16:37

@nalivajkin,

1. Создайте сначала таблицу с данными в Access, чтобы было чего передавать в Word.
2. Создайте шаблон документа Word чтобы было куда передавать данные.
3. Создайте форму в MS Access чтобы было откуда передавать данные.
4. Когда сделаете это выложите файл еще раз с замечаниями выше.

@nalivajkin · 21.06.2013, 17:09 **[ТС]**

Спасибо за ответ. Но это не совсем то...
во-первых, ИМХО - без шаблона создать документ вполне реально.
во-вторых - считаем, что таблица аксцессная уже есть
(я действительно собираюсь вводить в комбобокс поля из справочной таблицы для последующего их выбора)

МЕНЯ интересует СИНТАКСИС!!!!

давайте считать, что в поле выбора выводятся ТРИ строки,
со значениями "РАЗ, "ДВА", ТРИ"

КАК ЭТО НАПИСАТЬ в аксцессном ВБА, чтобы отобразилось в Вордовском документе??

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

все, что я не могу понять - так это именно синтаксис - как написать заполнение полей....
попытка ипользовать макрос из ворда или additem не дали желаемого результата.
я понимаю, что кручусь где-то рядом.. но не могу попасть )))

Добавлено через 3 минуты
)) Вот, например, макрос чисто из ворда

Visual Basic

    Selection.Range.ContentControls.Add (wdContentControlComboBox)
    Selection.ParentContentControl.DropdownListEntries.Clear
    Selection.ParentContentControl.DropdownListEntries.Add Text:="АДЫН", Value :=""
    Selection.ParentContentControl.DropdownListEntries.Add Text:="ТФА", Value :="ТФА"
    Selection.ParentContentControl.DropdownListEntries.Add Text:="ТЛИ !!!!",  Value:="ТЛИ !!!!"

Добавлено через 55 секунд
хотелось бы увидеть что-нибудь аналогичное. НО ЧТОБЫ вба аксцессный не ругался

~~dev.Free~~ Заблокирован
	21.06.2013, 16:37	2
	@nalivajkin, 1. Создайте сначала таблицу с данными в Access, чтобы было чего передавать в Word. 2. Создайте шаблон документа Word чтобы было куда передавать данные. 3. Создайте форму в MS Access чтобы было откуда передавать данные. 4. Когда сделаете это выложите файл еще раз с замечаниями выше. 0

Опции темы