Equivalent ThisWorkbook.path avec libre office calc

Bonjour,
Je m'initie à libre office calc et je ne trouve pas l'équivalent de :

Chemin = ActiveWorkbook.Path ou ThisWorkbook.Path

Pour faire une clôture comptable de mon fichier dans le répertoire de travail actuel en lui changeant de nom avec une nouvelle année comptable.
Merci pour vos réponses. Je joins un fichier.
Cdt
Papy Henri

Bonjour Henri,

Je n'ai pas libreoffice mais il me semble avoir lu un jour qu'il faut utiliser l'instruction Thiscomponent

Cordialement

Edit : bah tiens je viens de trouver ce lien intéressant (enfin je pense... ) --> https://forum.openoffice.org/fr/forum/viewtopic.php?t=40452

Bonjour Dan et merci de t'intéresser à ma question.
Voici le code que j'ai mis :

    dim dispatcher,document as object
        document   = ThisComponent.CurrentController.Frame
        dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")
    dim args1(1) as new com.sun.star.beans.PropertyValue
        args1(0).Name = "URL"
        args1(0).Value = "file:///C:/Users/User/Documents/Camelias/Compta/Camelias_56_"+Cell.value+".ods"
        args1(1).Name = "FilterName"
        args1(1).Value = "calc8"
            MsgBox("Cloture comptable réalisée avec succès",1,"Confirmation de l'opération")
        dispatcher.executeDispatch(document, ".uno:SaveAs", "", 0, args1())

mais à a place du chemin suivant qui correspond à mon PC

    args1(0).Value = "file:///C:/Users/User/Documents/Camelias/Compta/Camelias_56_"+Cell.value+".ods"

je souhaitais, comme avec Excel, préciser l'enregistrement dans le répertoire de travail, car le chemin va varier en fonction des utilisateurs.
Je vais essayer avec ceci et te tiens au courant.

    args1(0).Value = "file:///C:/Thiscomponent/Camelias_56_"+Cell.value+".ods"

Cdt
Henri

AFEH a écrit :

Bonjour Dan et merci de t'intéresser à ma question.
Voici le code que j'ai mis :

    dim dispatcher,document as object
        document   = ThisComponent.CurrentController.Frame
        dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")
    dim args1(1) as new com.sun.star.beans.PropertyValue
        args1(0).Name = "URL"
        args1(0).Value = "file:///C:/Users/User/Documents/Camelias/Compta/Camelias_56_"+Cell.value+".ods"
        args1(1).Name = "FilterName"
        args1(1).Value = "calc8"
            MsgBox("Cloture comptable réalisée avec succès",1,"Confirmation de l'opération")
        dispatcher.executeDispatch(document, ".uno:SaveAs", "", 0, args1())

mais à a place du chemin suivant qui correspond à mon PC

    args1(0).Value = "file:///C:/Users/User/Documents/Camelias/Compta/Camelias_56_"+Cell.value+".ods"

je souhaitais, comme avec Excel, préciser l'enregistrement dans le répertoire de travail, car le chemin va varier en fonction des utilisateurs.
Je vais essayer avec ceci et te tiens au courant.

    args1(0).Value = "file:///C:/Thiscomponent/Camelias_56_"+Cell.value+".ods"

Cdt
Henri