Hi all

Can anyone help

What I want is a before save event to check if Cells G55:P55 sum -1 to 1 on Group Reporting Worksheet. If it doesnt I want it to display the msgbox.

Am getting a complie error on this, I'm sure I'm close but cant get it to work.

Here is what I am using......


Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)

    Select Case WorksheetFormula("Group Reporting").Sum(Range("G55:P55").Value)
    
    Case -1 To 1

    Case Else

    MsgBox "Note: Variance in Page 1 Cell G59"

    End Select
                  
End Sub
Thanks in advance for any help.
Cheers