Hallo Werner und Jens

Leider nein, das makro ergibt auch in der Zeile 0. Auch die text-formatierte
Quellzellen können's nicht sein. 1) stimmt die Formatierung der Quellzellen
und zweitens funktioniert auch das untenstehende makro nicht ;-((

Ich habe also immer noch mein Ursprungsproblem

> Wenn ich ein Makro mit Hilfe der Funktion "Makro aufzeichnen" erstelle 
> (calc
> 2.1) dann wird beim Ausführen des Makros immer ein absoluter Zellbezug 
> gemacht. Wie kann ich ein Makro erstellen (z.B. A3=A1-A2), das, falls 
> in der Zelle B25 ausgeführt, B25=B23-B24 berechnet?

Gruss Patricia

-----Ursprüngliche Nachricht-----
Von: Werner Tietz [mailto:[EMAIL PROTECTED] 
Gesendet: Freitag, 4. Mai 2007 20:17
An: [email protected]
Betreff: Re: AW: AW: AW: [de-users] Relativer Zellbezug bei Makros

Hallo Patricia

Patricia Delnon schrieb:
> Hoi Jens
> 
> Das funktioniert, aber das kann ich bei meinem Kunden so nicht in sein 
> Rechnungsformular einbauen, zumal ich noch eines für die 
> Multiplikation brauche. Da nimmt der glatt lieber den Rechner ;-)). 
> Vorher arbeitet er mit Excel und da ist ein Makro mit relativem 
> Zellbezug kein Problem

Ich hatte dir gestern ein Makro gemailt daß die beiden Zellen oberhalb der
ausgewählten subtrahiert, Jens hat es abgeändert auf eine Subtraktion der
linken Nachbarzellen.
Evtl. hast du ein Problem mit Text-formatierten Quellzellen ? - dann könnte
dir folgende Version weiterhelfen:

sub vorherigeZellen_subtrahieren_falls_Text
oDoc=thisComponent
osheet=odoc.currentcontroller.activesheet 'aktives Tabellenblatt
Ziel=oDoc.getCurrentSelection()  'aktive Zelle ze=ziel.getCellAddress().Row
'aktuelle Zeile, Index sp=ziel.getCellAddress().column  'aktuelle Spalte,
Index
quelle1 = val(osheet.getcellbyposition(sp,ze - 2).string)
quelle2 = val(osheet.getcellbyposition(sp,ze - 1).string) Ziel.value =
quelle1 - quelle2 end sub

Gruß Werner

---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]


Hallo Patricia

Patricia Delnon schrieb:
> Wenn ich ein Makro mit Hilfe der Funktion "Makro aufzeichnen" erstelle 
> (calc
> 2.1) dann wird beim Ausführen des Makros immer ein absoluter Zellbezug 
> gemacht. Wie kann ich ein Makro erstellen (z.B. A3=A1-A2), das, falls 
> in der Zelle B25 ausgeführt, B25=B23-B24 berechnet?

In Bezug auf dein Beispiel:

sub vorherigeZellen_subtrahieren
oDoc=thisComponent
osheet=odoc.currentcontroller.activesheet 'aktives Tabellenblatt
Ziel=oDoc.getCurrentSelection()  'aktive Zelle ze=ziel.getCellAddress().Row
'aktuelle Zeile, Index sp=ziel.getCellAddress().column  'aktuelle Spalte,
Index
quelle1 = osheet.getcellbyposition(sp,ze - 2).value
quelle2 = osheet.getcellbyposition(sp,ze - 1).value Ziel.value = quelle1 -
quelle2 end sub

Gruß Werner

---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Antwort per Email an