How to wrap text from excel spreadsheet by VB.

I want to use multiline of spreadsheet in Vb but i try Chr(13) + Chr(10) and


Selection.ColumnWidth = 30
With Selection
.HorizontalAlignment = xlGeneral
.VerticalAlignment = xlBottom
.WrapText = True '!!!!!!!!!!!!!!!!!!!!!
.Orientation = 0
End Width

it not work because spreadsheet is not have property "WrapText".
Any idea ???

Start Macro recording.
Do what you want to do manually
Stop macro recording
Edit the macro and see how to do it.