Excel - Run Macro on Cell Change

  • Thread starter Thread starter Malaria Man
  • Start date Start date
M

Malaria Man

I am trying to have 1 of 8 different macro's run depending on the value of a
specific cell.
If I enter 1 in cell A3, I would like macro1 to run. If I change cell A3 to
2, I would like macro2 to run and so on all the way up to entering 8 and
getting macro8 to run. I am unable to find any good examples of how to do
this. I realize I will probably have to use Worksheet Event to do this but
what is the macro code I will need.
 
Right click the sheet tab and select veiw code. Paste the following:

Private Sub Worksheet_Change(ByVal Target As Range)
With Target
If .Address = "$A$3" Then
Select Case .Value
Case "A" 'Change A
Call macro1
Case "B" 'Change B
Call macro2
End Select

End If
End With
End Sub

Chang ethe A and B to the values that you want to trigger the macros. Add as
many different cases as you need.
 
Create a Worksheet Change macro and check the target position and value like
this.

If any cell but A3 is changed nothing get executed


Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Row=3 and Target.Column=1 then
Select Case target.value
Case 1
Call macro1
Case 2
Call macro2
etc...
End Select
End If

End Sub
 
Ease of design depends on the actual names of the macros. Assuming they are
NOT really macro1 , macro2, etc then I suggest a select case macro something
like

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count > 1 Or _
Target.Address <> Range("a3").Address Then Exit Sub
Select Case Target
Case Is = 1: Call macro1
Case Is = 2: Call macro2
Case Else: MsgBox "no such"
End Select
End Sub
 
Back
Top