Вписанный текст

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
kminas
Бывалый
Бывалый
 
Сообщения: 234
Зарегистрирован: 31.10.2005 (Пн) 20:17
Откуда: Ростов-на-Дону

Вписанный текст

Сообщение kminas » 15.02.2006 (Ср) 0:33

Как средствами VB(A) вписать текст в ячейку таблицы в Worde?
Константин

Info_m.be_free
Продвинутый пользователь
Продвинутый пользователь
Аватара пользователя
 
Сообщения: 154
Зарегистрирован: 27.02.2003 (Чт) 21:38
Откуда: Ирпень

Сообщение Info_m.be_free » 15.02.2006 (Ср) 2:33

Опять не знаю отвечать или нет... я дам два неправильных варианта - выбирай правильный-
a) - вставить в таблицу какую -нибудь фигню и заменить её
б) - найти ту страничку которая описывает какие буковки ворд понимает как таблицы формулы итд форматирование - и действовать на основании этого.

*в)- скрытый ответ может вписывать в другое место, сристал например?
__________________________________________________
Я хороший , просто мало ем.

$€rg
Обычный пользователь
Обычный пользователь
 
Сообщения: 99
Зарегистрирован: 11.01.2006 (Ср) 10:15
Откуда: Санкт-Петербург

Сообщение $€rg » 15.02.2006 (Ср) 8:35

в VBA
Код: Выделить всё
With ActiveDocument.Tables(1)
   .Cell(1, 1).Range.Text = "мой текст"
   End With

kminas
Бывалый
Бывалый
 
Сообщения: 234
Зарегистрирован: 31.10.2005 (Пн) 20:17
Откуда: Ростов-на-Дону

Сообщение kminas » 15.02.2006 (Ср) 19:49

Я неправильно сформулировал вопрос. Мне надо, не вставить текст, а чтобы текст вписался в имеющуюся таблицу и не раздвинул ячейку ни вниз, ни вбок, т.е. немного сжался (если в ячейке больше единиц, то все нормально, а если широкие цифры и их на две больше, не влезает), ну то, что называют вписанный текст.
Константин

$€rg
Обычный пользователь
Обычный пользователь
 
Сообщения: 99
Зарегистрирован: 11.01.2006 (Ср) 10:15
Откуда: Санкт-Петербург

Сообщение $€rg » 16.02.2006 (Чт) 9:18

сервис-макрос-начать запись
Код: Выделить всё
Cell(1, 1).FitText = True

kminas
Бывалый
Бывалый
 
Сообщения: 234
Зарегистрирован: 31.10.2005 (Пн) 20:17
Откуда: Ростов-на-Дону

Сообщение kminas » 16.02.2006 (Чт) 22:57

Я неправильно сформулировал вопрос. Мне надо, чтобы текст вписался в имеющуюся таблицу и не раздвинул ячейку ни вниз, ни вбок, т.е. немного сжался (если в ячейке больше единиц, то все нормально, а если широкие цифры и их на две больше, не влезает).
Константин

Twister
Теоретик
Теоретик
Аватара пользователя
 
Сообщения: 2251
Зарегистрирован: 28.06.2005 (Вт) 12:32
Откуда: Алматы

Сообщение Twister » 17.02.2006 (Пт) 8:36

Формат ячеек->Выравнивание->Автоподбор ширины
... И размер шрифта текста в ячейках будет уменьшаться до размера ячеек...
А я все практикую лечение травами...

$€rg
Обычный пользователь
Обычный пользователь
 
Сообщения: 99
Зарегистрирован: 11.01.2006 (Ср) 10:15
Откуда: Санкт-Петербург

Сообщение $€rg » 17.02.2006 (Пт) 9:36

Стесняюсь спросить, а fittext чем не угодил?

Twister
Теоретик
Теоретик
Аватара пользователя
 
Сообщения: 2251
Зарегистрирован: 28.06.2005 (Вт) 12:32
Откуда: Алматы

Сообщение Twister » 17.02.2006 (Пт) 9:48

Думаю автору следует почитать ответы повнимательнее, а модерам - закрыть тему...
А я все практикую лечение травами...

kminas
Бывалый
Бывалый
 
Сообщения: 234
Зарегистрирован: 31.10.2005 (Пн) 20:17
Откуда: Ростов-на-Дону

Сообщение kminas » 18.02.2006 (Сб) 13:10

Twister
Формат ячеек->Выравнивание->Автоподбор ширины
это по-моему Excel, но и в Word-e плоховато получается. Вписанный текст - это текст, который полностью вписывается в ширину ячейки и, если, текста мало, то он растягивается, а, если много, то он сжимается. Мне же надо только последнее, т.е., если текст нормальный, то он должен и писаться нормально, а, если не умещается в ячейку, только тогда должен сжиматься. Я, видимо попробую сделать макрос не на вписание текста, а на вставку в сжатом виде. Ну и пусть он будет короче, чем ячейка.
Константин


Вернуться в Visual Basic 1–6

Кто сейчас на конференции

Сейчас этот форум просматривают: Yandex-бот и гости: 89

    TopList