Hello Raj74,

Here is the VBA code need to trigger calculation of the formulae in the cells...
Private Worksheet_Open()
   Range("D1:D40").Calculate
End Sub
Sincerely,
Leith Ross