Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / word / 5 сообщений из 5, страница 1 из 1
10.11.2010, 09:59
    #36946342
vera_t
vera_t
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
word
Подскажите пожалуйста как узнать высоту строки таблицы в сантиметрах?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
10.11.2010, 10:00
    #36946345
vera_t
vera_t
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
word
в wordе
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
10.11.2010, 10:01
    #36946351
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
word
vera_t,

Код: plaintext
application.PointsToCentimeters
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
11.11.2010, 02:49
    #36948526
vera_t
vera_t
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
word
objword.PointsToCentimeters(wdTbl.Rows(1).Height) дает число 352777,8 на самом деле высота этой строки максимум 2 см.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
11.11.2010, 04:18
    #36948551
ZVI
ZVI
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
word
Код: plaintext
1.
2.
3.
4.
5.
6.
Sub Test()
  Dim objWord As Object, wdTbl As Object
  Set objWord = Application
  Set wdTbl = objWord.ActiveDocument.Tables( 1 )
  wdTbl.Rows( 1 ).HeightRule =  1    ' wdRowHeightAtLeast = 1
  Debug.Print objWord.PointsToCentimeters(wdTbl.Rows( 1 ).Height)
End Sub
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / word / 5 сообщений из 5, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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