Getting a range of cells to trigger a pop up box?

Hi all,

I am very new to Excel Programming. I am trying to get the cells B2:B10, C2:C10, D2:D10 and E2:E10 to create a pop up message when a cell reaches/exceeds 100%.

I have managed to do this for one cell:

Private Sub Worksheet_Calculate()

If Sheets("Total Percentages").Range("B2").Value > 0.99 Then

MsgBox "Over 100%!", vbOKOnly

End If

End Sub

But whenever I try and set it to a range it won't work (Error 13 has appeared)? What do I need to do to set it to a range of cells?

Try using the worksheet_change event because worksheet_calculate doesn't provide a target address that can be tested.

Please Login or Register  to view this content.

Lovely, thanks!

My pleasure. If it works for you will you mark the thread as solved. Cheers.