How to convert text to number in cells?

[ermeko]

Hi,
I want to convert text into number but the code below do nothing:
ActiveSheet.Cells(1, 1).NumberFormat = "##0.0" 'or the code below
ActiveSheet.Cells(1, 1).value = format(ActiveSheet.Cells(1, 1).value,"##0.0")
What is the problem?
Since it is accepted as text I can not use
ActiveSheet.Cells(1, 3).formula = "=sum(a1:a2)"

 

[Jan Kronsell]

Try

ActiveSheet.Cells(1, 1).value = ActiveSheet.Cells(1, 1).value * 1

Jan

 

[ermeko]

Thanks,
Jan thanks. it does the job. Thank again

 

[Alok]

One good method of converting text formatted numbers into numbers is the
following.
1. Type a 1 in any unused cell.
2. Copy the cell with the 1
3. Highlight the text formatted numbers
4. Edit/Paste Special/Multiply
Hope this helps.

Alok Joshi

 

[Zack Barresse]

Also, Text to Columns works well. And www.asap-utilities.com has a great
feature for this.