I am trying to get a macro to run base on the cell value, then go to the next row and potentially run a different macro. Here is the code, please help.
Sub Update()
Range("AU2").Select
For i = 1 To Selection.CurrentRegion.Rows.Count + 1
If ActiveCell.FormulaR1C1 = "s" Then
Run (["if_s"])
End If
If ActiveCell.FormulaR1C1 = "b" Then
Run (["if_b"])
End If
If ActiveCell.FormulaR1C1 = "" Then
Run (["ifnothing"])
End If
If ActiveCell.FormulaR1C1 = "q" Then
Run (["q"])
End If
If ActiveCell.FormulaR1C1 = "w" Then
Run (["w"])
End If
i = i + 1
Next i
End Sub
Sub Update()
Range("AU2").Select
For i = 1 To Selection.CurrentRegion.Rows.Count + 1
If ActiveCell.FormulaR1C1 = "s" Then
Run (["if_s"])
End If
If ActiveCell.FormulaR1C1 = "b" Then
Run (["if_b"])
End If
If ActiveCell.FormulaR1C1 = "" Then
Run (["ifnothing"])
End If
If ActiveCell.FormulaR1C1 = "q" Then
Run (["q"])
End If
If ActiveCell.FormulaR1C1 = "w" Then
Run (["w"])
End If
i = i + 1
Next i
End Sub