Dieses Forum nutzt Cookies
Dieses Forum verwendet Cookies, um deine Login-Informationen zu speichern, wenn du registriert bist, und deinen letzten Besuch, wenn du es nicht bist. Cookies sind kleine Textdokumente, die auf deinem Computer gespeichert werden. Die von diesem Forum gesetzten Cookies werden nur auf dieser Website verwendet und stellen kein Sicherheitsrisiko dar. Cookies aus diesem Forum speichern auch die spezifischen Themen, die du gelesen hast und wann du zum letzten Mal gelesen hast. Bitte bestätige, ob du diese Cookies akzeptierst oder ablehnst.

Ein Cookie wird in deinem Browser unabhängig von der Wahl gespeichert, um zu verhindern, dass dir diese Frage erneut gestellt wird. Du kannst deine Cookie-Einstellungen jederzeit über den Link in der Fußzeile ändern.

Zufallsfunktion mal anders
#1
Hallo zusammen,

ich habe jetzt mal eine blöde Frage zu einem interessanten Thema bei dem ich nicht mal weiss ob so etwas möglich ist, daher werfe ich die Idee einfach mal in den Raum, evtl. hat jemand ja eine Idee ob es so umsetzbar ist. Dabei bin ich für jede Idee dankbar.

Ich habe eine Exceltabelle mit mehreren Sheets, ein Sheet "Auswahl", und eine beliebige Anzahl von Sheets die von 1 bis x durchnummeriert sind, dabei wird sich die Anzahl der Sheets von 1 bis x immer mehr erweitern.

[img=541x87]data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAvYAAAB6CAIAAABbboD9AAALI0lEQVR4nO3dO28bVxoG4PNPVv4tkd3tz2CxTTYXLCjQSCoChlxJjQEHLgyCrlIYbgwWMVTIimHDBrZIJ2ARCDDUC4TabCFF4nXEGZ0LOXwevE2iy3k5pA4/DYdy+GsT/PHHH6UrbCTHrRnHrRnHrRnHrRnHrYEQ/nuVl9shlD7gK/FQbsZxa8Zxa8Zxa8Zxa8Zxa8CIs448lJtx3Jpx3Jpx3Jpx3Jpx3BrYuhHn5gaLiIjINqT07JGJEUdERGS7Unr2yMSIIyIisl0pPXtkEkoXAACIL5QuAAAQXyhdAAAgvlC6AABAfKF0AQCA+ELpAgAA8YXSBQAA4gulCwAAxBdKFwAAiC+ULgAAEF8oXQAAIL5QugAAQHyhdAEAgPhC6QIAAPGF0gUAAOILpQsAAMQXShcAAIgvlC4AABBfKF0AACC+ULoAAEB8oXQBAID4QukCAADxhdIFAADiC6ULAADEF0oXAACIL5QuAAAQXyhdAAAgvlC6AABAfKF0AQCA+ELpAgAA8YXSBQAA4gulCwAAxBdKFwAAiC+ULgAAEF8oXQAAIL5QugAAQHyhdAEAgPhC6QIAAPGF0gUAAOILpQsAAMQXShcAAIgvlC4AABBfKF0AACC+ULoAAEB8oXQBAID4QukCAADxhdIFAADiC6ULAADEF0oXAACIL5QuAAAQXyhdAAAgvlC6AABAfKF0AQCA+ELpAgAA8YXSBQAA4gulCwAAxBdKFwAAiC+ULgAAEF8oXQAAIL5QugAAQHyhdAEAgPhC6QIAAPGF0gUAAOILpQsAAMQXShcAAIgvlC4AABBfKF0AACC+ULoAAEB8oXQBAID4QukCAADxhdIFAADiC78S1V/plb6JALABwiXx/JprxCl9QwFg3RlxYjLiAMCaMOLEZMQBgDVxrxFn059rTwed3c7gdMlHj/q7u/2jWt+wTSOOVaxiFR10aGWH4gWyKTHiHPV3dytGi3xKjzi//+fHRw9+fPTP387SjDing87urfq3Jf0iDR5CR/3666y6ytX3nlDrUVrvtkyuVefWrLTK3A2pe2tq3JamN6TWKpOPsjyPsQUHa6JE3e0rWoc7PpShQ5ZdpbpDiT2n+oki1Y5U3eEe+1WREWc8Hn/58mU4HB4cHOzt7e3t7R0cHAyHwy9fvozH40SL5h9xTged3U6narbIptSI87/f/vXgx0c3STTinA46E/WP+imeSi8vTwf9myN4OujU3XvrPoSO+rudTifliFN3w6y/SqMD1WCV2RXrLFjniN1833SPsYl7fOo/Yq5yOf2UsfBp9Xrd+vdflA5V9XJ1yLOr3NUh056zygFPuyNVd7jHfpV/xDk7Ozs8POx2u8+ePRuNRsfHx8fHx6PR6NmzZ91u9/Dw8OzsLMW62Uec00Fnt39Ud8dNo90jzoIbW+f2NFql9u+X9Va5evDUv2PWa8S534N/ne6X2cdUmkFq9l5JNa7dHqYFK8yUSPfTdEeHJR/K1mFGkeOw+BOLdEi9I1V32JwR5927d48fPx4Oh1+/fp3/6NevX4fD4ePHj9+9exd96dwjztVD4vJq+K3cROa2stkT4gs2nZnPnvyda+pLp79kyfnntCPO8Pf0L1RNq3l7Gj+VJvoN+/axs+Ejzv0WaXS/JDtiM9+47rPNSqvM7+01n+LrH7H5Be7anHJ0aLp2kg5/S76rrDTiJNtzqjuk35GqO2zIiPPmzZter3dyclL9aScnJ71e782bN3FXzzziTNwnc3dP5S4yc656cDT7BVdzys1jYOJrj/q333X6tOb1bLPkRPvmX4szJd3vvjcaXCNQ78Wdq2++2SPOfU9gNrxfEl0zMfkjU/tVi9VHnPmdIu94cfdpnfQdVvpQtg4Nq0TvkHTPqe6QY0eq7rAJI86nT5+63e6d882Vk5OTbrf76dOniAXyjjhTd8ns/VM14iw8HzozAnX6/c7kiZvFD/zJVeZex51aplUjTpYrGBJuu5N3aNoRZ+H5voirXLVvfo1u7Xu//l1fb5Xbk6C17/8a54qm943cI86CJ1IjTtpdpbpDjj2nukOeHam6wz32qzwjzsXFRb/fHw6H8x/qdrvdbnf+/w+Hw/39/YuLi1gdso44C05rL//P+QfR3J14+wm3V/hcfcrsy2DTr1VNnhpafj66RSNOk2e5hq9CJvlJm76jcmwoTd73t/o5ibkziQlP9Td7Plx5letdtt/vJx3XJjbz2lfyGXESdLjMtavccWOT7TnVHfLvSHfd6TX3qzwjzsePH/f29s7Pz+c/tGzEOT8/39vb+/jxY6wOGUec6TFjdty4++Xum6+//X+TV/b0jxa/NjrzS9/kZrUdI07Dt+80+xlIcTXG7FaaZ8RJdGXJ/Het+UzR4N5P9nQ489BKPq5dy3/9hxeqFn0oy65y941N83Na1aHEjhT5OOQZcYbD4YsXLxZ+aNmIc3l5+csvvyw88dNMvhFn0U4+95bTFa7om5pWr7/mesL5++zN7dmc+VW3bMRpuBNdrtGbkxePxhl+ZUnzbpH5jSjlk2XTV+vX9ULgBou43Dh6h5y7yhpeD1RkR1rtOKz8w55nxHn69Onbt28XfqhixHn79u2TJ09idcg24iw+/pP7/ezev/TnaGYO6QwG/clvMnlNzuL5e2tGnAbX4k3elgZfVfegrdX7gxask2DrvOd7oGvdlsbXI67xiJP4DxNcXi67YenfHl/dofHikTvk3VVWO3uRds9Z5UUiZ3EW+Pnnn9+/f3/zn91KN5/2/v37Xq8Xq0OuEWfZhLn0HRnT1yxM/rGn6XvyqL/b6XSWvklq+ptev6JfesSZ+bs4f2f/t6gjTv03uMzelhU+a/KOafLL3VqNOHPvvUvzGv/Uz0LtYxbhhy7aKoteqEoyFE6/cbLIO2hmT/+WeqNy9YeSd8iyq1R3yL/nrOmIc5/9as1HnJ9++ilWh0wjzvIfjPn9/trUVYVTpwbnr2SYPYm47FLjzuB0HV6oyjHiLDyZGv/pZ2aZ2nvfWo04iy9Kj73K7ErJLths+ExYb5XpY5bmtky9caT+02u9I1bxMzN1zXOBDnfUy9Ah065S2SHjnrPqAU854qz8eEj/u2V9jV+oevr0aawOW/3PcEZX84WqhvIcdqtYxSo66NDKDut8ufGLFy828nLjbWDEsYpVtnMVHXTYoA7eNL6S4vfTujHiWMUq27mKDjpsUIc8BS4uLvb39+v+6b8nT55s6p/+az0jjlWssp2r6KDDBnXIVuDqH3D48OHDKp/84cOHDf8HHNrOiGMVq2znKjrosEEdchZ4/fr16v8M5+vXr+OubsSJyYhjFats5yo66LBBHXIWGI/Ho9Go1+u9evVq4XU55+fnr1696vV6o9FoPB7HXd2IE5MRxypW2c5VdNBhgzrkL3B2dnZ4eNjtdp8/fz4ajY6Pj4+Pj0ej0fPnz7vd7uHh4Z9//pliXSNOTIv+2k2SZLgtbXr6sYpVytJBh7XqUKTAeDz+/PnzYDA4ODi4utz44ODg5cuXnz9/jn7y5sa9RhxmtGnEAYCNZsQBAFrIiAMAtJARBwBooTB7nccPjx788HDn+4c73z/c+W5357vdnX/v7nz7zc633/yjMjvrnH/HzW6ZfNeufH+Th+uWBw3yw/rkUYTkuqpMRCRd5kYcERERkc2PEUdERERaGCOOiIiItDBGHBEREWlhjDgiIiLSwhhxREREpIUx4oiIiEgLY8QRERGRFsaIIyIiIi2MEUdERERaGCOOiIiItDBGHBEREWlhjDgiIiLSwhhxREREpIUx4oiIiEgL83/kMXYwYtjgJwAAAABJRU5ErkJggg==[/img]

In diesem Bild geht es bis zum Sheet 15, Tag für Tag wird aber noch ein Sheet dazu kommen.

1. Thema: Um ein neues Sheet zu erzeugen würde ich gerne ein Makro einsetzen das mir das komplette Sheet kopiert und am Ende hinzufügt mit dem Namen +1, sprich wenn ich im Sheet 15 das Makro betätige soll das Sheet 15 kopiert werden und nach dem Sheet 15 eingefügt werden und als 16 umbenannt werden.

2.Thema: Jetzt zur kniffligen Zufallsfunktion, ich überlege wie ich eine Funktion einfügen kann, die mir aus den vorhandenen Sheets 1 - x per Zufall immer eine andere aufruft, also z.B. nach betätigen des Makros wird das Sheet 7 angezeigt, nach nochmaligen betätigen dann z.B. das Sheet 13 usw.

Geht so etwas? Bin bei dem Thema VBA noch ein Anfänger und immer wieder verwundert über die Möglichkeiten, aber zu diesen Themen habe ich auch mit der Suchfunktion  nichts finden können.

Vielleicht hat ja der ein oder andere von euch eine Idee.

Danke und schöne Grüße

Joerg
Antwortento top
#2
Hi Jörg,

(24.05.2016, 12:17)JoergPorsch schrieb: Ich habe eine Exceltabelle mit mehreren Sheets, ein Sheet "Auswahl", und eine beliebige Anzahl von Sheets die von 1 bis x durchnummeriert sind, dabei wird sich die Anzahl der Sheets von 1 bis x immer mehr erweitern.
[...]
In diesem Bild geht es bis zum Sheet 15, Tag für Tag wird aber noch ein Sheet dazu kommen.

Wie Du siehst, hat es mit dem Bild leider nicht geklappt, außerdem ist ein Bild sowieso schlecht, um Excel-Themen nachzuvollziehen, zu reparieren oder Lösungen zu erstellen!

Also stelle bitte (D)eine (Beispiel-)Tabelle als Excel-Datei zur Verfügung oder stelle die relevanten Ausschnitte hier dar, siehe die als Wichtige Themen: markierten Forums-Beiträge.
Deine Mustertabelle sollte mindestens etwa 10-15 Datensätze haben, sensible Daten anonymisiert. Vom Aufbau her muss sie aber deinem Original gleichen.
Auch ein Wunschergebnis sollte dargestellt und als solches erkennbar sein.
Die farbigen Texte sind anklickbare Links:

Hier steht, wie es geht:
Beitrag 2 WICHTIG: Arbeitsmappen zur Verfügung stellen
Beitrag 3 WICHTIG: Tabellenausschnitte und VBA-Codes im Forum einstellen

Eine Bitte:
Anstatt Screenshots ist eine Datei oder ein Ausschnitt besser!
"Du gehst ja auch nicht in die Werkstatt und gibst ein Foto Deines kaputten Autos ab!"
Antwortento top
#3
(24.05.2016, 12:46)Rabe schrieb: Hi Jörg,

Wie Du siehst, hat es mit dem Bild leider nicht geklappt, außerdem ist ein Bild sowieso schlecht, um Excel-Themen nachzuvollziehen, zu reparieren oder Lösungen zu erstellen!


Hi Ralf, wenn man die Zitatantwort wählt, sieht man das Bild...

[Bild: bild_1.png]
cu Jörg eine Rückmeldung wäre ganz reizend XL2003 bis XL2016
Antwortento top
#4
Moin Joerg,

Bilder an sich sind hier meistens ungeliebt, weil kaum jemand Lust hat, seine Zeit mit einem Nachbau zu vergeuden. Dieses "Bild" aber ist absolut nichtssagend 05 

Also: Eine Musterdatei wäre in jedem Fall passender.

EDIT: Da war ich zu langsam ...
Beste Grüße
  Günther

Excel-ist-sexy.de
  …schau doch mal rein!
Der Sicherheit meiner Daten wegen lade ich keine *.xlsm bzw. *.xlsb- Files mehr herunter! -> So geht's ohne!
Antwortento top
#5
Hi Jörg,

(24.05.2016, 12:50)Jockel schrieb: wenn man die Zitatantwort wählt, sieht man das Bild...

[Bild: bild_1.png]

bei mir kam das nicht, da kam auch wieder der ganze Zeichensalat.
Antwortento top
#6
Hallo zusammen,

danke erstmal für die Antworten. Ihr habt recht, erstens ist das Bild nicht zu sehen, zweitens nicht zweckmäßig.

Die neutrale Exceldatei im Anhang.

Danke


Angehängte Dateien
.xlsm   Test.xlsm (Größe: 58,68 KB / Downloads: 5)
Antwortento top
#7
Hi Ralf,

(24.05.2016, 13:04)Rabe schrieb: bei mir kam das nicht, da kam auch wieder der ganze Zeichensalat.

war die Quelltextanzeige aktiviert (strg+shift+s) ?

Gruß Uwe
Antwortento top
#8
Hallöchen,

so was kommt auch vor, wenn man ein Bild mit Copy und Paste einfügt statt "ordentlich" als Anhang + Bild in den Beitrag einfügen ....
   \\\|///      Hoffe, geholfen zu haben.
   ( ô ô )      Grüße, André aus G in T  
 ooO-(_)-Ooo    (Excel 97-2016)
Antwortento top
#9
Hi,

(24.05.2016, 14:07)Kuwer schrieb: war die Quelltextanzeige aktiviert (strg+shift+s) ?

ja, das wars.
Antwortento top
#10
Keiner eine Idee? Oder gar nicht möglich?

Gruß Joerg
Antwortento top


Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 1 Gast/Gäste