In the following code:

Public Sub SheetCalculate()
' Constants and Variables:
Dim iCalc_Work As Integer

'Code:
' Total 4 SVS months cells and put out a message if
12
iCalc_Work = Range("E20") + Range("E21") + Range
("E22") + Range("E23")
If iCalc_Work 12 Then MsgBox "Total of SVS phase
months must be between 1 and 12"
End Sub

The same MsgBox displays a total of 5 times. What is
triggering the repeated ctin and how do I set it to 1
occurrence?

Thansks