Convert excel formula into macro

Hi,

I have three sheet from which I need to populate date difference in sheet "Occupy sheet" based on below logic. I have already used the formula. How can this be converted into macro. Note that the row can be inserted dynamically.

Also, for blank date, the formula display minus value. It should be blank

date difference in col K= col J- col G
date difference in col P= col O- col N
Col Q contain formula as colQ= "=IF(P2 <=0, "on time", "Delayed")"

Thanks PCI for your great help.

I am populating text "On time" and "Delayed" on column Q based on the data available in col P.

If column P is blank, is it possible to display blank in stead of "on time" in col Q. It means blank should be populated for P2, P4 etc.

--> "On time" should display it value less than or equal to zero

Originally Posted by sarat47

How can this be converted into macro.

Hi !

Easy to code just using the same Excel formulas but it depends on if you want formulas in cells or just their results ? …

Thank you for your support.
The macro is not working for second condition (col P= col O- col N) when new dates are added in the column "O".
Difference in date is showing blank for row 5,6 and 7 which I have added as a sample in attached sheet.

As a beginner starter for column Q :

PHP Code: 

Sub Demo1()
    With Sheet2.UsedRange.Rows
        With .Item("2:" & .Count).Columns
             With .Item(17)
                  .Formula = "=IF(O2>N2,""Delayed"","""")"
                  .Formula = .Value
             End With
        End With
    End With
End Sub 


Do you like it ? So thanks to click on bottom left star icon « ★ Add Reputation » !

Thanks PCI and Marc once again. Pci, Yes, if both column contain date, the macro should calculate days automatically for the second condition. The first condition is working perfectly. Only issue in 2nd one