Running a auto macro

[scooby103]

Alright guys;
Is there a way to have a macro run when info is put into a certain cell? I have a column of cells that when something is put into any of those cells I want a macro to auto run instead of hitting a button to run the macro.

Thanks for your help.

A.

 

[nisht]

You can use worksheet change event to call the procedure.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim unionrange As Range
'
' YOu can have your range define here..
Set unionrange = Union([b4:k12], [f7:l20])

If Not Intersect(Target, unionrange) Is Nothing Then
''Exit Sub
'
'Selection.Interior.ColorIndex = Int(Rnd(3) * 10) + 20
' you can call your procedure here
myprocedure

'
End If

Set unionrange = Nothing
End Sub

 

[jimboy]

Yes. If you right mouse over the sheet name (i.e. Sheet1) and select view code then in left drop down box (top) select Worksheet and in the right box select Change, enter either your code or call another macro, like this;

Private Sub Worksheet_Change(ByVal Target As Range)
'will exit if more than one cell is selected
If Target.Count > 1 Then Exit Sub

'will exit if any other column (except A) is amended
If Target.Column <> 1 Then Exit Sub

'calls your macro
Macro1

End Sub

Post back for more help.