Como executar uma macro no Calc ao selecionar uma célula Nomeada

[MarcoSalles]

Bom dia

essa pergunta ja foi parcialmente respondida para células utilizando sua Posição oCelula.AbsoluteName

 Sub SelecaoAlterada( oCelula )
   ' Testar se o objeto selecionado é uma célula individual
    If oCelula.ImplementationName <> "ScCellObj" Then Exit Sub

   If Right(oCelula.AbsoluteName,4) = "$E$5" Then   Rem  Gostaria de Alterar aqui para Células Nomeadas
       'Chamar a macro desejada
        Call Macro1 
   End If  
End Sub

Gostaria de alterar este Modelo para Células Nomeadas …

Obg