[nl-users] relatieve verwijzing in macro

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