WrapText Property Example

This example formats cell B2 on Sheet1 so that the text wraps within the cell.

Worksheets("Sheet1").Range("B2").Value = _
    "This text should wrap in a cell."
Worksheets("Sheet1").Range("B2").WrapText = True