In Gruppen starten VBA Lösung gesucht EXCEL

Computer: Software & Programmierung Office Software
#1

Guten Abend

Ich suche jetzt schon Tage nach einer Lösung, habe hier schon mal einen Experten persönlich angeschrieben, erhielt jedoch keine Antwort. Ich habe folgendes Problem. Ich bin überzeugt, dass die Lösung sich nur über VBA realisieren lässt. Von VBA habe ich keine Ahnung, habe mir schon sehr viele Videos angesehen, und verschiedene Artikel gelesen, aber ich schnalle es nicht.
Folgendes Problem:

  • Es soll eine Startliste erstellt werden
  • Anfangs Startzeit ist variabel
  • Gestartet wird immer in Gruppen von 2 oder 3 oder 4 Personen
  • Das Zeitintervall kann variieren von 8, 10, 12 Min.
  • Anzahl Starter ist ebenfalls Flexibel

Um das ein wenig anschaulicher zu machen, habe ich das mal in ein Excel File gepackt. Ziel sollte es sein, mit obigen Angaben eine Startliste (nur Zeit) zu erstellen.
Das Makro müsste also nach E1 gehen,und dort die Startzeit holen. Die Startzeit wird solange wiederholt, wie die Gruppengrösse ist. Der Wert wird aus E2 geholt. Danach wird die Startzeit um das Intervall erhöht, welches in E3 ist und auch solange wiederholt, wie die Gruppengrösse ist. Das ganze solange, bis jeder Teilnehmer seine Startzeit hat. Nach meinem Verständnis, bin aber nicht sicher, ob ich das richtig verstanden habe, wäre der Wert in E4 die äusserste Schleife. Und schon komme ich nicht mehr weiter. Wäre wirklich froh, um jede Hilfe.

Mit freundlichen Grüssen
Paul

In Gruppen starten

#2

Hallo

Vielleicht mal eine Lösung mit Formeln.
In A1 trägst du folgende Formel ein.

=$E$1

In A2 folgende Formel.

=WENN(ZEILE()=1;E1;$E$1+ABRUNDEN(ZEILE(A1)/$E$2;0)*ZEIT(0;$E$3;0))

In A3 ; A4 usw. von A2 beginnend die Formel nach unten kopieren

In B1 trägst du folgende Formel ein.

=WENN(ZEILE(B1)<=$E$4;"Starter "&ZEILE(B1);"")

In B2 ; B3 usw. vonB1 beginnend die Formel nach unten kopieren.

Gruß

#3

Hallo silbersurfer

Sensationell, bin begeistert. Deine Lösung deckt meine Anforderungen ganz und gar ab. Ich dachte, das so etwas ohne VBA nicht geht. Vielen Dank!!!
Pauli

#4

Hallo

Die Formeln für die A-Spalte erfüllen zwar ihren Zweck.
Aber ich habe noch eine etwas bessere kürzere Formel für die A-Spalte.
Diese in A1 eintragen und nach unten kopieren.

=$E$1+ABRUNDEN((ZEILE(A1)-1)/$E$2;0)*ZEIT(0;$E$3;0)

Gruß