Auftragsnummer "holen" (mit SVERWEIS?)

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Hallo,
ein Ansatz könnte so aussehen:

	A	B	C	D
1	Datum	Projektnummer	Projektbezeichnung	Auftragswert
2	01.07.2007	70056	Projekt 1	10000
3	02.07.2007	70057	Projekt 2	15000
4	15.07.2007	70030	Projekt 3	500
5	16.07.2007	70030	Projekt 4	2000
6	01.08.2007	70058	Projekt 5	20000
7	20.08.2007	70030	Projekt 6	100
8	23.08.2007	70059	Projekt 7	30500
9	01.08.2007	70060	Projekt 8	28050
10	20.08.2007	70061	Projekt 9	10000
11	23.08.2007	70062	Projekt 10	15000
12	01.08.2007	70030	Projekt 11	500
13	20.08.2007	70030	Projekt 12	2000
14	23.08.2007	70063	Projekt 13	20000
15	24.08.2007	70030	Projekt 14	100
16	25.08.2007	70064	Projekt 15	30500
17	26.08.2007	70065	Projekt 16	28050
18	27.08.2007	70066	Projekt 17	20000
19	28.08.2007	70030	Projekt 18	100
20	29.08.2007	70067	Projekt 19	30500
21	30.08.2007	70068	Projekt 20	97770

Formeln der Tabelle

B2 : =WENN(A2<>"";WENN(D2<10000;"70030";Nummern!C3); "")
B3 : =WENN(A3<>"";WENN(D3<10000;"70030";B2+1); "")
B4 : =WENN(A4<>"";WENN(D4<10000;"70030";MAX($B$2:B3)+1); "")
B5 : =WENN(A5<>"";WENN(D5<10000;"70030";MAX($B$2:B4)+1); "")
B6 : =WENN(A6<>"";WENN(D6<10000;"70030";MAX($B$2:B5)+1); "")
B7 : =WENN(A7<>"";WENN(D7<10000;"70030";MAX($B$2:B6)+1); "")
B8 : =WENN(A8<>"";WENN(D8<10000;"70030";MAX($B$2:B7)+1); "")
B9 : =WENN(A9<>"";WENN(D9<10000;"70030";MAX($B$2:B8)+1); "")
B10 : =WENN(A10<>"";WENN(D10<10000;"70030";MAX($B$2:B9)+1); "")
B11 : =WENN(A11<>"";WENN(D11<10000;"70030";MAX($B$2:B10)+1); "")
B12 : =WENN(A12<>"";WENN(D12<10000;"70030";MAX($B$2:B11)+1); "")
B13 : =WENN(A13<>"";WENN(D13<10000;"70030";MAX($B$2:B12)+1); "")
B14 : =WENN(A14<>"";WENN(D14<10000;"70030";MAX($B$2:B13)+1); "")
B15 : =WENN(A15<>"";WENN(D15<10000;"70030";MAX($B$2:B14)+1); "")
B16 : =WENN(A16<>"";WENN(D16<10000;"70030";MAX($B$2:B15)+1); "")
B17 : =WENN(A17<>"";WENN(D17<10000;"70030";MAX($B$2:B16)+1); "")
B18 : =WENN(A18<>"";WENN(D18<10000;"70030";MAX($B$2:B17)+1); "")
B19 : =WENN(A19<>"";WENN(D19<10000;"70030";MAX($B$2:B18)+1); "")
B20 : =WENN(A20<>"";WENN(D20<10000;"70030";MAX($B$2:B19)+1); "")
B21 : =WENN(A21<>"";WENN(D21<10000;"70030";MAX($B$2:B20)+1); "")

Diagramm - Grafik - Excel Tabellen einfach im Web darstellen Excel Jeanie HTML 3.0 Download
Hat noch den Fehler, das die Zellen B2 und B3 gegebenenfalss per Hand eingegeben werden müssen.
Gruß
Sonnenpeter

Private Sub Worksheet_Change(ByVal Target As Range) If Target.Cells.Count > 1 Then Exit Sub If Target.Row 1 Then Exit Sub If Cells(Target.Row, 3) = "" Or Cells(Target.Row, 4) = "" Then Exit Sub if Cells(Target.Row, 2) "" Then Exit Sub If Not IsDate(Target.Value) Then Exit Sub Application.EnableEvents = False If Cells(Target.Row, 4)

Beliebteste Forumthreads (12 Monate)

Auftragsnummer "holen" (mit SVERWEIS?)

3
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

300 Forumthreads zu ähnlichen Themen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

Auftragsnummer "holen" (mit SVERWEIS?)

3 Beiträge zum Forumthread Beiträge zu diesem Forumthread

300 Forumthreads zu ähnlichen Themen

VBA Beispiele zu verwandten Themen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

3
Beiträge zum Forumthread

Beiträge zu diesem Forumthread