If this is your first visit, be sure to check out the FAQ by clicking the link above. You may have to register before you can post: click the register link above to proceed. To start viewing messages, select the forum that you want to visit from the selection below. |
|
|
Thread Tools | Display Modes |
#1
|
|||
|
|||
Excel - Run Macro on Cell Change
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. |
#2
|
|||
|
|||
Excel - Run Macro on Cell Change
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. -- HTH... Jim Thomlinson "Malaria Man" wrote: 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. |
#3
|
|||
|
|||
Excel - Run Macro on Cell Change
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 -- If this helps, please remember to click yes. "Malaria Man" wrote: 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. |
#4
|
|||
|
|||
Excel - Run Macro on Cell Change
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 -- Don Guillett Microsoft MVP Excel SalesAid Software "Malaria Man" Malaria wrote in message ... 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. |
Thread Tools | |
Display Modes | |
|
|