[GELÖST] Formel PER MAKRO nach rechts "ziehen"

Antwort erstellen

BBCode ist eingeschaltet
[img] ist ausgeschaltet
[url] ist eingeschaltet
Smileys sind ausgeschaltet
Die letzten Beiträge des Themas
   

Ansicht erweitern Die letzten Beiträge des Themas: [GELÖST] Formel PER MAKRO nach rechts "ziehen"

Re: Formel PER MAKRO nach rechts "ziehen"

von rob41 » Mo, 11.06.2012 10:23

Hallo,

klasse, genau das hat mir noch gefehlt.
noch mal DANKE euch beiden für die sehr guten Tips !

Gruß, Rob

Re: Formel PER MAKRO nach rechts "ziehen"

von Karolus » So, 10.06.2012 23:25

Hallo

Du übergibst (C19:E19) als Adressnamen, du möchtest die Klammern weglassen.

Benutze besser .getCellRangeByPosition( iStartspalte, iStartzeile, iEndspalte, iEndzeile )

Karo

Re: Formel PER MAKRO nach rechts "ziehen"

von rob41 » So, 10.06.2012 21:46

Hallo + vielen Dank für eure Antworten !
das klappt prima. etwas fehlt mir noch:

Code: Alles auswählen

	addr02 = "(C" & sRou + 1 & ":E" & sRou + 1 & ")"
	msgbox addr02				'Ausgabe OK
	oRange = oSheet_Buchf.getCellRangeByName("C19:E19")		'klappt
	oRange = oSheet_Buchf.getCellRangeByName(addr02)		'klappt nicht
	oRange.fillAuto(1,1)
Wie kann ich oRange parametrisiert befüllen ?

Danke !
Rob

Re: Formel PER MAKRO nach rechts "ziehen"

von Karolus » So, 10.06.2012 17:18

Hallo

Mit :

Code: Alles auswählen

Sub Main
thisComponent.CurrentSelection.fillAuto(1,1)
End Sub
wird ein selektierter Bereich von links nach rechts "auto-gefüllt"

Karo

Re: Formel PER MAKRO nach rechts "ziehen"

von Axel Richter » So, 10.06.2012 17:08

Hallo,

Code: Alles auswählen

oDoc = thiscomponent
oSheet = oDoc.Sheets(0)
oRange = oSheet.getCellRangeByName("A4:D4")
oRange.fillAuto(com.sun.star.sheet.FillDirection.TO_RIGHT, 1) 'autofüllt A4 in 1-er Schritten bis D4 nach rechts aus
viele Grüße

Axel

[GELÖST] Formel PER MAKRO nach rechts "ziehen"

von rob41 » So, 10.06.2012 15:09

Hallo,
is wohl ne Dummy Frage, aber ich find einfach nix.
Ich will PER MAKRO eine Formel nach rechts "ziehen"
in A4 steht:

Code: Alles auswählen

=SUMME(A1:A3)
in B4 soll stehen:

Code: Alles auswählen

=SUMME(B1:B3)
Bin für jeden Tip dankbar.

Gruß, Rob

Nach oben