Could someone please give me some insight on how to do the following.

Right now I am trying to do this

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As
Range)
If Sheet2.Range("L3").Value = Sheet2.Range("I3").Value Then
Sheet2.Range("J3").AddComment
Sheet2.Range("J3").Comment.Visible = True
Sheet2.Range("J3").Comment.Text Text:="ORDER MORE!!!:" & Chr(10) &
"" & Chr(10) & "need to order more"
End If

If Sheet2.Range("L3").Value < Sheet2.Range("I3").Value Then
Sheet2.Range("J3").Comment.Delete
End If
End Sub


I am new to macros and understanding them, I also am operating in Excel
2003. What is happening is a debug is happening stating that i need a
block with or something of that nature. I would actually like this to
loop from cell 3:500. I probably am doing this in a very slow and
non-efficient way. I would love some advice for knowledge.

Thank you very much

Josh


--
jhahes
------------------------------------------------------------------------
jhahes's Profile: http://www.excelforum.com/member.php...o&userid=23596
View this thread: http://www.excelforum.com/showthread...hreadid=469292