PQ zufällige Reihenfolge

Forumthread: PQ zufällige Reihenfolge

26.04.2024 21:29:07

Christian

Hallo,

kurze Frage, habe in PQ mit einer benutzerdefinierten Spalte und Number.Random() as number meine Abfrage in eine zufällige Reihenfolge gebracht.

Gibt es auch eine Möglichkeit, dass sich diese zufällige Reihenfolge mit jedem Aktualisieren der Abfrage ändert?

Danke
Christian

9
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: PQ zufällige Reihenfolge

26.04.2024 21:33:42

Eifeljoi 5
Off topic

27.04.2024 09:22:34

RPP63
AW: Off topic

27.04.2024 13:09:13

Christian
Zur Erklärung

27.04.2024 16:01:14

RPP63
AW: PQ zufällige Reihenfolge

26.04.2024 21:36:06

Christian
Nachtrag

26.04.2024 21:38:04

Christian
habs jetzt mit VBA gelöst

26.04.2024 21:57:21

Christian
Frage nicht mehr offen

26.04.2024 21:57:47

Christian
AW: habs jetzt mit VBA gelöst

27.04.2024 13:50:50

Eifeljoi 5

AW: PQ zufällige Reihenfolge

26.04.2024 21:33:42

Eifeljoi 5

Hallo

Wo ist das Problem?
Aktualisieren
Ausprobieren

Off topic

27.04.2024 09:22:34

RPP63

Moin!
Nur ergänzend eine zufällige Sortierung einer Liste mittels Formel:

	D	E
1	A	J
2	B	I
3	C	A
4	D	C
5	E	B
6	F	H
7	G	G
8	H	D
9	I	E
10	J	F

Zelle	Formel
D1	=ZEICHEN(SEQUENZ(10;;65))
E1	=SORTIERENNACH(D1#;ZUFALLSMATRIX(ZEILEN(D1#)))

Gruß Ralf

AW: Off topic

27.04.2024 13:09:13

Christian

Hallo Ralf,

danke erstmal für deinen interessanten Beitrag, interessant, weil ich diese Möglichkeit noch gar nicht kannte. Ich muss zugeben, ich verstehe die Formeln auch nicht so ganz, weil ich nicht weiß was die # bedeuten, habe das noch nie zuvor gesehen.

aber gut, es gab noch einen weiteren Grund, weshalb ich zu einer VBA Lösung gegriffen habe.
Die tägliche Arbeit mit der Mappe sieht so aus, dass neue csv Dateien heruntergeladen werden, per PQ weiterverarbeitet werden und dann mitsamt Formeln zahlreiche Statistiken und Berechnungen erstellt werden, welche sich dann dadurch täglich aktualisieren.

Aus dem Grund existierte bereits ein makro, dass schon angefangen beim runterladen und löschen der alten Dateien alles aktualisieren und sogar Auflisten von Änderungen alles mit einem einzigen Knopfdruck gemacht hat. Ich habe also um das in eine zufällige Reihenfolge zu bringen, einfach diesem großen bestehenden Makro hinzugefügt ein weiteres Sub hinzugefügt.

Gruß
Christian

Zur Erklärung

27.04.2024 16:01:14

RPP63

In D1 steht mit =ZEICHEN(SEQUENZ(10;;65)) eine Formel, die die Buchstaben A bis J spillt.
Auf diesen Bereich kann man natürlich "konventionell" mit D1:D10 zugreifen.
Manchmal ist es vielleicht mühselig, die Größe des Bereichs zu ermitteln.
Dann hilft die #-Notation.
D1 ist die Formelzelle, Excel nennt sie SpillParent.
D1# ist der dynamische Bereich, genannt SpillingToRange

Wenn in D1:D10 manuell eingetragene Namen sind, sortiert man die zufällig mittels
=SORTIERENNACH(D1:D10;ZUFALLSMATRIX(10))

AW: PQ zufällige Reihenfolge

26.04.2024 21:36:06

Christian

also bei mir ändert sich die reihenfolge nicht, wenn ich die Abfrage aktualisiere

Nachtrag

26.04.2024 21:38:04

Christian

beim ersten mal, als ich die Zufallszahlen ereugt habe, natürlich schon, aber die bleiben jetzt konstant und damit ändert sich die Reihenfolge bei weiteren Aktualisierungen nicht mehr

habs jetzt mit VBA gelöst

26.04.2024 21:57:21

Christian

Private Sub NV_2()

        

    LetzteA = Worksheets("NV2").Cells(Rows.Count, 1).End(xlUp).Row

    

    ActiveWorkbook.Connections("Abfrage - NV").Refresh

        

    With Worksheets("NV2")

       

       .Range("B2:B" & LetzteA).FormulaLocal = "=ZUFALLSZAHL()"

       .Range("B2:B" & LetzteA).Value = .Range("B2:B" & LetzteA).Value2

       

       .Range("A2:B" & LetzteA).Sort Key1:=.Cells(1, 2), Order1:=xlAscending, Header:=xlYes, Orientation:=xlTopToBottom

                            

       .Range("B:B").Delete

       

    End With

End Sub

trodem danke
Christian

Frage nicht mehr offen

26.04.2024 21:57:47

Christian

AW: habs jetzt mit VBA gelöst

27.04.2024 13:50:50

Eifeljoi 5

Hallo

Ich weiß nicht warum es bei dir nicht funktioniert, bei mir klappt es einwandfrei.
Wenn ich nun dein VBA-Code so sehe könnte es bei dir in etwa so der PQ Code lauten.

let

    LA = Table.Buffer(Excel.CurrentWorkbook(){[Name="NV2"]}[Content])

in

     Table.RemoveColumns(Table.Sort(Table.AddColumn(LA,"Zufallszahl", each Number.RoundDown(Number.RoundDown(Number.From(

     [Column1]) * 1000000) / 1000000, 6)),{{"Zufallszahl", Order.Ascending}}),{"Zufallszahl"})

Beliebteste Forumthreads (12 Monate)

Forumthread: PQ zufällige Reihenfolge

9 Beiträge zum Forumthread Beiträge zu diesem Forumthread

VBA Beispiele zu diesem und ähnlichen Themen

Beliebteste Forumthreads (12 Monate)

9
Beiträge zum Forumthread

Beiträge zu diesem Forumthread