Live-Forum - Die aktuellen Beiträge
Datum
Titel
29.03.2024 13:14:12
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
956to960
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
956to960
956to960
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Jeder 2. Mittwoch im Monat

Jeder 2. Mittwoch im Monat
10.03.2008 13:32:37
Heinz
Hallo Leute
Ich habe in A1 =JAHR(HEUTE()) stehen.
Nun möchte ich in BU2 den 2.Mittwoch vom Jänner,in Bu3 den 2.Mittwoch vom Februar usw.. stehen haben.
Könnte mir dazu bitte jemand weiterhelfen.
Danke Heinz

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Jeder 2. Mittwoch im Monat
10.03.2008 13:53:00
Ingo
hallo heinz,
vielleicht hilft Dir diese benutzerdefinierte Funktion:

Function z_mittwoch(jahr As Integer, monat As Integer)
Dim m As Integer, m1 As Integer
Dim d As Date
d = DateSerial(jahr, monat, 1)
m1 = 0
Do
If Weekday(d) = vbWednesday Then m1 = m1 + 1
If m1 = 2 Then Exit Do
d = d + 1
Loop
z_mittwoch = d
End Function


mfG
Ingo Christiansen

AW: Jeder 2. Mittwoch im Monat
10.03.2008 13:58:16
Heinz
Hallo Ingo
Recht herzlichen Dank, für Deine Mühe.
Würde es aber als Formel benötigen.
Danke Heinz

AW: Jeder 2. Mittwoch im Monat
10.03.2008 14:05:00
Tino
Hallo,
hier mal ein Beipiel.
 NOP
15Freitag, 1. Februar 2008 Mittwoch, 13. Februar 2008

Formeln der Tabelle
ZelleFormel
P15=N15-1-WOCHENTAG(N15-3;3)+7*2

Gruß
Tino

Anzeige
AW: Jeder 2. Mittwoch im Monat
10.03.2008 14:06:34
I)ngo
Hallo Heinz,
speichere die Function in einem VBA-Modul, dannn steht sie Dir im Funktionassistenten als benutzerdefinierte Funktion zur Verfügung und die Formel für den 2.Mittwoch im Januar würde z.B lauten:
=z_mittwoch($A$1;1)
mfG Ingo Christiansen

jeweils der zweite Mittwoch
10.03.2008 14:12:00
WF
Hi,
=DATUM(A$1;ZEILE(A1);1)-REST(DATUM(A$1;ZEILE(A1);1)-5;7)+13
und 11 Zeilen runter kopieren
Salut WF

AW: Jeder 2. Mittwoch im Monat
10.03.2008 14:29:00
Tino
Hallo,
in deinem Beispiel müsste es so ausehen.
 ABCD
12008   
2   Mittwoch, 9. Januar 2008
3   Mittwoch, 13. Februar 2008
4   Mittwoch, 12. März 2008
5   Mittwoch, 9. April 2008
6   Mittwoch, 14. Mai 2008
7   Mittwoch, 11. Juni 2008
8   Mittwoch, 9. Juli 2008
9   Mittwoch, 13. August 2008
10   Mittwoch, 10. September 2008
11   Mittwoch, 8. Oktober 2008
12   Mittwoch, 12. November 2008
13   Mittwoch, 10. Dezember 2008

Formeln der Tabelle
ZelleFormel
A1=JAHR(HEUTE())
D2=DATUM($A$1;ZEILE()-1;1)-1-WOCHENTAG(DATUM($A$1;ZEILE()-1;1)-3;3)+7*2
D3=DATUM($A$1;ZEILE()-1;1)-1-WOCHENTAG(DATUM($A$1;ZEILE()-1;1)-3;3)+7*2
D4=DATUM($A$1;ZEILE()-1;1)-1-WOCHENTAG(DATUM($A$1;ZEILE()-1;1)-3;3)+7*2
D5=DATUM($A$1;ZEILE()-1;1)-1-WOCHENTAG(DATUM($A$1;ZEILE()-1;1)-3;3)+7*2
D6=DATUM($A$1;ZEILE()-1;1)-1-WOCHENTAG(DATUM($A$1;ZEILE()-1;1)-3;3)+7*2
D7=DATUM($A$1;ZEILE()-1;1)-1-WOCHENTAG(DATUM($A$1;ZEILE()-1;1)-3;3)+7*2
D8=DATUM($A$1;ZEILE()-1;1)-1-WOCHENTAG(DATUM($A$1;ZEILE()-1;1)-3;3)+7*2
D9=DATUM($A$1;ZEILE()-1;1)-1-WOCHENTAG(DATUM($A$1;ZEILE()-1;1)-3;3)+7*2
D10=DATUM($A$1;ZEILE()-1;1)-1-WOCHENTAG(DATUM($A$1;ZEILE()-1;1)-3;3)+7*2
D11=DATUM($A$1;ZEILE()-1;1)-1-WOCHENTAG(DATUM($A$1;ZEILE()-1;1)-3;3)+7*2
D12=DATUM($A$1;ZEILE()-1;1)-1-WOCHENTAG(DATUM($A$1;ZEILE()-1;1)-3;3)+7*2
D13=DATUM($A$1;ZEILE()-1;1)-1-WOCHENTAG(DATUM($A$1;ZEILE()-1;1)-3;3)+7*2

Gruß
Tino

Anzeige
AW: DANKE - DANKE - DANKE
10.03.2008 14:34:06
Heinz
Hallo Leute
Ich bin Überwältigt,von diesem Forum !!
Hier wird wirklich einem immer wieder geholfen !!
Recht herzlichen DANK an alle die mir immer wieder mit Rat und Tat Unentgeltlich zur Seite stehen .
Gruß Heinz

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige