Home » Forums » Open Source Learning Center » Question and Answer

popup message by vba

Submitted by trapeze2011 on 2 June, 2014 - 05:20

Hi,

I am working on a file which in one sheet lets call it summary, I have formula that calculate the values which i enter manually in other sheets, so i want to have an vba code to notify me by pop up message that the calculation result in summary sheet is <=0 when doing data entry in other sheets.
I have found below code which works fine with only one cell but if I want to extend it to other cells in the same row results in error. suppose I want to extend it to B9:CZ9

Private Sub Worksheet_Calculate()
If Me.Range("B9").Value <= 0 Then _
MsgBox "Leave is finished!"
End Sub

THANKS

‹ How is it possible to import more trt file in one Excel worksheet ? help with historic dates on spreadsheet ›
»

Hi,

Submitted by Jon on 2 June, 2014 - 19:52.

Here is your code

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("B9:CZ9")) Is Nothing Then
If Target.Value <= 0 Then MsgBox "Leave is finished!"
End If
End Sub

Hope this helps

»