Ein Fall für AGGREGAT - mal etwas anders

	A	B	C	D	E	F	G	H	I	J	K
1	Original	Ergebnis	AnfIndex	EndIndex	Daten	← Standard	Ergebnis	AnfIndex	EndIndex	Daten	← UDFs (VBA)
2	Früh	2× Früh	2	3	Früh	(singul MxFmln)	2× Früh	2	3	Früh	(plurale MxFmln)
3	Früh	2× Spät	4	5	Spät		2× Spät	4	5	Spät
4	Spät	1× Frei	6	6	Frei		1× Frei	6	6	Frei
5	Spät	2× Nacht	7	8	Nacht		2× Nacht	7	8	Nacht
6	Frei	4× Frei	9	12	Frei		4× Frei	9	12	Frei
7	Nacht	2× Früh	13	14	Früh		2× Früh	13	14	Früh
8	Nacht	2× Frei	15	16	Frei		2× Frei	15	16	Frei
9	Frei	2× Spät	17	18	Spät		2× Spät	17	18	Spät
10	Frei	1× FrühSonntag	19	19	FrühSonntag		1× FrühSonntag	19	19	FrühSonntag
11	Frei	#ZAHL!	#ZAHL!	#ZAHL!	#ZAHL!		#NV	#NV	#NV	#NV
12	Frei	B2[:B10]: {=AGGREGAT(15;4;WENN(A$2:A$19=A$3:A$20;"";ZEILE(A$2:A$19));ZEILE(A1))-AGGREGAT(15;4;WENN(A$2:A$19=A$1:A$18;"";ZEILE(A$2:A$19));ZEILE(A1))+1&"× "&INDEX(A$1:A$19;AGGREGAT(15;4;WENN(A$2:A$19=A$1:A$18;"";ZEILE(A$2:A$19));ZEILE(A1)))}
13	Früh	C2[:C10]: {=AGGREGAT(15;4;WENN(A$2:A$19=A$1:A$18;"";ZEILE(A$2:A$19));ZEILE(A1))}
14	Früh	D2[:D10]: {=AGGREGAT(15;4;WENN(A$2:A$19=A$3:A$20;"";ZEILE(A$2:A$19));ZEILE(A1))}
15	Frei	E2[:E10]: {=INDEX(A$1:A$19;AGGREGAT(15;4;WENN(A$2:A$19=A$1:A$18;"";ZEILE(A$2:A$19));ZEILE(A1)))}
16	Frei	G2:G10: {=VSplit(VJoin(WENN(A2:A19=A3:A20;"";ZEILE(A2:A19));;-1);;1;1)-VSplit(VJoin(WENN(A2:A19=A1:A18;"";ZEILE(A2:A19));;-1);;1;1)+1&"× "&DataSet(NoErrRange(A2:A19;;A2:A19≠A1:A18);A2;;;1)}
17	Spät	H2:H10: {=VSplit(VJoin(WENN(A2:A19=A1:A18;"";ZEILE(A2:A19));;-1);;1;1)}
18	Spät	I2:I10: {=VSplit(VJoin(WENN(A2:A19=A3:A20;"";ZEILE(A2:A19));;-1);;1;1)}
19	FrühSonntag	J2:J10: {=DataSet(NoErrRange(A2:A19;;A2:A19≠A1:A18);A2;;;1)}

Original

Ergebnis

AnfIndex

EndIndex

Daten

← Standard

Ergebnis

AnfIndex

EndIndex

Daten

← UDFs (VBA)

Früh

2× Früh

Früh

(singul MxFmln)

2× Früh

Früh

(plurale MxFmln)

Früh

2× Spät

Spät

2× Spät

Spät

1× Frei

Frei

1× Frei

Frei

Spät

2× Nacht

Nacht

2× Nacht

Nacht

Frei

4× Frei

Frei

4× Frei

Frei

Nacht

2× Früh

Früh

2× Früh

Früh

Nacht

2× Frei

Frei

2× Frei

Frei

2× Spät

Spät

2× Spät

Spät

Frei

1× FrühSonntag

FrühSonntag

1× FrühSonntag

FrühSonntag

Frei

#ZAHL!

#NV

Frei

B2[:B10]: {=AGGREGAT(15;4;WENN(A$2:A$19=A$3:A$20;"";ZEILE(A$2:A$19));ZEILE(A1))-AGGREGAT(15;4;WENN(A$2:A$19=A$1:A$18;"";ZEILE(A$2:A$19));ZEILE(A1))+1&"× "&INDEX(A$1:A$19;AGGREGAT(15;4;WENN(A$2:A$19=A$1:A$18;"";ZEILE(A$2:A$19));ZEILE(A1)))}

Früh

C2[:C10]: {=AGGREGAT(15;4;WENN(A$2:A$19=A$1:A$18;"";ZEILE(A$2:A$19));ZEILE(A1))}

Früh

D2[:D10]: {=AGGREGAT(15;4;WENN(A$2:A$19=A$3:A$20;"";ZEILE(A$2:A$19));ZEILE(A1))}

Frei

E2[:E10]: {=INDEX(A$1:A$19;AGGREGAT(15;4;WENN(A$2:A$19=A$1:A$18;"";ZEILE(A$2:A$19));ZEILE(A1)))}

Frei

G2:G10: {=VSplit(VJoin(WENN(A2:A19=A3:A20;"";ZEILE(A2:A19));;-1);;1;1)-VSplit(VJoin(WENN(A2:A19=A1:A18;"";ZEILE(A2:A19));;-1);;1;1)+1&"× "&DataSet(NoErrRange(A2:A19;;A2:A19≠A1:A18);A2;;;1)}

Spät

H2:H10: {=VSplit(VJoin(WENN(A2:A19=A1:A18;"";ZEILE(A2:A19));;-1);;1;1)}

Spät

I2:I10: {=VSplit(VJoin(WENN(A2:A19=A3:A20;"";ZEILE(A2:A19));;-1);;1;1)}

FrühSonntag

J2:J10: {=DataSet(NoErrRange(A2:A19;;A2:A19≠A1:A18);A2;;;1)}

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

…Luschi,
ansonsten mal folgende Charakterisierung:
1. Was ist der Unterschied zwischen „klassischen“ Fmln, die nur Xl-Standard-Fktt und solchen, die auch noch UDFs enthalten?
Die Standard-Fktt sind idR mehr oder weniger gut dokumentiert und stehen normalerweise ab der Xl-Version ihrer Einführung allen Nutzern zV! Meine UDFs haben idR nur einen vorangestellten stichpktartigen Kommentar, die von anderen Autoren enthalten bestenfalls pgmbegleitende Kommentare. Sie stehen dem zV, der sie in der EinsatzDatei, der Personal.xlsm/b oder einem AddIn bereitstellt.
Einschränkung: Neuerdings stehen auch MS-Fktt nicht mehr allen Nutzern der jeweiligen Xl-Version zV.
2. Muss ein FktsNutzer unbedingt das Pgm der Fkt kennen?
Sicher nein! Er muss aber wenigstens das AnwendungsHptZiel kennen! Das ist bei StandardFktt der Doku entnehmbar, bei UDFs ggf einer qualifizierten Beschreibung. Eine komplette Hilfe ist auch für UDFs machbar, bedeutet aber viel zusätzliche Arbeit. Leider kann diese dann auch nicht mehr in gleicher Form wie die Xl-Hilfe erstellt wdn, weil MS diese geändert hat.
Nur, weil bei UDFs aus Foren das Pgm einsehbar ist, heißt das nicht, dass sich ein NormalNutzer auch damit beschäftigen muss! Bei meinen UDFs könnte das Lesen des Kommentars oder, falls vorhanden, der AnwendungsBeschreibung reichen. Alles Weitere kann man ggf auch durch Ausprobieren herausfinden, ganz so, wie es auch die Fml-Cracks mit MS-Fktt getan haben und noch tun. AGGREGAT wäre hier nur ein Bsp.
3. Für welchen Nutzerkreis sind meine UDFs bestimmt?
In 1.Linie für (fortgeschrittene) Xl-Nutzer per Fml, die auch VBA nutzen dürfen und die sich daraus ergebenden Konsequenzen beachten. Aber auch ihr Einsatz in SubRoutinen ist idR möglich, wobei in einigen wenigen Fällen eine etwas andere Argumentierung erforderlich bzw zweckmäßig sein kann (→vgl zB BgColor für Variante ZellFarben aus BedingtFormat).
Für FmlAnwender sind also höchstens die UDF-Einsatzmöglichkeiten interessant (vgl dazu aber unten); erst für Leute, die selber pgmmieren oder pgmmieren wollen, ggf gewisse ProblemLösungen und pgmtechnische Vorgehensweisen. Bei MS-Fktt gibt's diese Chance nicht! Außerdem könnten diese auch noch auf eine Weise mit der Xl-Steuerung interagieren, die einer UDF großenteils versagt ist.
Deshalb ist es durchaus naheliegend, dass ein durchschnittliches Publikum in beiden LehrVarianten hiervon überfordert ist (diese Erfahrung hatte ich einst schon mit wesentlich Bescheiderem machen müssen). Man muss dabei auch beachten, mit welchen Absichten, Voraussetzungen und Motivationen die Teilnehmer den Kurs besuchen. Immer wieder wird es Teilnehmer aus Firmen bzw Kreisen geben, in denen kaum mehr als einige wenige MS-Fktt regelmäßig in Fmln eingesetzt wdn. Das war vor 13 Jahren nicht anders und dürfte sich inzwischen auch nur unwesentlich verbessert haben. Wir sehen hier im Forum ja nur die mehr oder weniger „leuchtende Spitze des Eisbergs“, während du in deinen Kursen auch mit den „dunklen Abgründen“ darunter konfrontiert wirst… ;-]
Wolkenkuckucksheim ist also viel größer als mancher glauben mag und beschränkt sich durchaus nicht nur auf UDFs.
Ansonsten wäre es ja nicht schwer zu sagen, was die UDFs tun:
VJoin verbindet ähnlich wie die neue XlFkt TEXTVERKETTEN alle Inhalte eines ZellBereichs oder eines ein Datenfeld liefernden 1.Arguments miteinander, wobei es verschiedene Varianten gibt (hier unter Weglassen der LeerTexte).
VSplit trennt Texte an definierter Stelle (hier die Ergebnisse des Vorstehenden) und kann b.Bed u.a. numerische Texte in echte Zahlen umwandeln.
NoErrRange erzeugt einen unzusammenhängenden Bereich durch Weglassen von Zellen mit F-Werten und je nach Bedarf ausgeblendeten oder Zellen, die eine angebbare Bedingung erfüllen; Xl kann solche Bereiche idR nicht direkt abbilden, weshalb eine weitere Fkt erforderlich ist, die daraus ein abbildbares Datenfeld macht.
DataSet führt verschiedene Arten von DatenMengen-Operationen durch, wobei auch ein einziger Vektor erzeugt wdn kann.
Ansonsten freut's mich durchaus, dass du meine UDFs wenigstens für eigenen Einsatz gebrauchen kannst. ;-)
Gruß, Luc :-?

…empfohlenes Verhalten, Klaus;
man sollte stets auf dem untersten Level der vorgesehenen Hard- bzw Software-Plattformen entwickeln bzw das EntwicklungsLevel angeben, zumindest bei offiziellen Angeboten. Nur handelt es sich bei kostenfreien Angeboten in einem Forum stets um inoffizielle auf eigenes Risiko des Nutzers. Auch die Archivierung und häufige Empfehlung (Verlinkung) derselben ändert daran nichts.
Ansonsten dürfte es bei der Mehrzahl meiner UDFs (vor allem den hier veröffentlichten) nicht zu den von dir genannten Problemen kommen. Die dürften auf einer Ebene liegen, die nur zT vom Entwickler kontrolliert wdn kann, nämlich, wie sieht die VBA-Implementation auf der jeweiligen Plattform aus? Das unterscheidet sich ja auch bei neuesten Xl-Versionen. Davor hat zB Nepumuk auch schon des Öfteren gewarnt. Wollte man das sicherer machen, müsste man wohl COM-Addins, uU auch auf Basis einer anderen Sprache, generieren. Dann wäre allerdings zumindest eine qualifizierte Hilfe inkl Bspp erforderlich, weil die Pgmm dann niemand mehr ohne Verletzung des Urheberrechts zu Gesicht bekommt, womit sich der Kreis schließen würde und nichts mehr kostenfrei wäre…
Wenn ein VBA-Compiler bzw -Adapter (wie der von LO/OO) nicht von MS stammt, kann hinzukommen, dass die VBA-Syntax sehr streng ausgelegt wird. Wurde das nicht eingehalten, weil bspw der VBE nichts beanstandet hat, hat man halt Pech gehabt (falls das nicht beabsichtigt war!). Das dürfte dann auch bei vielen meiner UDFs der Fall sein.
So habe ich bspw bei einer qualifizierteren Range2HTML-Variante JavaScript-Pgmm einbauen müssen, weil die meisten Browser VBScript nicht verstehen und außerdem die ForumsSoftware-Automatik auf die ProzedurKöpfe mit Zerhackung des die HTML-Tab enthaltenen TextStreams reagiert.
Was meine UDFs betrifft, sind sie in 1.Linie für den normalen Xl-Nutzer gedacht, für VBA-Interessierte haben sie höchstens einen gewissen LernEffekt, der natürlich vom jeweiligen KenntnisStand abhängt. Die Cracks beiderlei Ausrichtung interessiert das kaum. Der Ehrgeiz der Einen richtet sich auf die Lösung mit Xl-Standards, der der Anderen auf eigenes Pgmmier-Bemühen. Ich hatte u.a. auch deshalb in meinen 1.Jahren hier nur sehr wenige UDFs gezeigt. Ich habe nämlich keine Lust, für die immense Arbeit nicht nur keinen Dank zu erhalten, sondern mitunter sogar Anfeindungen hinnehmen zu müssen; etwas, was Leute, die keinerlei Ambitionen hegen, irgendetwas für irgendjemand umsonst zu tun, nur in ihren Ansichten bestätigen würde. Natürlich ist es auch befriedigend, ein Problem so zu verallgemeinern, dass daraus eine vielseitig einsetzbare Lösung erwächst, was dann auch den Hilfsmittel-Park eines Nutzers überschaubar hält. Dass das Teilnehmer eines Lehrgangs höchstens am Rande interessiert, ist doch auch verständlich. Anders sähe es vielleicht aus, wenn dazu ein Lehrbuch mit Bspp erscheinen würde, auf dessen Basis dann Fortgeschrittenen-Lehrgänge für Interessenten organisiert würden. Aber damit will ich mich nun wirklich nicht mehr auseinandersetzen (10-20 Lebensjahre zu spät).
Das „Herumdoktern“ an meinen UDFs ist auch nicht vorgesehen. Die sind, ebenso wie Xl-Fktt, nunmal so wie sie sind. Anzeigen von Fehlern (bzw Ungereimtheiten) und ggf auch VerbesserungsVorschläge nehme ich aber an. Ich würde es nämlich nicht gutheißen, wenn außer den offiziellen Versionen noch nicht als solche gekennzeichnete Unterversionen gleichen Namens in Umlauf wären, die dann womöglich ganz anders reagieren. Wer das unbedingt machen will/muss, sollte an die Nr der AusgangsVersion wenigstens noch eine weitere .#-Stelle anhängen und die Modifikation (mit Autor) vermerken. Aber lieber wäre mir, er ließe sich nur inspirieren und würde eine eigene UDF mit neuem Namen schreiben. Die Ausgangsbasis kann/sollte ggf angegeben wdn. Aber dabei immer daran denken, dass man das mit Standard-Fktt auch nicht machen kann. Ein Projekt zur NachPgmmierung von Xl-Fktt in VBA ist ja schon im Ansatz (Ol-Xl, vor 10 Jahren endgültig) gescheitert.
Morrn, Luc :-?

Beliebteste Forumthreads (12 Monate)

Ein Fall für AGGREGAT - mal etwas anders

29
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

143 Forumthreads zu ähnlichen Themen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

	A	B	C	D	E
1	Daten	Loki (1)		neopa (1)	neopa (2)
2	Früh	2× Früh		2x Früh	2x Früh
3	Früh	2× Spät		2x Spät	2x Spät
4	Spät	1× Frei		1x Frei	1x Frei
5	Spät	2× Nacht		2x Nacht	2x Nacht
6	Frei	4× Frei		4x Frei	4x Frei
7	Nacht	2× Früh		2x Früh	2x Früh
8	Nacht	2× Frei		2x Frei	2x Frei
9	Frei	2× Spät		2x Spät	2x Spät
10	Frei	1× FrühSonntag		1x FrühSonntag	1x FrühSonntag
11	Frei	#ZAHL!		#ZAHL!
12	Frei
13	Früh
14	Früh
15	Frei
16	Frei
17	Spät
18	Spät
19	FrühSonntag
20

Ein Fall für AGGREGAT - mal etwas anders

29 Beiträge zum Forumthread Beiträge zu diesem Forumthread

143 Forumthreads zu ähnlichen Themen

VBA Beispiele zu verwandten Themen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

29
Beiträge zum Forumthread

Beiträge zu diesem Forumthread