Herzlich Willkommen, lieber Gast!
  Sie befinden sich hier:

  Forum » Visual Basic 6.0 / VBA » HILFE IN EXCEL

Forum | Hilfe | Team | Links | Impressum | > Suche < | Mitglieder | Registrieren | Einloggen
  Quicklinks: MSDN-Online || STL || clib Reference Grundlagen || Literatur || E-Books || Zubehör || > F.A.Q. < || Downloads   

Autor Thread - Seiten: > 1 <
000
19.08.2010, 11:02 Uhr
schmollmops



Hallo zusammen,

ich brauche ein Makro oder eine Formel in Excel.

Folgendes Problem:

Ich möchte einen Fussballsimulator erstellen.
Das soll ungefähr so aussehen:

A B C
Verein 1 Verein 2 Ergebnis

Ich möchte, dass die Zelle C1 sich aus einem anderen Tabellenblatt zufällig ein Ergebnis zieht.
In dem anderen tabellenblatt habe ich bereit in den Zellen A1-H500 verschiedene Ergebnisse eingetragen. Ich möchte jetzt das Excel in eine zufällige Zelle springt ín dem Bereich A1-H500 und den Wert in Tabellenblatt 1 Zelle C1 darstellt.

Ist sowas mit einer Formel oder einem Makro möglich?
Hab Office 2000

Vielen dank schonmal.

LG Schmollmops (MIke)
 
Profil || Private Message || Suche Download || Zitatantwort || Editieren || Löschen || IP
001
19.08.2010, 12:11 Uhr
Windalf
Der wo fast so viele Posts wie FloSoft...
(Operator)


Zufallszahl erzeugt dir eine Zufallszahl zwischen 0 und 1 (kannst du halt entsprechend skalieren)

Indirekt: Mit der Funktion Indirekt kannst du Strings als Ranges interpretieren lassen...

Index hilft dir dabei auf eine andere Matrix zuzugreifen...

Makro ist imho nicht nötig...
--
...fleißig wie zwei Weißbrote
 
Profil || Private Message || Suche Download || Zitatantwort || Editieren || Löschen || IP
002
19.08.2010, 12:27 Uhr
schmollmops




Zitat von Windalf:
Zufallszahl erzeugt dir eine Zufallszahl zwischen 0 und 1 (kannst du halt entsprechend skalieren)

Indirekt: Mit der Funktion Indirekt kannst du Strings als Ranges interpretieren lassen...

Index hilft dir dabei auf eine andere Matrix zuzugreifen...

Makro ist imho nicht nötig...



Hallo,

danke für die schnelle Antwort.
Kannst du mir ein Beispiel für die Formel geben?
So das ich sie nur noch für meine Bedürfnisse ändern muss?
danke

Gruß Mike
 
Profil || Private Message || Suche Download || Zitatantwort || Editieren || Löschen || IP
003
19.08.2010, 12:35 Uhr
Windalf
Der wo fast so viele Posts wie FloSoft...
(Operator)


Können schon aber ein bisschen selber denken schadet bestimmt nicht... Die Funktionen sind auch in Excel erklärt und eigentlich nicht schwer zu verstehen. Probiere die doch einfach mal aus...

Ich dachte du willst Programmierer werden und fühlst dich unterfordert. So richtig schwer ist das was du da gerade machen willst nicht. Sowas müsstest du spätestens mit den Tipps wie mögliche Funktionen dafür heißen alleine lösen können...

Probier mal erstmal Index und Zufallszahl aus. Indirekt brauchst du wahrscheinlich (so du dich nur auf einem Blatt aufhälst) nicht ist aber trotzdem nützlich die für ähnliche Probleme zu kennen...

Wenn du nicht weiter kommst kannst du ja nochmal fragen dann aber bitte konkreter. Mundgerechte Lösungen bringen dich nicht weiter und für vollständige Lösungen lasse ich mich vom Kunden teuer bezahlen...
--
...fleißig wie zwei Weißbrote

Dieser Post wurde am 19.08.2010 um 12:36 Uhr von Windalf editiert.
 
Profil || Private Message || Suche Download || Zitatantwort || Editieren || Löschen || IP
004
19.08.2010, 21:21 Uhr
0xdeadbeef
Gott
(Operator)


Ich schieb das ganze mal rüber ins VBA-Forum, in der Rätselecke hat das beim besten Willen nichts verloren. -->

Zufällige Ganzzahl zwischen zwei Werten:

Visual Basic:
Function RndRanged(min As Integer, max As Integer) As Integer
  RndRanged = Int((max - min + 1) * Rnd + min)
End Function


Zellen kopieren:

Visual Basic:
woher.Copy wohin


Zellen auswählen kannst du über die Cells-Collection, etwa wählt

Visual Basic:
r.Cells(2, 3)


die zweite Zelle von links und dritte von oben im Bereich r aus. Am besten benennst du die betreffenden Bereiche sinnvoll, dann kannst du einfach

Visual Basic:
Range("Ergebnistabelle").Cells(RndRanged(1, 8), RndRanged(1, 500)).Copy Range("Ergebnis")


o.ä. schreiben. Sämtlicher Code ungetestet, ich habe gerade kein Excel zur Hand.
--
Einfachheit ist Voraussetzung für Zuverlässigkeit.
-- Edsger Wybe Dijkstra

Dieser Post wurde am 19.08.2010 um 21:21 Uhr von 0xdeadbeef editiert.
 
Profil || Private Message || Suche Download || Zitatantwort || Editieren || Löschen || IP
Seiten: > 1 <     [ Visual Basic 6.0 / VBA ]  


ThWBoard 2.73 FloSoft-Edition
© by Paul Baecher & Felix Gonschorek (www.thwboard.de)

Anpassungen des Forums
© by Flo-Soft (www.flo-soft.de)

Sie sind Besucher: