powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Word vs Текст
9 сообщений из 9, страница 1 из 1
Word vs Текст
    #34393046
For Peace
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Уважаемые коллеги, посоветуйте пожалуйста наиболее скоростной способ выдерки текста из wordовского документа.

Мой метод не очень быстрый:
1.Открываю документ через objword=CreateObject("word.application")
2. Преобразовываю все таблицы в текст
3. Удаляю графические все объекты
4. Выделяю весь текст в буфер обмена.

Есть ли способ изначально вогнать в буфер обмена ПРОСТО текстовое содержание документа word в буфер обмена - без всякого форматирования, графики и таблиц?
...
Рейтинг: 0 / 0
Word vs Текст
    #34393235
AleksMed
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Вот с преобразование таблиц не знаю, а остальное можно забрать так (код VBA-ый):
Код: plaintext
g = ActiveDocument.Range( 1 , ActiveDocument.Characters.Count).Text
...
Рейтинг: 0 / 0
Word vs Текст
    #34393812
For Peace
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Спасибо AleksMed

g = ActiveDocument.Range(1, ActiveDocument.Characters.Count).Text

у нас это так?

g=oword.activedocument.range(1,ActiveDocument.Characters.Count).text

фокса под рукой нету ( чтобы проверить.
...
Рейтинг: 0 / 0
Word vs Текст
    #34393847
AleksMed
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ну в скобках то тож oword добавь:
Код: plaintext
g=oword.activedocument.range( 1 ,oword.ActiveDocument.Characters.Count).text
...
Рейтинг: 0 / 0
Word vs Текст
    #34394006
For Peace
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А есть еще советы по данному вопросу?

Очень нужна быстрота обработки (((
...
Рейтинг: 0 / 0
Word vs Текст
    #34394058
Фотография Marat C
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А что если преобразовывать все таблицы в текст с помошью:

COPY TO FileName TYPE SDF

Потом:

_cliptext="С:\FileName"
...
Рейтинг: 0 / 0
Word vs Текст
    #34394203
Фотография Marat C
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Marat CА что если преобразовывать все таблицы в текст с помошью:

COPY TO FileName TYPE SDF

Потом:

_cliptext="С:\FileName"

Упс... меня слово таблицы попутало. По всеи видимости речь идет об Word Table...
...
Рейтинг: 0 / 0
Word vs Текст
    #34394227
AleksMed
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
For PeaceА есть еще советы по данному вопросу?

Очень нужна быстрота обработки (((
Можно ещё попробовать сохранить файл как обычный текст и уже его юзать.
...
Рейтинг: 0 / 0
Word vs Текст
    #34394803
For Peace
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Я так и делаю..
преобразовываю таблицы в текст и сохраняю в формате текст

но ооооочень долго это делается
...
Рейтинг: 0 / 0
9 сообщений из 9, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Word vs Текст
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]