I may have found a fairly simple solution. So far with my testing, this seems to work:
Public Sub PerfInd1ComboBoxMacro()

With ActiveSheet
     If .Range("IndFocus1") = 1 Then
        ' Do things
     ElseIf .Range("IndFocus1") = 2 Then
        ' Do other things
     End If
End With

End Sub

Then I assign this macro by right clicking the form control combo box.

Crystal