powered by simpleCommunicator - 2.0.55     © 2025 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Таблица в Word и объеденные ячейки
8 сообщений из 8, страница 1 из 1
Таблица в Word и объеденные ячейки
    #37085792
TpaBka
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Можно ли как ни будь подсчитать количество ячеек в последней (или конкретной) строке таблицы ворд,
если эта таблица имеет объединенные ячейки?

...
Рейтинг: 0 / 0
Таблица в Word и объеденные ячейки
    #37085794
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
TpaBka,

а в чем проблема?
Код: plaintext
1.
2.
3.
?thisdocument.Tables( 1 ).Rows( 1 ).Cells.Count
 2 
?thisdocument.Tables( 1 ).Rows( 2 ).Cells.Count
 3 
...
Рейтинг: 0 / 0
Таблица в Word и объеденные ячейки
    #37085797
TpaBka
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А если еще имеются и объеденные строки

...
Рейтинг: 0 / 0
Таблица в Word и объеденные ячейки
    #37085801
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
TpaBka,

Тогда уж нужно исходить из задачи, потому что в этом случае само понятие "строка" становится неактуальным.
...
Рейтинг: 0 / 0
Таблица в Word и объеденные ячейки
    #37085821
TpaBka
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Shocker.ProTpaBka,

Тогда уж нужно исходить из задачи, потому что в этом случае само понятие "строка" становится неактуальным.
Согласен
Задача в следующем заполняется шаблон в ворде записями из рекордсетов rs и rst

если у rs нет подчиненных записей в rst, то таблица имеет вид:

если у rs есть подчиненные записи в rst, то таблица имеет вид:


Так вот при добавлении новой записи в таблицу (это не цикл а событие нажатие кнопки ) Я добавляю новую строку в таблицу методом
Код: plaintext
DocWord.Tables( 1 ).Rows.Add
Строка добавляется автоматом с тем количеством ячеек которое имеется в последней строке
А дальше мне надо определить если в добавленной строке 2 ячейки, то надо 1 ячейку разбивать на 2
если в добавленной строке 3 ячейки, то все нормально и разбивать не надо
...
Рейтинг: 0 / 0
Таблица в Word и объеденные ячейки
    #37085847
TpaBka
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Решил свою проблему специфичным путем
Вариантов решения как оказалось много один из них это проверка рекордсетов
Но ответ на вопрос:
«Можно ли как ни будь подсчитать количество ячеек в последней (или конкретной) строке таблицы ворд,
если эта таблица имеет объединенные строки?»

Я так понимаю что ответ НЕТ
...
Рейтинг: 0 / 0
Таблица в Word и объеденные ячейки
    #37085917
TpaBka,
как вариант,
1) добавиь запись рекордсета как текст, выбрав какой-нибудь спецефический разделитель для полей;
2) преобразовать добавленный на первом шаге текст в таблицу.
...
Рейтинг: 0 / 0
Таблица в Word и объеденные ячейки
    #37085982
TpaBka
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
пробуй камнемTpaBka,
как вариант,
1) добавиь запись рекордсета как текст, выбрав какой-нибудь спецефический разделитель для полей;
2) преобразовать добавленный на первом шаге текст в таблицу.
Я сделал, что то на подобие Вашего варианта
Дело в том, что главные записи в моей таблице ворд нумеруются,
а подчиненные записи начинаются с *
Я просто проверяю:
Код: plaintext
1.
2.
If Val(Trim(DocWord.Tables( 1 ).Cell(DocWord.Tables( 1 ).Rows.Count- 1 ,  1 )))= 0  Then
разбиваю ячейку (там конечно есть ещё пару проверок)
End If
Но мне хотелось написать универсальную функцию без учета специфики таблицы
Вариант Эндрю тоже не плох, отлавливать и затем обрабатывать ошибку.
Короче всем спасибо!
...
Рейтинг: 0 / 0
8 сообщений из 8, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Таблица в Word и объеденные ячейки
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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