formelproblem: zahlen sortieren, toleranz beachten

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Spieler

Punkte

Tauschmögl. mit Spielern

-1

Beispiele für mögliche Aufstellungen:

-1

Spieler

Punkte

Tauschmögl. mit Spielern

-1

erlaubte Aufstellungen:

Hallo Erich,
vielen lieben Dank für Deine Mühe!
Leider kann das VBA so nicht stimmen, oder ich habe leider bei meiner "Regelerklärung" etwas falsch gemacht. Mal schaun... :)
Ich habe Dein Script mal mit folgenden werten durchgespielt

Bilanz

	A	B	C	D	E	F	G	H
1		Wertzahl	Gew	Verl.	Quotient	Plaz. Nach Wertzahl	Plaz. Nach Quote	Durchschnitt
2	a	0	2	6	25%	4	4	4
3	b	0	2	6	25%	4	4	4
4	c	3	3	3	50%	3	3	3
5	d	-6	0	6	0%	5	5	5
6	e	8	5	1	83%	1	1	1
7	f	4	3	1	75%	2	2	2

Formeln der Tabelle

E2 : =100*C2/(C2+D2)/100
F2 : =RANG(B2;$B$3:$B$21)
G2 : =RANG(E2;$E$3:$E$21)
H2 : =MITTELWERT(F2;G2)
E3 : =100*C3/(C3+D3)/100
F3 : =RANG(B3;$B$3:$B$21)
G3 : =RANG(E3;$E$3:$E$21)
H3 : =MITTELWERT(F3;G3)
E4 : =100*C4/(C4+D4)/100
F4 : =RANG(B4;$B$3:$B$21)
G4 : =RANG(E4;$E$3:$E$21)
H4 : =MITTELWERT(F4;G4)
E5 : =100*C5/(C5+D5)/100
F5 : =RANG(B5;$B$3:$B$21)
G5 : =RANG(E5;$E$3:$E$21)
H5 : =MITTELWERT(F5;G5)
E6 : =100*C6/(C6+D6)/100
F6 : =RANG(B6;$B$3:$B$21)
G6 : =RANG(E6;$E$3:$E$21)
H6 : =MITTELWERT(F6;G6)
E7 : =100*C7/(C7+D7)/100
F7 : =RANG(B7;$B$3:$B$21)
G7 : =RANG(E7;$E$3:$E$21)
H7 : =MITTELWERT(F7;G7)

Diagramm - Grafik - Excel Tabellen einfach im Web darstellen Excel Jeanie HTML 3.0 Download
dann dürfte aber d keinesfalls vor e, vor d oder vor f spielen...
Kannst du mir helfen, was ich hier wie wo ändern muss?
Vielen Dank und viele Grüße
Benjamin

Bilanz

	A	B	C	D	E	F	G	H
1		Wertzahl	Gew	Verl.	Quotient	Plaz. Nach Wertzahl	Plaz. Nach Quote	Durchschnitt
2	a	0	2	6	25%	4	4	4
3	b	0	2	6	25%	4	4	4
4	c	3	3	3	50%	3	3	3
5	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
6	e	8	5	1	83%	1	1	1
7	f	4	3	1	75%	2	2	2
8
9
10	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
11	2		a	b	c	d	f	e
12	3		a	b	d	c	e	f
13	4		a	b	d	c	f	e
14	5		a	b	e	c	d	f
15	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
16	7		a	b	e	d	c	f
17	8		a	b	e	d	f	c
18	9		a	b	f	c	d	e
19	10		a	b	f	c	e	d
20	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
21	12		a	b	f	d	e	c
22	13		a	c	b	d	e	f
23	14		a	c	b	d	f	e
24	15		a	c	d	b	e	f
25	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
26	17		a	c	e	b	d	f
27	18		a	c	e	b	f	d
28	19		a	c	e	d	b	f
29	20		a	c	e	d	f	b
30	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
31	22		a	c	f	b	e	d
32	23		a	c	f	d	b	e
33	24		a	c	f	d	e	b
34	25		a	d	b	c	e	f
35	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
36	27		a	d	c	b	e	f
37	28		a	d	c	b	f	e
38	29		a	d	e	b	c	f
39	30		a	d	e	b	f	c
40	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
41	32		a	d	e	c	f	b
42	33		a	d	f	b	c	e
43	34		a	d	f	b	e	c
44	35		a	d	f	c	b	e
45	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
46	37		a	e	b	c	d	f
47	38		a	e	b	c	f	d
48	39		a	e	b	d	c	f
49	40		a	e	b	d	f	c
50	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
51	42		a	e	c	b	f	d
52	43		a	e	c	d	b	f
53	44		a	e	c	d	f	b
54	45		a	e	d	b	c	f
55	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
56	47		a	e	d	c	b	f
57	48		a	e	d	c	f	b
58	49		a	e	f	b	c	d
59	50		a	e	f	b	d	c
60	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
61	52		a	e	f	c	d	b
62	53		a	e	f	d	b	c
63	54		a	e	f	d	c	b
64	55		a	f	b	c	d	e
65	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
66	57		a	f	b	d	c	e
67	58		a	f	b	d	e	c
68	59		a	f	c	b	d	e
69	60		a	f	c	b	e	d
70	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
71	62		a	f	c	d	e	b
72	63		a	f	d	b	c	e
73	64		a	f	d	b	e	c
74	65		a	f	d	c	b	e
75	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
76	67		a	f	e	b	c	d
77	68		a	f	e	b	d	c
78	69		a	f	e	c	b	d
79	70		a	f	e	c	d	b
80	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
81	72		a	f	e	d	c	b
82	73		b	a	c	d	e	f
83	74		b	a	c	d	f	e
84	75		b	a	d	c	e	f
85	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
86	77		b	a	e	c	d	f
87	78		b	a	e	c	f	d
88	79		b	a	e	d	c	f
89	80		b	a	e	d	f	c
90	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
91	82		b	a	f	c	e	d
92	83		b	a	f	d	c	e
93	84		b	a	f	d	e	c
94	85		b	c	a	d	e	f
95	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
96	87		b	c	d	a	e	f
97	88		b	c	d	a	f	e
98	89		b	c	e	a	d	f
99	90		b	c	e	a	f	d
100	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
101	92		b	c	e	d	f	a
102	93		b	c	f	a	d	e
103	94		b	c	f	a	e	d
104	95		b	c	f	d	a	e
105	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
106	97		b	d	a	c	e	f
107	98		b	d	a	c	f	e
108	99		b	d	c	a	e	f
109	100		b	d	c	a	f	e
110	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
111	102		b	d	e	a	f	c
112	103		b	d	e	c	a	f
113	104		b	d	e	c	f	a
114	105		b	d	f	a	c	e
115	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
116	107		b	d	f	c	a	e
117	108		b	d	f	c	e	a
118	109		b	e	a	c	d	f
119	110		b	e	a	c	f	d
120	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
121	112		b	e	a	d	f	c
122	113		b	e	c	a	d	f
123	114		b	e	c	a	f	d
124	115		b	e	c	d	a	f
125	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
126	117		b	e	d	a	c	f
127	118		b	e	d	a	f	c
128	119		b	e	d	c	a	f
129	120		b	e	d	c	f	a
130	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
131	122		b	e	f	a	d	c
132	123		b	e	f	c	a	d
133	124		b	e	f	c	d	a
134	125		b	e	f	d	a	c
135	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
136	127		b	f	a	c	d	e
137	128		b	f	a	c	e	d
138	129		b	f	a	d	c	e
139	130		b	f	a	d	e	c
140	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
141	132		b	f	c	a	e	d
142	133		b	f	c	d	a	e
143	134		b	f	c	d	e	a
144	135		b	f	d	a	c	e
145	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
146	137		b	f	d	c	a	e
147	138		b	f	d	c	e	a
148	139		b	f	e	a	c	d
149	140		b	f	e	a	d	c
150	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
151	142		b	f	e	c	d	a
152	143		b	f	e	d	a	c
153	144		b	f	e	d	c	a
154	145		c	a	b	d	e	f
155	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
156	147		c	a	d	b	e	f
157	148		c	a	d	b	f	e
158	149		c	a	e	b	d	f
159	150		c	a	e	b	f	d
160	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
161	152		c	a	e	d	f	b
162	153		c	a	f	b	d	e
163	154		c	a	f	b	e	d
164	155		c	a	f	d	b	e
165	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
166	157		c	b	a	d	e	f
167	158		c	b	a	d	f	e
168	159		c	b	d	a	e	f
169	160		c	b	d	a	f	e
170	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
171	162		c	b	e	a	f	d
172	163		c	b	e	d	a	f
173	164		c	b	e	d	f	a
174	165		c	b	f	a	d	e
175	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
176	167		c	b	f	d	a	e
177	168		c	b	f	d	e	a
178	169		c	d	a	b	e	f
179	170		c	d	a	b	f	e
180	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
181	172		c	d	b	a	f	e
182	173		c	d	e	a	b	f
183	174		c	d	e	a	f	b
184	175		c	d	e	b	a	f
185	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
186	177		c	d	f	a	b	e
187	178		c	d	f	a	e	b
188	179		c	d	f	b	a	e
189	180		c	d	f	b	e	a
190	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
191	182		c	e	a	b	f	d
192	183		c	e	a	d	b	f
193	184		c	e	a	d	f	b
194	185		c	e	b	a	d	f
195	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
196	187		c	e	b	d	a	f
197	188		c	e	b	d	f	a
198	189		c	e	d	a	b	f
199	190		c	e	d	a	f	b
200	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
201	192		c	e	d	b	f	a
202	193		c	e	f	a	b	d
203	194		c	e	f	a	d	b
204	195		c	e	f	b	a	d
205	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
206	197		c	e	f	d	a	b
207	198		c	e	f	d	b	a
208	199		c	f	a	b	d	e
209	200		c	f	a	b	e	d
210	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
211	202		c	f	a	d	e	b
212	203		c	f	b	a	d	e
213	204		c	f	b	a	e	d
214	205		c	f	b	d	a	e
215	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
216	207		c	f	d	a	b	e
217	208		c	f	d	a	e	b
218	209		c	f	d	b	a	e
219	210		c	f	d	b	e	a
220	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
221	212		c	f	e	a	d	b
222	213		c	f	e	b	a	d
223	214		c	f	e	b	d	a
224	215		c	f	e	d	a	b
225	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
226	217		d	a	b	c	e	f
227	218		d	a	b	c	f	e
228	219		d	a	c	b	e	f
229	220		d	a	c	b	f	e
230	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
231	222		d	a	e	b	f	c
232	223		d	a	e	c	b	f
233	224		d	a	e	c	f	b
234	225		d	a	f	b	c	e
235	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
236	227		d	a	f	c	b	e
237	228		d	a	f	c	e	b
238	229		d	b	a	c	e	f
239	230		d	b	a	c	f	e
240	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
241	232		d	b	c	a	f	e
242	233		d	b	e	a	c	f
243	234		d	b	e	a	f	c
244	235		d	b	e	c	a	f
245	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
246	237		d	b	f	a	c	e
247	238		d	b	f	a	e	c
248	239		d	b	f	c	a	e
249	240		d	b	f	c	e	a
250	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
251	242		d	c	a	b	f	e
252	243		d	c	b	a	e	f
253	244		d	c	b	a	f	e
254	245		d	c	e	a	b	f
255	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
256	247		d	c	e	b	a	f
257	248		d	c	e	b	f	a
258	249		d	c	f	a	b	e
259	250		d	c	f	a	e	b
260	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
261	252		d	c	f	b	e	a
262	253		d	e	a	b	c	f
263	254		d	e	a	b	f	c
264	255		d	e	a	c	b	f
265	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
266	257		d	e	b	a	c	f
267	258		d	e	b	a	f	c
268	259		d	e	b	c	a	f
269	260		d	e	b	c	f	a
270	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
271	262		d	e	c	a	f	b
272	263		d	e	c	b	a	f
273	264		d	e	c	b	f	a
274	265		d	e	f	a	b	c
275	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
276	267		d	e	f	b	a	c
277	268		d	e	f	b	c	a
278	269		d	e	f	c	a	b
279	270		d	e	f	c	b	a
280	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
281	272		d	f	a	b	e	c
282	273		d	f	a	c	b	e
283	274		d	f	a	c	e	b
284	275		d	f	b	a	c	e
285	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
286	277		d	f	b	c	a	e
287	278		d	f	b	c	e	a
288	279		d	f	c	a	b	e
289	280		d	f	c	a	e	b
290	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
291	282		d	f	c	b	e	a
292	283		d	f	e	a	b	c
293	284		d	f	e	a	c	b
294	285		d	f	e	b	a	c
295	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
296	287		d	f	e	c	a	b
297	288		d	f	e	c	b	a
298	289		e	a	b	c	d	f
299	290		e	a	b	c	f	d
300	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
301	292		e	a	b	d	f	c
302	293		e	a	c	b	d	f
303	294		e	a	c	b	f	d
304	295		e	a	c	d	b	f
305	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
306	297		e	a	d	b	c	f
307	298		e	a	d	b	f	c
308	299		e	a	d	c	b	f
309	300		e	a	d	c	f	b
310	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
311	302		e	a	f	b	d	c
312	303		e	a	f	c	b	d
313	304		e	a	f	c	d	b
314	305		e	a	f	d	b	c
315	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
316	307		e	b	a	c	d	f
317	308		e	b	a	c	f	d
318	309		e	b	a	d	c	f
319	310		e	b	a	d	f	c
320	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
321	312		e	b	c	a	f	d
322	313		e	b	c	d	a	f
323	314		e	b	c	d	f	a
324	315		e	b	d	a	c	f
325	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
326	317		e	b	d	c	a	f
327	318		e	b	d	c	f	a
328	319		e	b	f	a	c	d
329	320		e	b	f	a	d	c
330	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
331	322		e	b	f	c	d	a
332	323		e	b	f	d	a	c
333	324		e	b	f	d	c	a
334	325		e	c	a	b	d	f
335	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
336	327		e	c	a	d	b	f
337	328		e	c	a	d	f	b
338	329		e	c	b	a	d	f
339	330		e	c	b	a	f	d
340	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
341	332		e	c	b	d	f	a
342	333		e	c	d	a	b	f
343	334		e	c	d	a	f	b
344	335		e	c	d	b	a	f
345	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
346	337		e	c	f	a	b	d
347	338		e	c	f	a	d	b
348	339		e	c	f	b	a	d
349	340		e	c	f	b	d	a
350	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
351	342		e	c	f	d	b	a
352	343		e	d	a	b	c	f
353	344		e	d	a	b	f	c
354	345		e	d	a	c	b	f
355	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
356	347		e	d	b	a	c	f
357	348		e	d	b	a	f	c
358	349		e	d	b	c	a	f
359	350		e	d	b	c	f	a
360	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
361	352		e	d	c	a	f	b
362	353		e	d	c	b	a	f
363	354		e	d	c	b	f	a
364	355		e	d	f	a	b	c
365	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
366	357		e	d	f	b	a	c
367	358		e	d	f	b	c	a
368	359		e	d	f	c	a	b
369	360		e	d	f	c	b	a
370	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
371	362		e	f	a	b	d	c
372	363		e	f	a	c	b	d
373	364		e	f	a	c	d	b
374	365		e	f	a	d	b	c
375	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
376	367		e	f	b	a	c	d
377	368		e	f	b	a	d	c
378	369		e	f	b	c	a	d
379	370		e	f	b	c	d	a
380	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
381	372		e	f	b	d	c	a
382	373		e	f	c	a	b	d
383	374		e	f	c	a	d	b
384	375		e	f	c	b	a	d
385	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
386	377		e	f	c	d	a	b
387	378		e	f	c	d	b	a
388	379		e	f	d	a	b	c
389	380		e	f	d	a	c	b
390	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
391	382		e	f	d	b	c	a
392	383		e	f	d	c	a	b
393	384		e	f	d	c	b	a
394	385		f	a	b	c	d	e
395	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
396	387		f	a	b	d	c	e
397	388		f	a	b	d	e	c
398	389		f	a	c	b	d	e
399	390		f	a	c	b	e	d
400	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
401	392		f	a	c	d	e	b
402	393		f	a	d	b	c	e
403	394		f	a	d	b	e	c
404	395		f	a	d	c	b	e
405	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
406	397		f	a	e	b	c	d
407	398		f	a	e	b	d	c
408	399		f	a	e	c	b	d
409	400		f	a	e	c	d	b
410	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
411	402		f	a	e	d	c	b
412	403		f	b	a	c	d	e
413	404		f	b	a	c	e	d
414	405		f	b	a	d	c	e
415	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
416	407		f	b	c	a	d	e
417	408		f	b	c	a	e	d
418	409		f	b	c	d	a	e
419	410		f	b	c	d	e	a
420	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
421	412		f	b	d	a	e	c
422	413		f	b	d	c	a	e
423	414		f	b	d	c	e	a
424	415		f	b	e	a	c	d
425	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
426	417		f	b	e	c	a	d
427	418		f	b	e	c	d	a
428	419		f	b	e	d	a	c
429	420		f	b	e	d	c	a
430	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
431	422		f	c	a	b	e	d
432	423		f	c	a	d	b	e
433	424		f	c	a	d	e	b
434	425		f	c	b	a	d	e
435	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
436	427		f	c	b	d	a	e
437	428		f	c	b	d	e	a
438	429		f	c	d	a	b	e
439	430		f	c	d	a	e	b
440	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
441	432		f	c	d	b	e	a
442	433		f	c	e	a	b	d
443	434		f	c	e	a	d	b
444	435		f	c	e	b	a	d
445	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
446	437		f	c	e	d	a	b
447	438		f	c	e	d	b	a
448	439		f	d	a	b	c	e
449	440		f	d	a	b	e	c
450	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
451	442		f	d	a	c	e	b
452	443		f	d	b	a	c	e
453	444		f	d	b	a	e	c
454	445		f	d	b	c	a	e
455	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
456	447		f	d	c	a	b	e
457	448		f	d	c	a	e	b
458	449		f	d	c	b	a	e
459	450		f	d	c	b	e	a
460	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
461	452		f	d	e	a	c	b
462	453		f	d	e	b	a	c
463	454		f	d	e	b	c	a
464	455		f	d	e	c	a	b
465	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
466	457		f	e	a	b	c	d
467	458		f	e	a	b	d	c
468	459		f	e	a	c	b	d
469	460		f	e	a	c	d	b
470	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
471	462		f	e	a	d	c	b
472	463		f	e	b	a	c	d
473	464		f	e	b	a	d	c
474	465		f	e	b	c	a	d
475	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
476	467		f	e	b	d	a	c
477	468		f	e	b	d	c	a
478	469		f	e	c	a	b	d
479	470		f	e	c	a	d	b
480	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
481	472		f	e	c	b	d	a
482	473		f	e	c	d	a	b
483	474		f	e	c	d	b	a
484	475		f	e	d	a	b	c
485	XXX	XXX	XXX	XXX	XXX	XXX	XXX	XXX
486	477		f	e	d	b	a	c
487	478		f	e	d	b	c	a
488	479		f	e	d	c	a	b
489	480		f	e	d	c	b	a

Formeln der Tabelle

Diagramm - Grafik - Excel Tabellen einfach im Web darstellen Excel Jeanie HTML 3.0 Download

Spieler

Punkte

Tauschmögl. mit Spielern

-6

erlaubte Aufstellungen:

487

478

488

479

489

480

Hallo Benjamin,
die folgende VBA-Prozedur sortiert (intern, also nicht in der Tabelle) die Spieler nach Punkten. In der Tabelle brauchen die Werte jetzt nicht mehr sortiert zu sein:
Sub Aufstellungen() Const anzS = 6 Dim ii%, jj%, nn% Dim Sp$(1 To anzS), Pk%(1 To anzS) Dim vb%(1 To anzS, 1 To 2) Dim i1%, i2%, i3%, i4%, i5%, i6% Dim tt1$, tt2$, tt3$, tt4$, tt5$, tt6$ ' Einlesen Spieler und Punkte For ii = 1 To anzS Sp(ii) = Cells(ii + 1, 1) Pk(ii) = Cells(ii + 1, 2) Next ii ' Sort nach Punkten For ii = 1 To anzS - 1 For jj = ii + 1 To anzS If Pk(ii) < Pk(jj) Then nn = Pk(ii): Pk(ii) = Pk(jj): Pk(jj) = nn tt1 = Sp(ii): Sp(ii) = Sp(jj): Sp(jj) = tt1 End If Next jj Next ii ' Tauschmögl. pro Spieler For ii = 1 To anzS For jj = 1 To anzS If Abs(Pk(ii) - Pk(jj)) <= 8 Then If vb(ii, 1) = 0 Then vb(ii, 1) = jj If vb(ii, 2) < jj Then vb(ii, 2) = jj Else Exit For End If End If Next jj Next ii ' Aufstellungen ermitteln nn = 9 For i1 = vb(1, 1) To vb(1, 2) tt1 = i1 For i2 = vb(2, 1) To vb(2, 2) If InStr(tt1, CStr(i2)) = 0 Then tt2 = tt1 & i2 For i3 = vb(3, 1) To vb(3, 2) DoEvents If InStr(tt2, CStr(i3)) = 0 Then tt3 = tt2 & i3 For i4 = vb(4, 1) To vb(4, 2) If InStr(tt3, CStr(i4)) = 0 Then tt4 = tt3 & i4 For i5 = vb(5, 1) To vb(5, 2) If InStr(tt4, CStr(i5)) = 0 Then tt5 = tt4 & i5 For i6 = vb(6, 1) To vb(6, 2) If InStr(tt5, CStr(i6)) = 0 Then tt6 = tt5 & i6 nn = nn + 1 Cells(nn, 1) = nn - 9 For ii = 1 To anzS Cells(nn, ii + 2) = Sp(Mid(tt6, ii, 1)) Next ii End If Next i6 End If Next i5 End If Next i4 End If Next i3 End If Next i2 Next i1 End Sub
Rückmeldung wäre nett! - Grüße von Erich aus Kamp-Lintfort

Beliebteste Forumthreads (12 Monate)

formelproblem: zahlen sortieren, toleranz beachten

11 Beiträge zum Forumthread Beiträge zu diesem Forumthread

VBA Beispiele zu verwandten Themen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

11
Beiträge zum Forumthread

Beiträge zu diesem Forumthread