'VBA routine to force the workbook to recalculate:

Sub ForceCalc(Optional Full As Boolean)
    With Application
        .Calculation = xlCalculationManual
        .Calculation = xlCalculationAutomatic
        If Full Then .CalculateFull
    End With
End Sub