Changing Text into Numbers, using VBA

[Guest]

When importing from a FoxPro database, all the charactors come over as text. When I try to sum these numbers, it will not sum because excel thinks they are text. Isn't there a way to convert all these to numbers through vba?

 

[Frank Kabel]

Hi
one way (non-VBA):
select and empty cell and copy it
- select your imported values
- goto 'Edit - Paste Special' and choose 'Add'

 

[Guest]

No offence Frank, but all the advice I have gotten from you has been shall we say lame. There is 20 ways to manually do the text to numbers thing, I can do that. I am looking to do it with vba so I don't have to do it manually. Thanks anyway

----- Frank Kabel wrote: ----

H
one way (non-VBA)
select and empty cell and copy i
- select your imported value
- goto 'Edit - Paste Special' and choose 'Add

--
Regard
Frank Kabe
Frankfurt, German


Cecil wrote

 

[Vasant Nanavati]

Cecil, for a person looking for help your attitude has has been rather shall
we say lame?

--

Vasant

No offence Frank, but all the advice I have gotten from you has been shall

we say lame. There is 20 ways to manually do the text to numbers thing, I
can do that. I am looking to do it with vba so I don't have to do it
manually. Thanks anyway.

 

[mudraker]

Sub ffff()
Dim C As Range
For Each C In Range("c1:c10")
C.NumberFormat = "0"
C.Value = C.Value
Next
End Su

 

[Frank Kabel]

So
try something like
sub foo()
dim rng as range
dim cell as range
set rng = selection
for each cell in rng
if cell.value<>""
cell.numberformat="General"
cell.value=cell.value
end if
next
end sub