Вы не вошли. Пожалуйста, войдите или зарегистрируйтесь.
Страницы 1
Чтобы отправить ответ, вы должны войти или зарегистрироваться
Файл с несколькими таблицами, таблицы разорваны и имеют разное форматирование с объединенными ячейками. Как перейти к последней строке последней таблицы в документе, или допустим к строке №3 последней таблицы?
Файл с несколькими таблицами, таблицы разорваны и имеют разное форматирование с объединенными ячейками. Как перейти к последней строке последней таблицы в документе, или допустим к строке №3 последней таблицы?
Попробуйте такой VBA-код:
Sub GotoLastRowOfLastTable()
Dim tbl As Table
Dim tbl_cnt As Long
tbl_cnt = ActiveDocument.Tables.Count
If tbl_cnt > 0 Then
Set tbl = ActiveDocument.Tables(tbl_cnt)
tbl.Rows(tbl.Rows.Count).Cells(1).Select
End If
End Sub... или допустим к строке №3 последней таблицы?
Например, так:
Sub GotoThirdRowOfLastTable()
Dim tbl As Table
Dim tbl_cnt As Long
Dim tbl_rows_cnt As Long
tbl_cnt = ActiveDocument.Tables.Count
If tbl_cnt > 0 Then
Set tbl = ActiveDocument.Tables(tbl_cnt)
tbl_rows_cnt = tbl.Rows.Count
If tbl_rows_cnt >= 3 Then
tbl.Rows(3).Cells(1).Select
End If
End If
End Subв первом случае выдает ошибку
tbl.Rows(tbl.Rows.Count).Cells(1).Select
во втором
tbl.Rows(3).Cells(1).Select
в первом случае выдает ошибку
tbl.Rows(tbl.Rows.Count).Cells(1).Selectво втором
tbl.Rows(3).Cells(1).Select
Выложите, пжл, ваш документ. Пример документа, на котором я проверял код - во вложении.
Страницы 1
Чтобы отправить ответ, вы должны войти или зарегистрироваться
Найти последнюю строку таблицы в документе word
Работа в Microcoft Word чем-то напоминает езду по дорогам нашей страны. Можно ехать по главным трассам с указателями и добраться, в конце концов, до нужного места, а можно значительно сократить путь, выбрав оптимальный маршрут. Наш сайт о Microsoft Office Word даст ответ про: чем форматировать файлы rtf в pdf. Но тут не обойтись без подсказок опытного человека, знающего, где лучше свернуть и по какой дороге поехать. Наш сайт о Microsoft Office Word даст ответ про: как защитить документ word 2003 от печати. Для работы с программой таким штурманом вам послужит форум сайта Ворд Эксперт.
Основное внимание на форуме уделено автоматизации. Наш сайт о Microsoft Office Word даст ответ про: могу ли я обновить офис с 2007 на 2010 бесплатно. Здесь вы освоите написание макросов и шаблонов, разберетесь с настройками версий, сможете получить дельный совет или позаимствовать готовое решение. На портале о Microsoft Office Word вы узнаете про: где находится в формате автоформат. Если у вас нет времени самому разбираться с какой-то проблемой, можно подать заявку, участники сделают это для вас. На портале о Microsoft Office Word вы узнаете про: как в word писать в бланке поверх черты.