Need vba code to get pop up message.
Hi
My name is Laxmikant V NaiK and I have just joined the forum. I need help in a VBA code.Attached is the file and the code I have written.Its for the Stock market
The worksheet name is WorkArea
Here I have a Buy Column(H) and sell column(I).The price in column F keeps changing.So when the price in column F equals price in column H or I then I get a pop up message.I get that pop up message.Issue is that I need to keep pressing the run button for the pop up message to come.I need a code that runs it automatically whenever the condition is met.
Thanks & Regards
Laxmikant v Naik
Attachment | Size |
---|---|
SpotCalData.xls | 223 KB |
Code to Get Pop up
Hi,
Your code is working that's nice.
Please find the below my changes:
Private Sub Worksheet_Change(ByVal Target As Range)
Dim lrow As Integer
lrow = Cells(Rows.Count, "D").End(xlUp).Row
For x = 9 To lrow
If Range("F" & x).Value = Range("H" & x).Value Then
MsgBox " Buy " & Range("D" & x).Value
Beep
ElseIf Range("F" & x).Value = Range("I" & x).Value Then
MsgBox " Sell " & Range("D" & x).Value
Beep
End If
Next x
End Sub