convert value to text vba

[Namratak]

hi, im trying to copy range C (which is referenced from another sheet) into range E and then convert it to text because I want to split column E into words later. the code just shows 0 output in the cells of E. can you pls help with the error. and what will be the formula for splitting it into words?

Sub ConvertToValues()
Dim MyRange As Range
Dim MyCell As Range

Range("C1:C20").Copy Destination:=Range("E1:E20")

Set MyRange = Range("E1:E20")
For Each MyCell In MyRange
If MyCell.HasFormula Then
MyCell.Formula = MyCell.Value
End If
Next MyCell
End Sub

 

[footoo]

Sub ConvertToValues()
[E1:E20] = [C1:C20].Value
End Sub

 

[Namratak]

this was so easy! im new to vba so thanks for helping out . appreciate it.