Merci pour votre aide, tout  d’abord.
L idée est bonne.
En revanche, il me semble que ceci ne fonctionne que sous calc. Je cherche à 
faire la même chose sous Writer.
Cordialement.

O.Jaccomard

De : Jean-Francois Nifenecker
Envoyé le :mardi 18 avril 2017 18:21
À : Jaccomard; users@fr.libreoffice.org
Objet :Re: [fr-users] Macro, Writer, et tableaux irréguliers.

Bonjour,

Le 18/04/2017 à 14:45, Jaccomard a écrit :
>
> est-ce que quelqu'un a déjà réussi à récupérer par macro la taille d'une
> cellule dans un tableau irrégulier (i.e. possédant des cellules
> fusionnées) ?
>

De tête...

Lors d'une fusion de cellules, les cellules faisant partie de la fusion 
(la plage fusionnée) existent toujours et peuvent être référencées. Il 
est donc possible de tester si la cellule sélectionnée est une cellule 
unique ou résulte d'une fusion (donc une plage).

Plage (s'applique aux plages uniques) :

Function IsSingleRange(ByRef pRange As Object) As Boolean
'returns True if the range is a single range
        IsSingleRange = pRange.supportsService(SERV_CELLRANGE)
End Function 'IsSingleRange

Cellule unique :

Function IsSingleCell(ByRef pRange As Object) As Boolean
'returns True if the range is a cell
        IsSingleCell = pRange.supportsService(SERV_CELL)
End Function 'IsSingleCell

Avec :

Const SERV_CELLRANGE  = "com.sun.star.table.CellRange"
Const SERV_CELL       = "com.sun.star.table.Cell"


Attention à tester la cellule unique *avant* la plage car une cellule 
unique est aussi une plage (d'une seule cellule).


Bien cordialement,
-- 
Jean-Francois Nifenecker, Bordeaux



-- 
Envoyez un mail à users+unsubscr...@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

Répondre à