On Edit activation

T

tjb21045

Can anyone tell me a way to have a macro execute based on the value of a
cell changing?
 
N

Norman Harker

Hi tjb21045!


Try something like:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address <> "$a$1" Then Exit Sub
<<Your Code>>
End Sub

This is placed in the Sheet Module where the target cell is located.
Easiest means of access is to right click the sheet tab and select
View Code. If you click the left drop down above the code window and
select Worksheet and then click the right drop down and select Change,
you'll find that your macro is topped and tailed correctly.

I think that you'll find a Google search on Worksheet Change will give
you lots of examples.

--
Regards
Norman Harker MVP (Excel)
Sydney, Australia
[email protected]
Excel and Word Function Lists (Classifications, Syntax and Arguments)
available free to good homes.
 
T

Tom Ogilvy

Your if test will always be evaluated as true as written as the address
comes back as $A$1 (unless you set Option Compare Text).

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address <> "$A$1" Then Exit Sub
<<Your Code>>
End Sub

--
Regards,
Tom Ogilvy


Norman Harker said:
Hi tjb21045!


Try something like:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address <> "$a$1" Then Exit Sub
<<Your Code>>
End Sub

This is placed in the Sheet Module where the target cell is located.
Easiest means of access is to right click the sheet tab and select
View Code. If you click the left drop down above the code window and
select Worksheet and then click the right drop down and select Change,
you'll find that your macro is topped and tailed correctly.

I think that you'll find a Google search on Worksheet Change will give
you lots of examples.

--
Regards
Norman Harker MVP (Excel)
Sydney, Australia
[email protected]
Excel and Word Function Lists (Classifications, Syntax and Arguments)
available free to good homes.
Click to expand...
 
Top