OpenOffice.info

Sub DatumPlus100
	myDoc = thisComponent
	mySheet = myDoc.sheets(0) 'erstes Tabellenblatt
	mycell1 = mysheet.getCellByPosition(0,0)'Zelle A1
	myvalue1 = mycell1.value 'lesen des Inhaltes
	mycell2 = mysheet.getCellByPosition(1,0)'Zelle B1
	myvalue2 = mycell2.value 'lesen des Inhaltes
	if myCell1.String = "" then 'Wenn Zelle A1 leer
	myvalue2 = mycell2.value
	mycell1.value = myvalue2 + 100 'dann Datum von A1 +100 in A2
	else mycell2.value = myvalue1 + 100 ' sonst Datum A2 -100 in A1
	end if
End Sub

Hallo Razorback,

lösen könnte man das z.B. mit einem Makro:
[code]Sub DatumPlus100
myDoc = thisComponent
mySheet = myDoc.sheets(0) 'erstes Tabellenblatt
mycell1 = mysheet.getCellByPosition(0,0)'Zelle A1
myvalue1 = mycell1.value 'lesen des Inhaltes
mycell2 = mysheet.getCellByPosition(1,0)'Zelle B1
myvalue2 = mycell2.value 'lesen des Inhaltes
if myCell1.String = "" then 'Wenn Zelle A1 leer
myvalue2 = mycell2.value
mycell1.value = myvalue2 + 100 'dann Datum von A1 +100 in A2
else mycell2.value = myvalue1 + 100 ' sonst Datum A2 -100 in A1
end if
End Sub[/code]

Hilft Dir das weiter?

Jürgen

Hallo
Mit normalen Formeln geht das nur in einer Richtung:
Eingabezelle → Ausgabezelle mit Formel (='eingabezelle'+100)
Wechselseitig gehts leider nicht, da man in einer Zelle nur [color=#FF0000]eines[/color] eingeben kann, direkte Eingabe [color=#FF0000]oder[/color] Formel.

Gruß Karo

Hallo Forum,

bin relativer Calc-Anfänger und arbeite gerade an einer kleinen Tabelle, bei welcher ich 2 Datumszellen benötige, die sich gegenseitig durch Eingabe eines neuen Datums in jeweils eine von beiden Zellen in festem Verhältnis verändern sollen.

Konkreter: In Zelle 1 wird Datum XX.XX.XXXX eingegeben -> Zelle 2 zeigt daraufhin ein Datum an, welches z.B. genau 100 Tage später liegt (YY.YY.YYYY). Umgekehrt soll sich aber bei Datums-Eingabe in Zelle 2 das Datum in Zelle 1 in das 100 Tage frühere Datum ändern.

Wie geht sowas mit Calc ?

Grüße,
Razorback