Обтекание текста VBA

В этом руководстве вы узнаете, как включить или отключить перенос текста в Excel с помощью VBA.

Перенос текста с помощью VBA

Вы переносите текст в ячейку или диапазон, устанавливая для свойства Range.WrapText объекта Range значение True. Следующий код переносит текст в ячейку A1:

1	Листы ("Лист1"). Диапазон ("A1"). WrapText = True

Результат:

Вы также можете обернуть больший диапазон ячеек:

1	Диапазон ("A1: A10"). WrapText = True

Отключение переноса в ячейку с помощью VBA

Вы можете отключить перенос текста в определенной ячейке или диапазоне с помощью VBA. Следующий код отключит перенос текста в ячейке B2:

1	Диапазон ("B2"). WrapText = False

Отключение переноса на весь рабочий лист

Вы можете отключить перенос текста во все ячейки на листе с помощью VBA. Следующий код позволит вам отключить перенос текста во всех ячейках ActiveSheet:

12345

Sub DisableWrapText ()Cells.WrapText = FalseКонец подписки