[fr-users] [CALC] définir zone dynamique par macro

Bonjour,


la macro actuelle
> Sub ActuNomZone
>   Dim v_Nom As Object
>   Dim v_CellAdress As New com.sun.star.table.CellAddress
>   Dim v_DataZone As New com.sun.star.table.CellAddress
>
>   '--------------
>   'La procédure renvoie une erreur si le nom existe déjà
>   'dans le classeur. On le supprime d'abord pour le recréer ensuite.
>   '--------------
>
> 'v_DataZone=thiscomponent.cells
>   v_Nom = ThisComponent.NamedRanges
>   'Supprime puis nomme la plage dans la feuille Données
>   'reste à trouver comment le faire de manière dynamique
>   ' c'est-à-dire en définissant la zone avec les seules cellules 
> occupées par des données
>   'If ThisComponent.NamedRanges("data")=true Then
>   ThisComponent.NamedRanges.removeByName("data")
> '    End If
>   v_Nom.addNewByName( "data" , "$Données.$A$1:$H$800" , v_CellAdress , 0 )
>
>
> End Sub
j'inscris les coordonnées de la zone à nommer "data" dans la macro. 
Elles sont larges, ce qui m'oblige à exclure manuellement les entrées 
vides dans les Tables de pilote.
Et cela manque d'élégance, ce qui est aussi une bonne raison de faire 
mieux ;)

Je souhaite que cette zone soit "dynamique", afin de l'étendre à mesure 
que j'entre des données dans les colonnes A à H.

Je n'y parviens pas, connaissant encore mal le nom des objets.
Comme écrire cette ligne ?
>   v_Nom.addNewByName( "data" , "$Données.$A$1:$H$800" , v_CellAdress , 0 )


Un coup de pouce serait bienvenu.

Merci
Lucien
--
Système technique : Mac OS 10.10.5, RAM 8 Gio, LibreOffice 4.4.7.2 & 5.1.1.1
Pour votre réponse, merci d'utiliser la fonction "répondre à tous" de 
votre logiciel de courrier électronique de façon que la liste reçoive 
une copie de votre réponse.

--
Envoyez un mail à users+unsubscribe@fr.libreoffice.org pour savoir comment vous désinscrire
Les archives de la liste sont disponibles à http://listarchives.libreoffice.org/fr/users/
Tous les messages envoyés sur cette liste seront archivés publiquement et ne pourront pas être 
supprimés