probleme de tri

bonjour,

j'ai écris une routine pour trier une plage de données dans une feuille calc
mais j'ai une erreur :

Runtime Error Basic
Sous-procedure ou procedure de fonction non définie

à la ligne : setPropVal( DescrTri, "SortFields", ConfigTri())

je ne vois pas où est mon erreur .

voici ma routine :

/***************
Sub trielafeuille()
    Dim zoneDeTri As Object
    Dim ConfigTri(0) As New com.sun.star.table.TableSortField
    Dim DescrTri As Variant

    zoneDeTri = sheetIn.getCellRangeByPosition(0,9,4,100)
    ConfigTri(0).Field = 0
    ConfigTri(0).IsAscending = true
    DescrTri = zoneDeTri.createSortDescriptor
    setPropVal( DescrTri, "SortFields", ConfigTri())
    setPropVal( DescrTri, "IsSortColumns", false)
    setPropVal( DescrTri, "CopyOutPutData", false)
    setPropVal( DescrTri, "IsUserListEnabled", false)
    setPropVal( DescrTri, "BindformatsToContent", false)
    setPropVal( DescrTri, "ContainsHeader", false)
    zoneDeTri.Sort( DescrTri())
End Sub
*****************/

merci de votre aide

Gérard

systeme : Mandriva 2008 , OpenOffice 2.2.1