OpenOffice.info

DATWERT("01.01."&B1)

DATUM(B1;1;1)

=DATUM(B1;1;1)-(WOCHENTAG(DATUM(B1;1;1)))+(WENN((WOCHENTAG(DATUM(B1;1;1)))<=3;3;WENN((WOCHENTAG(DATUM(B1;1;1)))<=5;5;WENN((WOCHENTAG(DATUM(B1;1;1)))<=7;7;66))))

Hallo,
in der obigen Zeile erzeuge ich aus der Jahreszahl das Datum des 1.1. des Jahres mit diesem Code
[code]DATWERT("01.01."&B1)[/code]
Inzwischen weiss ich, es geht einfacher:
[code]DATUM(B1;1;1)[/code] ergo lautet der Code zur Berechnung des ersten Di, Do oder Sa eines Jahres:
[code]=DATUM(B1;1;1)-(WOCHENTAG(DATUM(B1;1;1)))+(WENN((WOCHENTAG(DATUM(B1;1;1)))<=3;3;WENN((WOCHENTAG(DATUM(B1;1;1)))<=5;5;WENN((WOCHENTAG(DATUM(B1;1;1)))<=7;7;66))))[/code]
Gruß R

Hallo,
noch 'ne Variante (falls es mal andere Wochentage sind).
Du gibst die erste Woche ein (A1, A2, A3) und in A4 dann die Formel: =A1+7 und 'runterziehen.

Noch mals vielen Dank für die tollen Formeln und Funktionen.
Aber mir reicht die erste Variante völlig, da wir Monatszettel haben. Den ersten DI oder DO oder SA such ich gerne zu Fuß raus.
Der Rest funktioniert ja nun genial einfach.
Grüße
Pezi

=DATWERT("01.01."&B1)-(WOCHENTAG(DATWERT("01.01."&B1)))+(WENN((WOCHENTAG(DATWERT("01.01."&B1)))<=3;3;WENN((WOCHENTAG(DATWERT("01.01."&B1)))<=5;5;WENN((WOCHENTAG(DATWERT("01.01."&B1)))<=7;7;66))))

Hi paljass,
danke für den Tip!
Ich habe mal eine Formel für Zelle A1 nach o.a. Beispiel ermittelt, dann klappts auch ohne function, was besser ist:
[code]=DATWERT("01.01."&B1)-(WOCHENTAG(DATWERT("01.01."&B1)))+(WENN((WOCHENTAG(DATWERT("01.01."&B1)))<=3;3;WENN((WOCHENTAG(DATWERT("01.01."&B1)))<=5;5;WENN((WOCHENTAG(DATWERT("01.01."&B1)))<=7;7;66))))[/code]
Das Jahr, nur das Jahr (2012), steht in Zelle B1
Gruß R

... mit function?
... dann wäre ick ooch stolz uff dir, sonst eher nüsch.
Gruß R

Hallo F3K,
Genau das war´s was ich gesucht hab, Danke, ich bin stolz mit Dir. :D
Grüße aus der Börde
Pezi

=WENN(WOCHENTAG(A1)=7;A1+3;A1+2)

function first_day(nCell as string)as date
dim odate as date
odate="01.01."+ncell
odate=odate-1
for i=0 to 7
odate=odate+1
if weekday(odate)= 3 then
first_day=odate
exit function
else if weekday(odate)= 5 then
first_day=odate
exit function
else if weekday(odate)= 7 then
first_day=odate
exit function
endif
endif
endif
next i
End function

=DATWERT(FIRST_DAY(B1))

Hi,
angenommen Deine Daten stehen in Spalte A. Formatiere die Spalte als Datum mit dem Format Code [color=#0040FF]NN T.M.[/color]
In A1 trägst Du das Datum des ersten Di, Do, oder Sa des Jahres ein, für 2012 den 03.01.2012
In A2 folgende Formel:
[code]=WENN(WOCHENTAG(A1)=7;A1+3;A1+2)[/code] die ziehst Du runter, fertig!

Wenn Du möchtest, das der erste Di, Do oder Sa automatisch ermittelt wird, kannst Du eine Zelle mit der Jahreszahl füllen, folgende [color=#0040FF]function[/color] im Makro Bereich speichern:
[code]function first_day(nCell as string)as date
dim odate as date
odate="01.01."+ncell
odate=odate-1
for i=0 to 7
odate=odate+1
if weekday(odate)= 3 then
first_day=odate
exit function
else if weekday(odate)= 5 then
first_day=odate
exit function
else if weekday(odate)= 7 then
first_day=odate
exit function
endif
endif
endif
next i
End function[/code]

und dann in die Zelle A1 folgende Formel eingeben
[code]=DATWERT(FIRST_DAY(B1))[/code] wobei hier das Jahr (2012) in Zelle B1 steht.

Viel Erfolg
Gruß R

Hallo Gemeinde,
viel probieren und googeln hat nichts genutzt, deshalb frag ich mal hier:
Es geht darum, dass wir unsere soziale Einrichtung nur 3 Tage pro Woche geöffnet haben.
Deshalb möchte ich in Calc über autoausfüllen /Spalte eine Liste erstellen, in der für´s ganze Jahr nur jeder Dienstag, Donnerstag und Samstag ist. Die Zeilen sollen dann mit Besucherzahlen, Spenden ect. versehen werden
Also:

DI 3.1.
Do 5.1.
SA 7.1.
Di 10.1.
und so weiter.

Wie krieg ich das hin?
Im Voraus schon mal Dank
Grüße aus der Börde und guten Rutsch ins 2012.
Pezi