Como faço pra converter essa macro para Calc?

Macro:

Rem Attribute VBA_ModuleType=VBADocumentModule
    Option VBASupport 1
    Private Sub ComboBox1_GotFocus()
    ComboBox1.ListFillRange = "DropDownList"
    Me.ComboBox1.DropDown
    End Sub
    
    
    Private Sub ComboBox2_Change()
    
    End Sub

Bom dia, como o código não é nativo do LibreOffice geralmente não estamos familiarizados com os métodos, propriedades, objetos. Nem sempre podemos testar o trecho para entendê-lo. Então, o melhor então é fornecer detalhes de o que ele faz, qual objetivo. E se possível, postar um arquivo ods modelo. É o caminho mais rápido para receber a ajuda.