event doesn't fires when a cell value is changed.

Posted by Sonny on May 30, 2001 8:53 AM

B1=c1
VB code:
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Range("C1") > 0 Then
ActiveSheet.Shapes("Object 1").Select
Selection.Verb Verb:=x1Primary
End If
End Sub

Only problem is I have to manualy change the B1 cell value for event to triggered. B1 gets value from another workseet

Posted by g-man on May 30, 2001 5:51 PM

Try changing: If Range("C1") > 0 Then

to: If Range("C1").Value > 0 Then

Posted by Sonny on May 31, 2001 7:51 AM

Re: tired didn't work. Know how to refresh macro in every minute

Sonny: Tried, didn't work. Know how to refresh macro in every minutes?