Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2024 14:04:05
PDF per VBA ausgeben - Seitenskalierung
19.04.2024 13:58:02
Set Worksheet geht im O365 aber im Excel 2016 nicht
19.04.2024 13:49:38
Per Kopfdruck als pdf speichern und Mail erstellen
19.04.2024 12:58:59
Daten einfügen aus anderem Sheet
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
876to880
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
876to880
876to880
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Rückstand (Wie lange nicht gezogen)

Rückstand (Wie lange nicht gezogen)
20.06.2007 13:12:00
Wolfgang
Hallo alle zusammen,
ich möchte den Rückstand (wie lange nicht gezogen in Tagen) von Keno aus einer Tabelle mit den gezogenen Zahlen ermitteln lassen. Und dies für alle 70 Zahlen.
Die Tabelle besteht aus den Spalten: Ziehungs-Nr., Datum, Zahl1 – Zahl 20 (20 Spalten).
Wer kann mir da bitte weiterhelfen?

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Rückstand (Wie lange nicht gezogen)
20.06.2007 14:30:04
Ptonka
Hallo Wolfgang,
folgende Idee:
Das makro:

Sub zahl()
Suchzahl = Range("D24").Value
Zeile = [A65536].End(xlUp).Row
For i = Zeile To 2 Step -1
For j = 3 To 22
Wert = Cells(i, j).Value
Select Case Wert
Case Is = Suchzahl
Range("B24").Value = Cells(i, 2).Value
GoTo weiter
End Select
Next j
Next i
weiter:
End Sub


schreibt Dir in Zelle B24 das jüngste Ziehungsdatum der in Zelle D24 eingegebenen Zahl.
In Zelle F24 wird Dir die Anzahl der Tage bis heute ausgegeben, wenn Du folgende Formel dort einträgst:
=DATEDIF(B24;HEUTE();"D")
Die Zellenangaben (B24, F24 etc. kannst Du natürlich variieren. Ansonsten klappt es.
Feedback wäre schön.
Gruß,
Jochen

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige