Supondo que sua lista está em "A1" utilize a rotina abaixo :

Private Sub Worksheet_Change(ByVal Target As Range)
    Dim sValor
        
    sValor = Target.Value
        
    If Target.Address = "$A$1" Then
        If sValor = "Sim" Then MsgBox "Macro1"  'Troque MsgBox "Macro1" pelo nome de suas macros
        If sValor = "Não" Then MsgBox "Macro2"  'Troque MsgBox "Macro2" pelo nome de suas macros
           
    End If
       
End Sub

Obrigado! O código funcionou perfeitamente da forma que precisava.