Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1268to1272
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
Inhaltsverzeichnis

Namensgenerator

Namensgenerator
Silke
Hallo Excelaner,
wie macht man einen Namensgenerator?
Ich möchte in Tabelle2 von A1:D100 einzelne Silben schreiben, die dann in Tabelle A beliebig zusammengestzt werden sollen. 25 Stk je Aktivierung eines Buttons.
Kann mir da jemand helfen?
Silke

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Namensgenerator
26.06.2012 20:51:09
Hajo_Zi
Hallo Silke,
habe ich was überlesen? Oder hast Du den Part mit den Namen nicht beschrieben?

AW: Namensgenerator
26.06.2012 20:58:47
Josef

Hallo Silke,
Private Sub CommandButton1_Click()
  Dim lngRnd As Long, lngIndex As Long, lngCount As Long
  Dim vntOut(1 To 25, 1 To 1) As Variant
  
  Randomize Timer
  
  For lngCount = 1 To 25
    For lngIndex = 1 To 4
      lngRnd = Int((100) * Rnd + 1)
      vntOut(lngCount, 1) = vntOut(lngCount, 1) & Sheets("Tabelle2").Cells(lngRnd, lngIndex)
    Next
  Next
  
  Sheets("A").Range("A1:A25") = vntOut
End Sub



« Gruß Sepp »

Anzeige
Mamas alter Rollmops schläft in der Badewanne.
26.06.2012 21:38:06
NoNet
Hallo Silke,
meinst Du einen "Zufalls-Texte-Generator" wie anbei ?
https://www.herber.de/bbs/user/80748.xls
Salut, NoNet
PS : Mamas alter Rollmops schläft in der Badewanne. ;-)
hurra, mein Ton war aus ...
26.06.2012 23:55:14
Matthias
Tabelle1

 J
25Silkes moppeliger Lehrer rülpst im Excel-Forum.


Excel Tabellen im Web darstellen >> Excel Jeanie HTML 4

Anzeige
Na SOOO moppelig bin ich auch wieder nicht ;-) _oT
27.06.2012 00:19:29
NoNet
_oT = "ohne Text"

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige