Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
424to428
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
424to428
424to428
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Aus einem Bereich eine bestimmte Anzahl an Werten

Aus einem Bereich eine bestimmte Anzahl an Werten
07.05.2004 08:24:30
zufallswert
Hallo,
ich möchte aus einem Bereich (A1:A15000) eine bestimmte Anzahl (z.B. 399) von Werten z u f ä l l i g auswählen.
Wer kann helfen :-) ? Danke

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Aus einem Bereich eine bestimmte Anzahl an Werten
Mac4
Hallo,
hier mal eine VBA-Lösung. Es werden beliebig viele Zufallswertewerte aus dem Bereich A1:A5000 gesucht und in Spalte C untereinander gelistet:

Sub test()
Dim Anzahl, Zufall, letzte_Zeile
letzte_Zeile = 5000
Anzahl = InputBox("Wieviele Werte sollen per Zufall selektiert werden?")
For i = 1 To Anzahl
Sprung:
Zufall = Int((letzte_Zeile * Rnd) + 1)
If WorksheetFunction.CountIf(Range("C:C"), Cells(Zufall, 1)) > 0 Then
GoTo Sprung
End If
Cells(Zufall, 1).Copy Destination:=Cells(i, 3)
Next
End Sub

Marc
Anzeige

302 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige