Date: prev next · Thread: first prev next last
2021 Archives by date, by thread · List index


Hoi allemaal,

In een werkblad wil ik in 2 kolommen, in niet opeenvolgende rijen, cellen
samenvoegen.
De rijen die er tussen liggen zijn niet van belang. Dat zijn er niet zoveel
en onnuttige informatie is eenvoudig handmatig te verwijderen.
Beide kolommen selecteren en samenvoegen zorgt er voor dat alles
 samengevoegd wordt: denkfout.
Dus een macro opgenomen:
cel geselecteerd, shift-rechts, cel toegevoegd, rechter muisknop cellen
samenvoegen, pijl omlaag om naar de rij eronder te gaan.
Dit gaat eenmalig goed.
Bij uitvoeren van de macro komt de melding dat reeds samengevoegde niet
meer samen gevoegd kunnen worden.
Code van de macro bekeken: cellen staan absoluut gedefinieerd.


rem ----------------------------------------------------------------------
dim args1(0) as new com.sun.star.beans.PropertyValue
args1(0).Name = "ToPoint"
args1(0).Value = *"$F$18:$G$18"*

dispatcher.executeDispatch(document, ".uno:GoToCell", "", 0, args1())

rem ----------------------------------------------------------------------
dim args2(0) as new com.sun.star.beans.PropertyValue
args2(0).Name = "MoveContents"
args2(0).Value = true

dispatcher.executeDispatch(document, ".uno:MergeCells", "", 0, args2())

rem ----------------------------------------------------------------------
dim args3(1) as new com.sun.star.beans.PropertyValue
args3(0).Name = "By"
args3(0).Value = 1
args3(1).Name = "Sel"
args3(1).Value = false


Mhhh, hoe kan ik relatief maken t.o.v. huidige positie ?

Iemand een idee, of een macro die dat al kan ?

Bij voorbaat dank,

René.

-- 
Unsubscribe instructions: E-mail to users+unsubscribe@nl.libreoffice.org
Posting guidelines + more: https://wiki.documentfoundation.org/Netiquette
List archive: https://listarchives.libreoffice.org/nl/users/
Privacy Policy: https://www.documentfoundation.org/privacy

Context


Privacy Policy | Impressum (Legal Info) | Copyright information: Unless otherwise specified, all text and images on this website are licensed under the Creative Commons Attribution-Share Alike 3.0 License. This does not include the source code of LibreOffice, which is licensed under the Mozilla Public License (MPLv2). "LibreOffice" and "The Document Foundation" are registered trademarks of their corresponding registered owners or are in actual use as trademarks in one or more countries. Their respective logos and icons are also subject to international copyright laws. Use thereof is explained in our trademark policy.