21.09.2018, 04:14 [+3 UTC]
в нашей команде: 2 971 чел. | участники онлайн: 0 (рекорд: 21)

:: РЕГИСТРАЦИЯ

:: задать вопрос

:: все разделы

:: правила

:: новости

:: участники

:: доска почёта

:: форум

:: блоги

:: поиск

:: статистика

:: наш журнал

:: наши встречи

:: наша галерея

:: отзывы о нас

:: поддержка

:: руководство

Версия системы:
7.50 (13.09.2018)

Общие новости:
13.04.2018, 10:33

Форум:
18.09.2018, 08:51

Последний вопрос:
20.09.2018, 17:55

Последний ответ:
20.09.2018, 18:34

Последняя рассылка:
20.09.2018, 20:45

Писем в очереди:
0

Мы в соцсетях:

Наша кнопка:

RFpro.ru - здесь вам помогут!

Отзывы о нас:
21.10.2016, 17:11 »
GDragon
Спасибо огромное, за бысрый ответ! Вы мне очень помогли! [вопрос № 189908, ответ № 274173]

РАЗДЕЛ • Basic

Создание программ на языке Basic.

[администратор рассылки: Андреенков Владимир (Академик)]

Лучшие эксперты в этом разделе

Sergey V. Gornostaev
Статус: Специалист
Рейтинг: 32
Megaloman
Статус: Академик
Рейтинг: 21
solowey
Статус: Студент
Рейтинг: 19

Перейти к консультации №:
 

Консультация онлайн # 140086
Раздел: • Basic
Автор вопроса: Соколов В.В.
Отправлена: 16.07.2008, 10:50
Поступило ответов: 1

Добрый день эксперты. Вопрос такой. Надо создать программу для Word. Автозаполнитель. Есть 4 шаблона документов. В форме программы вводятся данные, а потом происходит автозаполнение документов. Вопрос в том, как в Word'е cделать грамотно поля, которые могут изменятся через эту программу?

Состояние: Консультация закрыта

Ответ # 226062 от Денисов Сергей Иванович

Здравствуйте, Соколов В.В.!
В документе Word расставить закладки в нужных местах (Вставка/Закладка), а потом расставить по закладкам нужные данные
Вот примерный код для VBA Excell:

Приложение:


Консультировал: Денисов Сергей Иванович
Дата отправки: 16.07.2008, 11:03

Рейтинг ответа:

0

[подробно]

Сообщение
модераторам

Отправлять сообщения
модераторам могут
только участники портала.
ВОЙТИ НА ПОРТАЛ »
регистрация »

Мини-форум консультации № 140086

Посетитель

ID: 218144

# 1

= общий = | 16.07.2008, 11:25 | цитировать цитировать  | профиль профиль  |  отправить письмо в личную почту пейджер

Ругается... на Dim WS As Worksheet. А ввод данных через переменную Stroka? У меня получается в тексте около 25 закладок, некотрые с разными названиями, некотрые нет. Как контролировать в какую закладку вставить нужнвй текст? Я предполагаю писать текст textbox`ах.


Посетитель

ID: 20489

# 2

= общий = | 17.07.2008, 15:00 | цитировать цитировать  | профиль профиль  |  отправить письмо в личную почту пейджер

Здравствуйте Соколов В.В.
Предложенный Сергеем Ивановичем код предпологает заполнение документа Word данными с листа Excel,
и потому "Ругается... на Dim WS As...", отсутствие подключеной библиотеки.
При заполнении документа данными из формы объявлять и использовать эту переменную нет необходимости
данные будут не с ячеек листа (WS.Cells(19, 2).Value), а из контролов формы например:
Dim s AS String
s = Me.Text1.Text

Если "около 25 закладок" то удобнее задавать им и контролам формы последовательные имена например:
Label10, Label11,....
Text10, Text11...

И тогда можно будет организовать подобный цикл заполнения:

For i = 10 To 35
s = Me("Text" & i ).Text
Call PrintToBookmark("Label" & i , s, x)
Next

Евгений.


Посетитель

ID: 17892

# 3

= общий = | 22.07.2008, 10:44 | цитировать цитировать  | профиль профиль  |  отправить письмо в личную почту пейджер

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

 

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

Яндекс Rambler's Top100

главная страница | поддержка | задать вопрос

Время генерирования страницы: 0.14074 сек.

© 2001-2018, Портал RFPRO.RU, Россия
Калашников О.А.  |  Гладенюк А.Г.
Версия системы: 7.50 от 13.09.2018