Thema Datum  Von Nutzer Rating
Antwort
Rot Makro-Ergebnis woanders ausgeben
 02.08.2017 16:47:18 Dennis
Solved
02.08.2017 17:11:51 Werner
Solved
02.08.2017 17:25:12 Gast57116
Solved
03.08.2017 19:42:48 Werner
Solved

Ansicht des Beitrags:
Von:
Dennis		 Datum:
02.08.2017 16:47:18		 Views:
1091		 Rating:
     
Antwort:
 Nein
Thema:
Makro-Ergebnis woanders ausgeben

Hallo zusammen,

ich habe folgendes Problem. Ein Makro, welches über ein Button gestartet wird, sucht einen zufälligen Namen aus einer Liste aus (Code steht unten). Nun möchte ich aber, dass der ausgesuchte Name in einer anderen Zelle angezeigt wird und das kriege ich leider nicht hin. Könnt ihr mir da weiterhelfen.

Dim r As Range, Ausgabe As Range, zufallszelle As Integer, zufallsbereich As Integer
 
  Set r = Range("A1:a25").SpecialCells(xlCellTypeConstants)
  Range("A1:a25").ClearFormats 
  zufallsbereich = Int(Rnd() * r.Areas.Count) + 1 
  zufallszelle = Int(Rnd() * r.Areas(zufallsbereich).Cells.Count) + 1 
  r.Areas(zufallsbereich).Cells(zufallszelle).Activate
  r.Areas(zufallsbereich).Cells(zufallszelle).Interior.ColorIndex = 4

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Makro-Ergebnis woanders ausgeben
 02.08.2017 16:47:18 Dennis
Solved
02.08.2017 17:11:51 Werner
Solved
02.08.2017 17:25:12 Gast57116
Solved
03.08.2017 19:42:48 Werner
Solved