Doppelte Zahlen in einer Zelle entfernen

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Hallo Rudolf,
... der Lösungsvorschlag von Boris, erfordert in Excel 2010, dass Du die Datei als XLSM-Datei abspeichern musst, wenn Du auf die Formel wieder zurückgreifen musst.
Nachfolgende Lösungsvorschlag erfordert zwar eine weitere Hilfsspalte ist aber als XLSx-Datei abspeicherbar.
Die Formeln B1, C2 und D2 einfach nach unten ziehend kopieren. Die Formel in E1 ergibt dann die gewünschte Lösung. Die Formeln in Spalte G können alternativ zu den in Spalte B genutzt werden. Dort werden die Zahlen nur der Größe nach gelistet, was etwas einfachere Formeln erfordert.

	A	B	C	D	E	F	G
1	12,34,-765,12,45,-5,4567,12,123,345,12,-765	12	12	12	12,34,-765,12,45,-5,4567,12		-765
2		34	34	12,34			-5
3		-765	-765	12,34,-765			12
4		12	45	12,34,-765,12			34
5		45	-5	12,34,-765,12,45			45
6		-5	4567	12,34,-765,12,45,-5			123
7		4567	123	12,34,-765,12,45,-5,4567			345
8		12	345	12,34,-765,12,45,-5,4567,12			4567
9		123
10		345
11		12
12		-765
13

Formeln der Tabelle

Zelle	Formel
B1	=WENNFEHLER(--LINKS(TEIL(WECHSELN(","&A$1;",";"#";ZEILE(A1)); FINDEN("#";WECHSELN(","&A$1;",";"#";ZEILE(A1)))+1;999); FINDEN(",";TEIL(WECHSELN(","&A$1;",";"#";ZEILE(A1)); FINDEN("#";WECHSELN(","&A$1;",";"#";ZEILE(A1)))+1;999)&",")-1); "")
C1	=B1
D1	=B1
E1	=VERWEIS(9;1/(D1:D18<>""); D:D)
G1	=MIN(B1:B19)
C2	{=WENN(C1="";"";INDEX(B:B;MIN(WENN(ISTNV(VERGLEICH(B$1:B$19;C$1:C1;)); ZEILE(B$1:B$19)))))}
D2	=WENN(C2="";"";D1&","&B2)
G2	{=WENN(MAX(G$1:G1)=MAX(B$1:B$18); "";MIN(WENN(B$1:B$18>G1;B$1:B$18)))}

Enthält Matrixformel:
Umrandende { } nicht miteingeben,
sondern Formel mit STRG+SHIFT+RETURN abschließen!

Matrix verstehen

Excel Tabellen im Web darstellen >> Excel Jeanie HTML 4
Gruß Werner
.. , - ...

Ein Hallo und Danke für die Super schnellen Antworten. Klasse und Danke
Leider habe ich ein --- Aber. ---
Das ist aber nur meiner Dummheit zuzuschreiben, weil ich nicht mit einer so ausführlichen Reaktion gerechnet hatte.
Also zu meine eigentlichen Problem, ich möchte mir ein Sudoku machen --- was ich zum Teil auch schon fertig habe. Ja, bis auf die Zahlenfelder die ich neben dem eigentlichen Spielfeld als Kontrollfelder noch einmal gemacht habe.
In diesem sollen dann die noch möglichen Zahlen angezeigt werden.
Wenn ich jetzt wüsste wie es schafft das so eine Excel Seite hier anzuzeigen könnte ich es Euch zeigen was ich schon gemacht habe.
Kurzbeschreibung:
Ich habe ein 9*9 Kasten als Box1 im Namenfeld gemacht.
Wobei die Box1 bei B2 beginnt. In K1 sind die möglichen Grundzahlen: 1,2,3,4,5,6,7,8,9
drunter die Formel.
' =WENN($B2="";$K$1;ERSETZEN($K$1;WENN(SUCHEN(B2;$K$1;1)=17;SUCHEN(B2;$K$1;1)-1;SUCHEN(B2;$K$1;1));2;""))
genau drunter:
' =WENN(B3="";G7;ERSETZEN(G7;WENN(SUCHEN(B3;G7;1)=15;SUCHEN(B3;G7;1)-1;SUCHEN(B3;G7;1));2;""))
usw. 7 mal weiter runter kopiert.
Egal welche Zahl ich jetzt im Bereich B2:D4 eingebe, stehen in der letzten Zeile die noch möglichen letzten Zahlen. Das gleiche habe ich dann mit Zeile 2 und Spalte 2 gemacht.
Wenn ich jetzt die Zahlen aus den letzten drei Zeilen von Box1 Zeile2 und Spalte2 zusammensetze bekomme ich natürlich die möglichen Zahlen.
' =WENN(ISTZAHL(FINDEN(F7;$G$15));WENN(ISTZAHL(FINDEN(F7;$N$15));"J";ERSETZEN(G15;F7;2;"")))
Sicher sind Euch ja die möglichkeiten des Sudokus bekannt.
Ich hoffe jetzt etwas mehr Licht ins dunkel meiner Sorgen gebracht zu haben.
Ein solches Spiel habe ich mit VBA schon vor zehn Jahren gemacht. Da ich aber seither nichts mehr mit Excel gemacht habe, habe ich eine Unmenge vergessen. Wenn ich jetzt so sehe was Ihr hier so macht -- alle Achtung -- toll.

Beliebteste Forumthreads (12 Monate)

Doppelte Zahlen in einer Zelle entfernen

8
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

365 Forumthreads zu ähnlichen Themen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

Doppelte Zahlen in einer Zelle entfernen

8 Beiträge zum Forumthread Beiträge zu diesem Forumthread

365 Forumthreads zu ähnlichen Themen

VBA Beispiele zu verwandten Themen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

8
Beiträge zum Forumthread

Beiträge zu diesem Forumthread