Съдържание
В този урок ще научите как да активирате или деактивирате Wrap Text в Excel с помощта на VBA.
Опаковане на текст с помощта на VBA
Увивате текста в клетка или диапазон, като зададете свойството Range.WrapText на обекта Range на True. Следният код ще увие текста в клетка A1:
1 | Работни листове ("Sheet1"). Диапазон ("A1"). WrapText = Вярно |
Резултатът е:
Можете също да увиете по -голям диапазон от клетки:
1 | Диапазон ("A1: A10"). WrapText = Вярно |
Деактивиране на опаковането в клетка с помощта на VBA
Можете да деактивирате опаковането на текст в определена клетка или диапазон с помощта на VBA. Следният код ще деактивира опаковането на текст в клетка В2:
1 | Диапазон ("B2"). WrapText = Неверно |
Деактивиране на опаковането в цял работен лист
Можете да деактивирате опаковането на текст във всички клетки на работен лист с помощта на VBA. Следният код ще ви позволи да деактивирате обвиването на текст във всички клетки в ActiveSheet:
12345 | Sub DisableWrapText ()Cells.WrapText = FalseEnd Sub |