Обращение к автоматической нумерации таблицы - Microsoft Office Word

Елена Гох · 26.06.2010, 16:15

Помогите, пожалуйста! Нужно перекачать таблицу из Word-документа в БД. Все столбцы проходят нормально, кроме столбца с автоматической нумерацией строк. Оттуда ничего не забирается, кроме символа табулятора. А очень нужно, количество строк измеряется тысячами, таблица разбита по нескольким документам. Заранее благодарю.

viter.alex · 26.06.2010, 18:01

Как сделана нумерация? Списком или полем SEQ. Если списком, то перед передачей в базу нужно преобразовать номера в текст, что-то вроде этого:

Код:

ActiveDocument.Tables(1).Columns(1).Select
Selection.Range.ListFormat.ConvertNumbersToText

Если полем, то нужно поля удалить: Fields.Unlink

Елена Гох · 26.06.2010, 19:25

Спасибо! Идея ясна. Продолжить изыскания сейчас не могу - снесла стулом флешку с файлом-заданием. Работу продолжу - сообщу.

Елена Гох · 29.06.2010, 01:44

Спасибо, вышло, был автоматический список. Только не поняла, где-там слева кликнуть благодарность?

Sasha_Smirnov · 28.10.2015, 12:37

Цитата:

Сообщение от Елена Гох

Только не поняла, где-там слева кликнуть благодарность?

Я целый год этого не понимал! Весы похожи на кустик черники или брусники.

26.06.2010, 16:15	#1
Елена Гох Пользователь Регистрация: 26.06.2010 Сообщений: 36	Обращение к автоматической нумерации таблицы Помогите, пожалуйста! Нужно перекачать таблицу из Word-документа в БД. Все столбцы проходят нормально, кроме столбца с автоматической нумерацией строк. Оттуда ничего не забирается, кроме символа табулятора. А очень нужно, количество строк измеряется тысячами, таблица разбита по нескольким документам. Заранее благодарю.

26.06.2010, 18:01	#2
viter.alex Балуюсь кодами Участник клуба Регистрация: 09.01.2009 Сообщений: 1,837	Как сделана нумерация? Списком или полем SEQ. Если списком, то перед передачей в базу нужно преобразовать номера в текст, что-то вроде этого: Код: `ActiveDocument.Tables(1).Columns(1).Select Selection.Range.ListFormat.ConvertNumbersToText` Если полем, то нужно поля удалить: Fields.Unlink Лучше день потерять — потом за пять минут долететь!©

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
обращение к элементу таблицы в WebBrowser	nikola86	Общие вопросы Delphi	13	14.11.2009 00:55
Автоматизация нумерации. Просто? Так поясните же мне!!	enRai	Помощь студентам	3	23.07.2009 07:55
Восстановление нумерации страниц...	Busine2009	Microsoft Office Word	0	07.06.2009 19:01
Скрипт для автоматической регистрации в каталогах	Anton62	PHP	0	12.05.2009 01:25

26.06.2010, 19:25	#3
Елена Гох Пользователь Регистрация: 26.06.2010 Сообщений: 36	Спасибо! Идея ясна. Продолжить изыскания сейчас не могу - снесла стулом флешку с файлом-заданием. Работу продолжу - сообщу.

29.06.2010, 01:44	#4
Елена Гох Пользователь Регистрация: 26.06.2010 Сообщений: 36	Спасибо, вышло, был автоматический список. Только не поняла, где-там слева кликнуть благодарность?