Hvernig á að vefja texta í skara fram úr

hvernig á að vefja texta í skara fram úr

' On the Home tab, in the Alignment group, click Wrap Text (Alt + H + W)
' In VBA:
Worksheets("Sheet1").Range("B2").Value =  "This text should wrap in a cell." 
Worksheets("Sheet1").Range("B2").WrapText = True