Opgelost Combinaties van letters

[Pletter]

Wie kan mijn helpen aan een voorbeeld met een combinatie van 4 letters welke gebruikt gaan worden als een case in Access. Alvast bedankt voor een bijdrage.

Groet,

 

[AHulpje]

Select Case expressie
   Case conditie_1
      resultaat_1
   Case conditie_2
      resultaat_2
   ...
   Case conditie_n
      resultaat_n
   Case Else
      resultaat_else
End Select

 

[Pletter]

AHulpje,

bedankt voor de bijdrage maar de case is niet het probleem.
Het schijnt wanneer je een combinatie van 4 letters zoekt dit zoiets van 120 mogelijkheden heeft.
Begreep dat deze combinaties door Excel eenvoudig gemaakt kan worden. Mijn kennis van Excel is nul,nul dus dit laat ik aan de knappe koppen van Excel over.

Groet,

 

[peter59]

Het zal wel aan mij liggen maar wat bedoel je nu eigenlijk allemaal?

 

[AHulpje]

Met vier verschillende letters heb je 24 (4!) mogelijkheden. Wil je al die mogelijkheden in een Case statement opnemen? Bijgaande macro kan die combinaties voor je genereren.

 

[Pletter]

Peter,

4 letters A,B,C,D
daar kan je een aantal combinaties (+/- 24) mee maken b.v.
A
AB
ABC
ABCD
B
BA
BAC
BACD

enz.

Vraag nu om een oplossing in Excel.

Groet,

Bericht automatisch samengevoegd: Vandaag om 12:47

Hulpje,

Ja die mogelijkheden wil ik met een select case in Access gebruiken.
Waar kan ik die Macro vinden?

Groet,

 

[AHulpje]

De macro in #5 genereert alleen combinaties van alle opgegeven letters, in dit geval van 4 letters, de combinaties van 1, 2 of 3 letters zitten er niet bij.

 

[Pletter]

AHulpje,
Zag nu jouw bijlage.
Het is wel de bedoeling dat er de combinaties van 1,2,3 letter en ook 4 natuurlijk gemaakt zijn.

Groet,

 

[AHulpje]

Vertel eens wat het doel is dat je wenst te bereiken, ik heb zo het vermoeden dat dat slimmer kan.

 

[edmoor]

Je stelt een vraag in het Excel forum voor een case in Access?

 

[Pletter]

AHulpje,

gedeelte van de code: strSQL = "SELECT tblGeboorte.*, Diffdatum( 'd' ,[GeboorteDatum],..........

waar 'd' staat dit kan je niet vervangen door een variabel in Access om dit te laten werken in een Query.
Wat in wel kan doen is de strSQL opspitsen en na de select case weer samen voegen.

Groet,

Bericht automatisch samengevoegd: Vandaag om 13:19

edmoor,

ja goed werk toch. Waarschijnlijk zou ik dit niet doen als het in Access ook kon.

Groet,

 

[djutoch]

Lijstje met alle mogelijkheden met 1,2,3 en 4 letters.
Misschien heb je er iets aan?

 

[edmoor]

ja goed werk toch. Waarschijnlijk zou ik dit niet doen als het in Access ook kon.

Om maar even duidelijk te hebben dat dat ook inderdaad je bedoeling is.

 

[RogerS]

Bij 4 verschillende letters zijn dat 358.800 mogelijke combinaties. Wordt een lange lijst en wordt een nog leuker case statement

 

[AHulpje]

Ik weet niet of je met jouw Diffdatum functie eigenlijk Datediff bedoelde en geen idee waarom je 'd' zou willen vervangen door een vreemde combinatie van karakters, maar dit werkt wel:

    a = "d"
    Debug.Print DateDiff(a, "1-1-2025", "31-12-2025")

@RogerS
Ik zou ze toch even natellen als ik jou was.

 

[RogerS]

26*25*24*23 is toch echt 358.800

Als dubbele letters niet uitmaakt dan zijn het 456.976 mogelijkheden.

Ik kan niet zeggen dat ik vroeger heb opgelet bij Wiskunde A, maar blijkbaar is er toch nog iets van blijven hangen.

 

[Pletter]

AHulpje,

Diffdatum is de call naar een Function.

Verder is het niet zo belangrijk. Kan me redden als ik de verschillende combinaties heb.

Groet,

Bericht automatisch samengevoegd: Vandaag om 13:57

RogerS,

Het zijn maar vier (4) letters en dan wordt het aantal iets minder.
385.000 in select case kan ook niet.

Groet,

 

[AHulpje]

@RogerS
Als je vier verschillende letters uit het alfabet hebt gekozen en dat is wat ik begrijp uit #6 is dat 4x3x2x1=24 combinaties.
Maar als je alle combinaties van vier verschillende letters uit het hele alfabet mag gebruiken is dat 26! en dat is 403291461126605635584000000, dus ongeveer 4x10^26.

@Pletter
Dan neem ik aan dat je nu geholpen bent? Zie ook #12.

 

[Pletter]

djutoch,

bedankt voor de poging, maar de 4 letters komen maar 1 keer voor, geen aaaa of aa of aabb enz.
Het is altijd een combinatie van 4 enkele letters.

 

[Tech8]

met 4 letters heb je 256 mogelijkheden,

=INDEX({"A";"B";"C";"D"};QUOTIENT(RIJ()-1;64)+1)&INDEX({"A";"B";"C";"D"};QUOTIENT(REST(RIJ()-1;64);16)+1)&INDEX({"A";"B";"C";"D"};QUOTIENT(REST(RIJ()-1;16);4)+1)&INDEX({"A";"B";"C";"D"};REST(RIJ()-1;4)+1)

in A1 en doortrekken tot A256