Datum

Titel

19.04.2024 12:09:19

Unique (Application.WorksheetFunction.Unique)

19.04.2024 11:51:37

Nächsten identischen Treffer suchen

19.04.2024 11:45:34

Feld im SAP auslesen

19.04.2024 10:59:29

Datei Auswählen und öffnen

Du findest keine passende Antwort auf Deine Frage?

Stelle Deine Frage in unserem Live-Forum

Archiv - Navigation

1404to1408

Aktuelles Verzeichnis

Verzeichnis Index

Übersicht Verzeichnisse

Vorheriger Thread

Rückwärts Blättern

Nächster Thread

Vorwärts blättern

HERBERS

Excel-Forum (Archiv)

20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Rückwärts Blättern

Aktuelles Verzeichnis

Übersicht Verzeichnisse

Vorwärts blättern

Inhaltsverzeichnis

Zufallsprinzip aus Userform

Forumthread: Zufallsprinzip aus Userform
1 Beitrag zu diesem Forumthread
Anzeige
VBA Beispiele zu verwandten Themen

Excel Dialoge
Top 100 Forumthreads

01.02.2015 16:07:12

Tiger

Hallo
Ich würde gerne eine Userform herstellen in der man zwei Texte eingeben kann. Wenn man diese dann geschrieben hat soll man z.B. auf den Button "OK" drücken und dann wird nach dem Zufallsprinzip einer der zwei eingegebenen Texte ausgewählt und in eine Zelle auf dem Excelblatt übertragen.
Bei der Userform ist soweit alles gut, mir fehlt nur noch der Code, der einen der zwei Texte per Zufall auswählt.
Kann mir jemand dabei helfen? Wäre sehr dankbar.

1
Beitrag zum Forumthread

Beitrag zu diesem Forumthread

Betreff

Datum

Anwender

AW: Zufallsprinzip aus Userform

01.02.2015 17:14:11

Michael

AW: Zufallsprinzip aus Userform

01.02.2015 17:14:11

Michael

Hallo Tiger,
hier ein kleiner Beispielcode:

Sub zufall()
text1 = "Text1"
text2 = "Text2"
Randomize
For i = 1 To 10
If Round(Rnd() + 1, 0) = 1 Then
Range("B" & i) = text1
Else
Range("B" & i) = text2
End If
Next
End Sub

Randomize initialisiert den Zufallsgenerator, Rnd zieht Zufallszahlen.
Happy Exceling,
Michael

Links zu Excel-Dialogen

UserForm

Beliebteste Forumthreads (12 Monate)

Threadtitel

Lesezugriffe
excel zelle enthält wort

34081
excel zellen färben wenn andere zelle wert

23512
excel text bis zeichen

16681

Weitere Forumthreads anzeigen

excel zeichen einfügen an bestimmter stelle

16052

scrollen excel funktioniert nicht

15741

excel formel kopieren ohne zellbezug ändern

15343

excel wenn(finden dann)

14267

excel wenn text in zelle dann text in anderer zelle

12306

excel text ab zeichen abschneiden

11938

excel erste 3 zeichen löschen

11417

excel bei summe kommt 0 raus

10634

excel bedingte formatierung, wenn andere zelle text enthält

10521

zählewenn oder

9511

excel zeichen von links entfernen

9498

prüfen ob zelle bestimmten text enthält

9480

excel wenn kein wert dann leer

9079

vba text in zelle schreiben

8864

excel erstes wort aus zelle

8800

excel zählenwenn datum kleiner als

8428

excel zählen ohne duplikate

8178

excel gleicher wert in anderer zelle

8062

excel zeichen ab bestimmten zeichen auslesen

7989

excel rechts bis bestimmtes zeichen kommt

7915

excel wenn kleiner und größer

7806

vba letzte beschriebene zeile finden

7675

excel datum und uhrzeit kombinieren

7521

excel spalten ausblenden plus

7291

excel min in stunden

7167

excel zeilen nur anzeigen wenn inhalt

7070

kreuz statt mauszeiger

7068

kw in monat umrechnen

6935

excel bedingte formatierung datum älter als heute leere zellen ignorieren

6521

summewenn nicht bedingung

6515

excel spalten untereinander statt nebeneinander

6294

vba inhalte löschen

6182

excel wenn minus dann 0

6026

excel wenn zeit größer als

6006

excel letztes zeichen finden

5981

excel suchen ob wert in spalte vorhanden

5920

excel wort aus zelle übernehmen

5910

excel zwischen arbeitsblättern wechseln

5872

excel zahlen nicht fortlaufend runterziehen

5838

excel mehrere zellen auf inhalt prüfen

5829

excel liste gesperrt durch eigenen benutzer

5734

excel formel letztes zeichen löschen

5705

excel @ zeichen in formel

5689

summe wenn sverweis

5676

excel wenn zelle gefüllt dann

5582

excel text durchsuchen

5539

uhrzeit plus minuten excel

5492

vba spalte nach wert durchsuchen

5379

zählen wenn zelle nicht leer

5341

summewenns mehrere kriterien in einer spalte

5321

führende nullen entfernen

5224

bedingte formatierung mit bezug auf andere zelle

5182

excel vba msgbox ja nein abfrage

5105

excel mail adresse generieren

5082

excel sverweis #nv durch 0 ersetzen

5082

excel vba farbe zelle ändern

5053

wenn farbe dann excel

5053

excel buchstaben aus zahlen entfernen

4974

excel wert aus spalte übernehmen wenn bedingung erfüllt

4903

summewenn ungleich text

4847

excel anführungszeichen einfügen

4841

excel vba contains

4789

excel formel datum plus 6 monate

4769

summewenns größer als datum

4754

vba projekt kennwort

4727

excel finden rückwärts

4710

vba mehrere bedingungen

4679

excel mehrere linien in einem diagramm

4659

excel datum formatierung wird nicht übernommen

4654

excel bild einfügen an zelle anpassen

4588

excel punkte aus text entfernen

4564

excel ersten 5 zeichen löschen

4556

excel text von zelle übernehmen

4516

text in zahl umwandeln vba

4508

vba code zeilenumbruch

4482

excel zählenwenn enthält text

4469

excel in welcher spalte steht ein bestimmter wert

4452

excel reiter suchen

4430

excel vba makro stoppen

4411

excel datum einfügen wenn zelle geändert

4362

excel formel in andere datei kopieren ohne bezug

4360

excel runden in formel einbinden

4357

excel formel aktuelle uhrzeit

4332

vba userform schließen button

4327

prozent durchschnitt berechnen excel

4327

datum aus kalenderwoche excel

4324

excel text in spalte suchen und zeile ausgeben

4308

verketten excel datum

4300

excel aus anderer tabelle auslesen

4285

excel gliederung beschriften

4260

excel gruppierung nicht möglich

4229

argument excel

4199

excel vba zeilenumbruch in string

4182

excel dropdown mit leerer zelle

4158

excel blattschutz dropdown erlauben

4142

excel druckbereich linien ausblenden

4075

excel aktuelle jahreszahl

4025

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Threadtitel

Lesezugriffe
excel zelle enthält wort

34081
excel zellen färben wenn andere zelle wert

23512
excel text bis zeichen

16681

Weitere Forumthreads anzeigen

excel zeichen einfügen an bestimmter stelle

16052

scrollen excel funktioniert nicht

15741

excel formel kopieren ohne zellbezug ändern

15343

excel wenn(finden dann)

14267

excel wenn text in zelle dann text in anderer zelle

12306

excel text ab zeichen abschneiden

11938

excel erste 3 zeichen löschen

11417

excel bei summe kommt 0 raus

10634

excel bedingte formatierung, wenn andere zelle text enthält

10521

zählewenn oder

9511

excel zeichen von links entfernen

9498

prüfen ob zelle bestimmten text enthält

9480

excel wenn kein wert dann leer

9079

vba text in zelle schreiben

8864

excel erstes wort aus zelle

8800

excel zählenwenn datum kleiner als

8428

excel zählen ohne duplikate

8178

excel gleicher wert in anderer zelle

8062

excel zeichen ab bestimmten zeichen auslesen

7989

excel rechts bis bestimmtes zeichen kommt

7915

excel wenn kleiner und größer

7806

vba letzte beschriebene zeile finden

7675

excel datum und uhrzeit kombinieren

7521

excel spalten ausblenden plus

7291

excel min in stunden

7167

excel zeilen nur anzeigen wenn inhalt

7070

kreuz statt mauszeiger

7068

kw in monat umrechnen

6935

excel bedingte formatierung datum älter als heute leere zellen ignorieren

6521

summewenn nicht bedingung

6515

excel spalten untereinander statt nebeneinander

6294

vba inhalte löschen

6182

excel wenn minus dann 0

6026

excel wenn zeit größer als

6006

excel letztes zeichen finden

5981

excel suchen ob wert in spalte vorhanden

5920

excel wort aus zelle übernehmen

5910

excel zwischen arbeitsblättern wechseln

5872

excel zahlen nicht fortlaufend runterziehen

5838

excel mehrere zellen auf inhalt prüfen

5829

excel liste gesperrt durch eigenen benutzer

5734

excel formel letztes zeichen löschen

5705

excel @ zeichen in formel

5689

summe wenn sverweis

5676

excel wenn zelle gefüllt dann

5582

excel text durchsuchen

5539

uhrzeit plus minuten excel

5492

vba spalte nach wert durchsuchen

5379

zählen wenn zelle nicht leer

5341

summewenns mehrere kriterien in einer spalte

5321

führende nullen entfernen

5224

bedingte formatierung mit bezug auf andere zelle

5182

excel vba msgbox ja nein abfrage

5105

excel mail adresse generieren

5082

excel sverweis #nv durch 0 ersetzen

5082

excel vba farbe zelle ändern

5053

wenn farbe dann excel

5053

excel buchstaben aus zahlen entfernen

4974

excel wert aus spalte übernehmen wenn bedingung erfüllt

4903

summewenn ungleich text

4847

excel anführungszeichen einfügen

4841

excel vba contains

4789

excel formel datum plus 6 monate

4769

summewenns größer als datum

4754

vba projekt kennwort

4727

excel finden rückwärts

4710

vba mehrere bedingungen

4679

excel mehrere linien in einem diagramm

4659

excel datum formatierung wird nicht übernommen

4654

excel bild einfügen an zelle anpassen

4588

excel punkte aus text entfernen

4564

excel ersten 5 zeichen löschen

4556

excel text von zelle übernehmen

4516

text in zahl umwandeln vba

4508

vba code zeilenumbruch

4482

excel zählenwenn enthält text

4469

excel in welcher spalte steht ein bestimmter wert

4452

excel reiter suchen

4430

excel vba makro stoppen

4411

excel datum einfügen wenn zelle geändert

4362

excel formel in andere datei kopieren ohne bezug

4360

excel runden in formel einbinden

4357

excel formel aktuelle uhrzeit

4332

vba userform schließen button

4327

prozent durchschnitt berechnen excel

4327

datum aus kalenderwoche excel

4324

excel text in spalte suchen und zeile ausgeben

4308

verketten excel datum

4300

excel aus anderer tabelle auslesen

4285

excel gliederung beschriften

4260

excel gruppierung nicht möglich

4229

argument excel

4199

excel vba zeilenumbruch in string

4182

excel dropdown mit leerer zelle

4158

excel blattschutz dropdown erlauben

4142

excel druckbereich linien ausblenden

4075

excel aktuelle jahreszahl

4025

Zufallsprinzip aus Userform

1 Beitrag zum Forumthread Beitrag zu diesem Forumthread

VBA Beispiele zu verwandten Themen

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

1
Beitrag zum Forumthread

Beitrag zu diesem Forumthread