Reformatting a cell using VBA

  • Thread starter Thread starter timtm
  • Start date Start date
T

timtm

I have a template spreadsheet that does a number of things using VBA.
One of the columns in the spreadsheet is formatted as Number with
decimal places. The problem that I am having is the user copies dat
from another spreadsheet which does not have the same format. When th
data is pasted into the template spreadsheet the column/cell has th
Number stored as Text Error. How would I fix this error via VBA befor
saving the file? In other words, how can I reformat the column back t
Number with 8 decimal places? I currently have the following, but i
does not change all of the cells (some are still stord as text).

Columns("J:K").Select
Selection.NumberFormat = "0.00000000"

Thanks
 
Hi
try the following:
with range("J1:K1000")
.NumberFormat = "0.00000000"
.value=.value
end with
 
That did it. I changed it a bit to do the entire column. Thanks
lot.

with range("J:K")
.NumberFormat = "0.00000000"
.value=.value
end wit
 
Back
Top