Rows(1).AutoFit
Rows("1:2").AutoFit
Range("B1:C2").EntireRow.AutoFit
Help: автоформатирование ячейки
привет всем.
есть такая проблема. имеется Excel лист с таблицей. В некоторых ячейках введён текст, довольно длинный. Как можно задать программно свойство для выравнивания текста - перенос по словам? И есть ли какие-нибудь стандартные функции для подбора высоты ячейки, чтобы высота ячейки (понимай - строки) была оптимальна для текста, введённого в ячейке и не приходилось растягивать её руками.
заранее спасибо.
есть такая проблема. имеется Excel лист с таблицей. В некоторых ячейках введён текст, довольно длинный. Как можно задать программно свойство для выравнивания текста - перенос по словам? И есть ли какие-нибудь стандартные функции для подбора высоты ячейки, чтобы высота ячейки (понимай - строки) была оптимальна для текста, введённого в ячейке и не приходилось растягивать её руками.
заранее спасибо.
"перенос по словам" уже не нужен. нашёл сам %)
а вот как сделать программно установку высоты строки так, чтобы весь текст был виден - не знаю, так что не откажусь от совета или подсказки ))
а вот как сделать программно установку высоты строки так, чтобы весь текст был виден - не знаю, так что не откажусь от совета или подсказки ))
Это называется автоподбор высоты : меню Формат - пункт Строка - команда Автоподбор высоты
Но эта возможность не будет работать для строк, содержащих об'единённые ячейки и она не нужна, если Вы правильно установили перенос по словам.
Но эта возможность не будет работать для строк, содержащих об'единённые ячейки и она не нужна, если Вы правильно установили перенос по словам.
Код:
Цитата:
Originally posted by pashulka
Код:
Rows(1).AutoFit
Rows("1:2").AutoFit
Range("B1:C2").EntireRow.AutoFit
Rows("1:2").AutoFit
Range("B1:C2").EntireRow.AutoFit
Thanks great! всё работает %)