vba - my code changes my number formatting to number, but I still get the exclamation saying number formatted as text.

[parkerbelt]

I have the following code that changes my number formatting to number, when it started as text, but after the program runs, I still have the exclamation point and the green box in the upper left corner of the cells that says numbers formatted as text. Is there a way to get that to stop happening? When I right click and check the number formatting after the program runs, it says that it is a number with zero decimal places, but I'm getting the message still.

Application.Calculation = xlManual
    Range("C26").Select
    Range(Selection, Selection.End(xlDown)).Select


    Selection.NumberFormat = "0"

 

[Joe4]

It is not enough simply change the cell format if they were entered as text. You need to re-enter the values.
Here is one way:

    Dim lastRow As Long
    lastRow = Range("C26").End(xlDown).Row
    Range("C26:C" & lastRow).NumberFormat = "0"
    [COLOR=#ff0000]Range("C26:C" & lastRow).Value = Range("C26:C" & lastRow).Value[/COLOR]

 

[Norie]

Another method would be to copy a blank cell and then do a paste special add.

Cells(Rows.Count, Columns.Count).Copy

Range("C26:C" & Range("C" & Rows.Count).End(xlUp).Row).PasteSpecial Operation:=xlPasteSpecialOperationAdd

 

[parkerbelt]

That worked! Thank you Sir!!

It is not enough simply change the cell format if they were entered as text. You need to re-enter the values.
Here is one way:

    Dim lastRow As Long
    lastRow = Range("C26").End(xlDown).Row
    Range("C26:C" & lastRow).NumberFormat = "0"
    [COLOR=#ff0000]Range("C26:C" & lastRow).Value = Range("C26:C" & lastRow).Value[/COLOR]

 

[Joe4]

You are welcome!