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
- [nl-users] relatieve verwijzing in macro · René Luijckx
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.