Работа со строками. - Microsoft Office Excel

tae1980 · 17.04.2009, 20:49

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

tae1980 · 17.04.2009, 21:35

Идея такая: вместо авто подбора высоты одной строки, определить сколько строк занимает текст и добавить необходимое количество строк. Будет проблема проблема с вертикальным объединением строк, но думаю ее можно будет решить.

pivas · 18.04.2009, 16:38

Может начать с этого:

Sub Макрос1()
[A1] = Len(ActiveCell) длина строки (кол-во средних знаков)
[A2] = Selection.ColumnWidth ширина столбца в средних знаках
If [A1] > 0 Then [A3] = Round([A1] / [A2] + 0.5, 0) необходимое кол-во строк
End Sub

17.04.2009, 20:49	#1
tae1980 Форумчанин Регистрация: 02.02.2009 Сообщений: 842	Работа со строками. В экселе есть проблема с авто подбором высоты объединенных ячеек. Можно узнать количество строк занимаемых текстом в ячейке? С уважением, Алексей.

17.04.2009, 21:35	#2
tae1980 Форумчанин Регистрация: 02.02.2009 Сообщений: 842	Идея такая: вместо авто подбора высоты одной строки, определить сколько строк занимает текст и добавить необходимое количество строк. Будет проблема проблема с вертикальным объединением строк, но думаю ее можно будет решить. С уважением, Алексей.

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Работа со строками	NightFire	Помощь студентам	4	22.03.2009 20:54
Работа со строками	eR-	Помощь студентам	2	23.02.2009 15:11
Работа с строками	Technolog	Microsoft Office Excel	2	17.12.2008 09:58
работа со строками	Milker-Monster	Помощь студентам	1	02.11.2008 21:32

18.04.2009, 16:38	#3
pivas Форумчанин Регистрация: 03.04.2009 Сообщений: 412	Может начать с этого: Sub Макрос1() [A1] = Len(ActiveCell) длина строки (кол-во средних знаков) [A2] = Selection.ColumnWidth ширина столбца в средних знаках If [A1] > 0 Then [A3] = Round([A1] / [A2] + 0.5, 0) необходимое кол-во строк End Sub