Thema: Gleiche Zufallszahlen zählen und in Diagramm anzeigen

Home

Gruppe

Allgemein

Problem

Wie kann ich in Spalte A1:A100 Zufallszahlen von 1 bis 10 eintragen und die jeweilige Anzahl in einem Diagramm ausgeben lassen?

Lösung

Geben Sie den nachfolgenden Code in ein Standardmodul ein und weisen Sie ihn einer Schaltfläche zu.

StandardModule: basMain

Sub Zufall()
   Dim intRow As Integer
   Randomize
   For intRow = 1 To 100
      Cells(intRow, 1) = Int((10 * Rnd) + 1)
   Next intRow
End Sub

Beiträge aus dem Excel-Forum zu den Themen Allgemein und Zufall

Zufällige Auslosung mit Anzahlabfrage	Dienstplan ohne doppelte Werte zufällig erstellen
Zufallslosung und Aufteilen	Zufallsbuchstaben/-zahlen
Allgemeine Frage zur Fehlerbehandlung	allgemeine Fragen zu einer Datenbank
Beim Zufallsgenerator Wiederholung vermeiden?	Zufallszahl in MsgBox anzeigen
gewichtete Zufallsauswahl	Zeilen nach Zufallsprinzip löschen
Dienstplan - Zufallsprogramm in Excel	allgemein
Zufallszahl	Zufallsgenerator
Zufallsauswahl	Mittelwert mit Zufallszahl von 0,93 bis 1 multipli
Zufallszahl, speziell	allgemein: VBA lernen?
Zufallszahl mit Wahrscheinlichkeit	Hide-Methode-Allgemeine Frage
zufall	Formelassistent allgemein
Prog. zur zufallszahl	zufallszahl per vba
zufallszahlen	Zufallszahl der 2te Versuch
zufallszahlen	Zufallszahl
Zufallszahlen fixieren	allgemeingültig Blattschutz aufheben
Zufallszahlen	Zufallsgenerator
Zufallsgenerator	Zellwert per Zufall uebertragen!
Zufallsgenerator	Zufallszahl
allgemeine Frage...	Monster-Bug bei Zufallszahlen?!?
Solver - allgemein	Solver - allgemein
Zufallszahl in bestimmtem Bereich	Frage zum Forum allgemein
Zufallsgenerator	Zufallsprinzip
Zufallszahlen anhand einer formel	Allgemeine Frage - Finanz-Planungsmodell
Zufallswert aus einem Zellbereich ?	Zufallszahlen
unterschiedliche Zufallszahlen berechnen	Zufallszahl und Inhalt eines Feldes