BOLT
Сообщения: n/a
|
Профиль
| Цитировать
Раз эта тема хоть кого-то заинтересовала, то отвечаю сам себе. За последний год я до мелочей отработал технологию анкетирования. Это самозаполняемые анкеты. Формой для ввода и контейнером содержащим данные пользователя является файл Word.
Можно использовать 2 конструкции: Элементы управления и Поля.
В первом случае обработка идёт так:
Dim iShape As Object
For Each iShape In myDoc.InlineShapes ' Начали обрабатывать элементы управления
If iShape.Type = wdInlineShapeOLEControlObject Then ' это элемень управления, а не какая-нибудь там картинка
intA = iShape.OLEFormat.Object.Value
End If
Next iShape
Во втором случае
Dim fldAnswer As FormField
For Each fldAnswer In myDoc.FormFields 'Начали обрабатывать поля
intB = fldAnswer.Result
Next fldAnswer
У первого способа много недостатков. Если нужны пояснения - пишите. Я на этом собаку съел.
|
Отправлено: 10:56, 08-09-2003
| #3
|