Date and values

Hi Hank,

here's 1 way to fix it.

 As always with VBA, back up your workbook! There is no 'Undo' with these scripts.

Open up the VB editor and add a module.

Sub conditional_replace()

start_row = 1

    For i = start_row To ActiveSheet.Cells(ActiveSheet.Rows.Count, "o").End(xlUp).Row
        If ActiveSheet.Range("o" & i).Value <> "" Then
            ActiveSheet.Range("o" & i).Value = ActiveSheet.Range("o" & i).Value
        End If
    
    Next

End Sub

Add this code, save and then from the developer tab click Insert, pick the button, draw a button where you want it and then pick conditional_replace from the options. Each time you press the button it will run down column 'o' and replace all the cells that have something in it with just value.

The only problem with this I can see is that if you miss a day your formula will go back to the 'false' result.