RE: [fr-users] Calc macro - Trouver plage associée à une cellule fusionnée

Bonjour Pierre-Yves,

Bon sang mais c'est bien sûr ! Ça marche ...
Je me disais bien qu'il manquait quelqu'un sur cette liste ces derniers
temps.

Bonne rentrée,

Michel


> -----Message d'origine-----
> De : pierre-yves samyn [mailto:pierre-yves.samyn@laposte.net]
> Envoyé : mercredi 28 août 2013 16:55
> À : users@fr.libreoffice.org
> Objet : RE: [fr-users] Calc macro - Trouver plage associée à une cellule
> fusionnée
>
> Bonjour
>
> Je n'ai pas lu tout le fil, ni la possibilité de tester ce qui est
> proposé ci-dessous (donc fautes de frappe possibles) mais
> ce qui est demandé dans le titre est possible via l'utilisation
> d'un curseur). L'exemple ci-dessous devrait afficher
> Feuille 0, Col deb 1, Col fin 2, lig deb 1, lig fin 3
> si la plage fusionnée était B2:C4
>
>
> Sub Main
> dim oFeuille as object, oCell as object, oCurs as object
> oFeuille = thiscomponent.sheets.getByName("Feuille1")
> oCell = oFeuille.getcellrangebyname("B2")
> oCurs = oFeuille.createCursorByRange(oCell)
> oCurs.collapseToMergedArea
> with oCurs.RangeAddress
>       msgbox "Feuille : " & .Sheet & chr(13) &_
>               "Col deb : " & .StartColumn & chr(13) &_
>               "Col fin : " & .EndColumn & chr(13) &_
>               "Lig deb : " & .StartRow & chr(13) &_
>               "Lig fin : " & .EndRow
> end with
>
> End Sub
>
>
>
> --
> View this message in context: http://nabble.documentfoundation.org/Calc-
> macro-Trouver-plage-associee-a-une-cellule-fusionnee-
> tp4069741p4072048.html
> Sent from the Users mailing list archive at Nabble.com.
>
> --
> 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


-- 
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