Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1840to1844
1840to1844
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Nächstes Datum (Formel) anspringen

Forumthread: Nächstes Datum (Formel) anspringen

Nächstes Datum (Formel) anspringen
05.08.2021 15:49:24
Burghard
Hallo,
ich möchte gerne per VBA in Spalte E das nächstliegende Datum (die Zelle) mit Gelb beim Öffnen der Tabelle markieren lassen. Das Problem ist, dass das Datum in Spalte E per Formel ausgerechnet wird und so nicht wie eine normale Datumsangabe gesucht werden kann.
Hier der Link für die kurze Beispieldatei:
https://www.herber.de/bbs/user/147469.xls
Hilfe wäre nett.
Grüße
Burghard
Anzeige

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Rückfrage
05.08.2021 16:01:50
GerdL
Moin Burghard,
welche Zelle in deiner Tabelle ist jetzt einzugilben u. warum diese?
Gruß Gerd
AW: Rückfrage
05.08.2021 16:32:48
Burghard
Hallo Gerd,
es geht um die Reichweite von den Mitteln in Spalte A (A2), also vom 21.07.2021 mit dem Bestand von Spalte C (C2) bei einem Verbrauch von täglich 1, wie lange reicht der Bestand = Datum in Spalte E (E2) und wann muss neu bestellt werden in Spalte F (F2).
Innerhalb der Spalte E soll dann in dieser Spalte das nächste Datum selektiert und mit Gelb markiert werden. Das Problem ist, dass die Datumsangaben in der Spalte E durch eine Formel ermittelt werden.
Das nachfolgende Makro funktioniert mit der Spalte B (normales Datum), aber nicht mit der Spalte E (Datum per Formel ermittelt).

Sub Markieren()
Dim f As Range
Set f = Range("B:B").Find(Date, LookIn:=xlValues)
If Not f Is Nothing Then
Range("B" & f.Row, "B" & f.Row).Cells.Interior.ColorIndex = 6
End If
End Sub
Viele Grüße
Burghard
Anzeige
AW: Rückfrage
05.08.2021 16:44:10
Herbert
Hallo,
mit der Formel / Code kannst du die anzahl der Tage zwischen heute und dem jeweiligen Datum aus Spalte E ermitteln, jetzt musst du nur noch alle anzahlen ermitteln und davon die kleinste gelb makieren lassen.
Code:

Worksheets("Tabelle1").Range("h1").Value = DateDiff("d", Date, Worksheets("Tabelle1").Range("E2"))
MfG
Herbert
Anzeige
AW: Nächstes Datum (Formel) anspringen
05.08.2021 17:08:49
GerdL
Hallo Burghard,
das wäre anscheinend ein schöner Fall für die bedingte Formatierung.

In deiner Beispieltabelle habe ich per Code kein Problem.
Sub Unit()
Dim X As Range
Columns(5).Interior.ColorIndex = xlNone
Set X = Columns(5).Find(CDate(Application.Min(Columns(5))), lookat:=xlWhole, LookIn:=xlValues)
If Not X Is Nothing Then X.Interior.Color = vbYellow
End Sub
Gruß Gerd
Anzeige
AW:
05.08.2021 22:28:27
Burghard
Hallo Gerd,
vielen Dank für die Lösung! Passt!
Viele Grüße
Burghard
AW:
08.08.2021 12:48:40
Burghard
Hallo Klaus,
danke für die sehr interessante Lösung! Hilft mir weiter!
Viele Grüße
Burghard
Anzeige
;

Forumthreads zu verwandten Themen

Datum aus Tag, Jahr, KW auslesen
Stephan

Gibt es eine Möglichkeit das Datum auszulesen aus:
Mo = Montag
Jahr=2008
KW=1
Besten Dank
Stephan
16.08.2008 22:23:00
Thread-ID: 1002369
7 Beiträge
Anzeige
Tabelle nach Anfangs und Enddatum filtern
Thomas

Hallo zusammen,
ich habe eine Frage, wie kann ich per VBA eine Tabelle nach Anfangs- und Enddatum filtern?
Vielen Dank im Voraus
Thomas
23.09.2008 09:50:53
Thread-ID: 1011635
5 Beiträge
Geburtsdatum nach Tag und Monat sortieren
Susann

Hallo,
wie kann ich eine Spalte so sortieren, dass er mir das Geburtsdatum nicht auch nach dem Jahr sortiert, also so, dass ich z.B. sehen kann, dass Hans am 20.12.1980 geboren ist und Fritz am 20.12.1930 und beiden sozusagen gratulieren kann :-)
Vielen lieben Dank mal wieder für eure...
05.06.2009 14:45:45
Thread-ID: 1079470
4 Beiträge
Anzeige
Datum vor/ nach Monatsmitte
dirkmuel

Ich habe eine Tabelle mit folgenden Werten:
Datum Umsatz Ergebnis
28.09.2009 30 Okt 09
03.10.2009 50 Okt 09
06.10.2009 30 Okt 09
09.10.2009 20 Okt 09
15.10.2009...
01.10.2009 16:37:16
Thread-ID: 1106701
9 Beiträge
Aus Monats und Jahreszahlen ein Datum erzeugen.
Josef_T

Guten Abend zusammen.
Habe in C1 eine zweistellige Monatszahl und in D1 eine vierstellige Jahreszahl.
zB. so: in C1 steht 08 (August)und in D1steht 2010. Der Monat und das
Jahr wird händig eingetragen. Nun möchte ich, dass in B1 aus den Daten ein Datum erstellt wird,
dass immer...
18.12.2009 21:37:54
Thread-ID: 1124989
4 Beiträge
Datum nach Quartalen filtern
Ben

Hallo zusammen,
hab jetzt über 2 Stunden im Forum gesucht, aber nichts hat funktioniert.
Folgendes Problem:
Ich habe eine Spalte mit mehreren Daten (TT/MM/JJJJ).
Nun möchte ich, mit Hilfe eines Command Buttons (VBA) nach einem Quartal filtern (z.B. Quartal I, 2009), so dass nur...
21.01.2010 20:01:06
Thread-ID: 1131934
8 Beiträge
Spalte nach Datum durchsuchen u danach Filtern
Marta

Hey Leute,
stehe vor meinem nächsten Problem. Nur leider fällt mir im Moment gar kein Lösungsweg ein, nicht einmal Ansatzweise.
Also das Szenario sieht folgendermaßen aus:
Ich habe eine Spalte mit verschiedenen Datumsangaben ab August 2009. Diese Spalte wird jeden Monat mit dem aktu...
03.08.2010 14:32:53
Thread-ID: 1170220
9 Beiträge
Nach Datum Filtern
Sebastian

Hallo Profis,
mal eien kurze Frage.
Ich habe in einer Tabelle "Datum" in Spalte E ein fordlaufendes Datum stehen. Jetzt möchte ich gerne ein Listenfeld mit der Monatsauswahl machen in dem man einen Monat wählen kann und dann alle anderen ausbledet.
In Spalte C hole ich mir den Mona...
26.02.2011 10:23:26
Thread-ID: 1202859
2 Beiträge
Einheitenrechnen Jahre und Monate
Thorsten

Hallo zusammen,
ich stehe vor folgendem Problem. Ich habe eine fest vorgegebene Formel, in der es die Zeiteinheit 1,5 Jahre gibt. Nun möchte ich aber 11 Monate eintragen.
Welche Formel kann ich nutzen, um die Einheiten umzurechnen?
Ich möchte die 11 Monate irgendwie so umrechnen, d...
01.09.2011 15:23:55
Thread-ID: 1228329
6 Beiträge
Anzeige
1. bis Monatsende und lfd. Jahr in eine Zelle
Josef_T

Guten Morgen zusammen.
Ich möchte den 1. eines Monats, dass Monatsende() und das Jahr in einer Zelle erscheinen lassen.
Kann mir bitte jemand einen Tip geben, wie die Formel lauten muß? Das Datum 01.01.2012, steht in A1.
Danke schon mal
Gruß
Josef
02.01.2012 07:15:05
Thread-ID: 1244181
9 Beiträge
fortlaufende Nummer nach Monat und Jahr
olly

Hi Leute!Folgendes Problem übersteigt meine Kentnisse: möchte in einer Zelle in einem Rechnungsformular eine fortlaufende Nummer erzeugen, wobei nur der erste Teil der Zahl foltlaufend, der zweite Teil der Monat und der dritte Teil das Jahr ist.
Also als Beispiel 0105/02, 0205/02 usw.
Vor...
30.05.2002 15:19:51
Thread-ID: 124816
5 Beiträge
Monate zählen und Jahren zuweisen
e-o

Hallo miteinander,
erneut habe ich mit einem Problem zu kämpfen, bei dem ich irgendwie feststecke:
Ich habe ein Anfangs- und ein Enddatum, nun möchte ich die Monate (angebrochende zählen voll) dazwischen zählen. Das ist auch recht simpel zu bewerkstelligen.
z.B. 25.03.2012 bis 01.08...
08.11.2012 12:53:46
Thread-ID: 1285828
10 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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