Всем привет!
Напимер, есть несколько ячеек объединенных по горизонтали.
Скажите, пожалуйста, как автоматически изменять высоту такой объединенной ячейки так, что бы на екране был виден весь введенный в нее текст?

Высота ячейки - автоматически.
А вообще неплохо указывать хотя бы приложение, о котором речь. Не говоря уж о версии.

Да, совсем забыл
Это Excel2000.

Если просто установить автоматическое изменение высоты для объединенной ячейки, то это не дает никах результатов...
Пробывал для этой ячейки, в событии на ее изменение, ставить свойство AutoFit = True, тогда высота ячейки сжимается до высоты одной строки, а не так что бы был виден весь введенный в нее текст.

Это сообщение отредактировал(а) Fon - 13.7.2005, 13:39

В Excel не существует высоты ячейки - только высота строки.

сначала объединяешь ячейки,
потом формат ячейки->Выравнивание
по горизонтали = по значению
по вертикали = по нижнему краю
и ставиш галочку "переносить по словам"

Цитата

и ставиш галочку "переносить по словам"

Обязательно.Только ,если текст вставляетсяпрограммно этого не достаточно.AutoFit - понадобиться

Пробовал все , что было указано выше - не работает с объединенными ячейками (ни со строками, ни со столбцами)!
такая проблема возникает у многих, вот попробуй через VBA код:
(подбор высоты исходя из количества символов Chr(10) в строке)

Sub TestX()
Dim rng As Range
Dim intI As Integer
Dim intCount As Integer
Dim varText As Variant
Dim strChar As String * 1
Dim intPos As Integer
Dim lngFontSize As Integer

Set rng = Selection

varText = rng.Value
lngFontSize = rng.Font.Size

intCount = 0

For intI = 1 To Len(varText)
strChar = Mid$(varText, intI, 1)
intPos = InStr(1, Chr(10), strChar)

If intPos > 0 Then
intCount = intCount + 1
End If
Next

rng.RowHeight = (intCount + 1) * 1.25 * lngFontSize
End Sub

У меня такой случай возникал
Columns("B:C").AutoFit
А в формате поставила галочку переносить по словам.
Когда текст программно вставлялся все работало как надо

Старуха! Привет! Ты не поверишь, но я увлекся Exel...

Привет Vlad честно сказать ...не знаю что сказать.Здорово!!! Только пока ты сканер изучал я ушла далеко.Попробуй догони