MrExcel Publishing
Your One Stop for Excel Tips & Solutions

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?