Консультация № 176150
19.01.2010, 23:46
0.00 руб.
0 8 0
Уважаемые эксперты подскажите в следующем, выполняя строки кода:
Толщина = ActiveDocument.Tables(1).Rows(1).Borders(wdBorderBottom).LineWidth

Толщина = 71349775, что это за цифры, странно для толщины линии, как узнать толщину линии таблицы?

Также подскажите, почему я устанавливаю толщину линии:
ActiveDocument.Tables(1).Rows(1).Borders(wdBorderTop).LineWidth = wdLineWidth330pt 'верхнюю линию таблицы ... строки ... сделать толщиной ...
Затем ради любопытства делаю проверку:
If ActiveDocument.Tables(1).Rows(1).Borders(wdBorderTop).LineWidth <> wdLineWidth330pt Then Beep
И она получается положительной, почему???
Спасибо Эндрю

Обсуждение

давно
Профессор
230118
3054
23.01.2010, 21:50
общий
Ципихович Эндрю:
wdLineWidth330pt Не существует.
Неизвестный
24.01.2010, 12:58
общий
Гаряка Асмик:
Толщина = 71349775, что это за цифры, странно для толщины линии, как узнать толщину линии таблицы
По этому поводу: wdLineWidth330pt Не существует, какие существуют, как правильно устанавливать толщину линии
Бред какой то почему ВБА пропустил, не ругался???
давно
Профессор
230118
3054
24.01.2010, 13:15
общий
Ципихович Эндрю:
Вероятно, у таблицы граница не проведена. В таком случае выражение толщины линии не определено.
Неизвестный
24.01.2010, 14:06
общий
Гаряка Асмик:
Толщина = 71349775, что это за цифры, странно для толщины линии, как узнать толщину линии таблицы???
давно
Профессор
230118
3054
24.01.2010, 14:17
общий
Ципихович Эндрю:
А линия существует?
давно
Профессор
230118
3054
24.01.2010, 14:22
общий
Ципихович Эндрю:
Это число говорит, что линия не проведена, значит толщина неопределена.
Неизвестный
26.01.2010, 19:07
общий
Гаряка Асмик:
Вы говорите:Это число говорит, что линия не проведена, значит толщина неопределена
И всегда в таких случаях будет это число???
Линия то в таблице есть, только может это важно, таблица в документе с книжной расскладкой и её ширина 21, 2 то есть более страницы, Вам это что то объясняет???
давно
Профессор
230118
3054
26.01.2010, 22:05
общий
Ципихович Эндрю:
Существует wdLineWidth300pt, а на wdLineWidth330pt у меня дает ошибку. Да и на сайте Microsoft подобной величины нет.
Форма ответа