Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.10.2025 13:18:36
Übersicht von Excel Konstanten
16.10.2025 11:48:44
Makro von Excel in Word aufrufen
16.10.2025 11:16:26
SUMMEWENN erweitern
16.10.2025 09:40:53
Mehrere Konferenzen ohne Personenüberschneidung terminieren
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1276to1280
1276to1280
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Aktuelles Datum in Zeilen aktivieren

Forumthread: Aktuelles Datum in Zeilen aktivieren

Aktuelles Datum in Zeilen aktivieren
Dieter(Drummer)
Guten Morgen VBA Spezialiasten,
im meinem Kalender wird das Datum in den Zeilen per Formel angezeigt (Kalender habe ich teilweise aus dem Netz). In der Musterdatei habe ich Verknüpfungen zum Original gelöscht, wegen Übertragung.
Ich suche ein VBA Makro, dass bei aktivieren des Kalenders - oder öffnen der Datei - das aktuelle Datum aktiviert. Mit "Worbook_Open" würde das Makro wohl anfangenm aber weiter komme ich nicht ...
Habe die Datei mal als Upload bereit gestellt. Freue mich auf Hilfe und vorab meinen Dank für's drum kümmern: https://www.herber.de/bbs/user/81847.xls
Gruß, Dieter(Drummer)

Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Aktuelles Datum in Zeilen aktivieren
15.09.2012 09:45:36
Josef

Hallo Dieter,
' **********************************************************************
' Modul: DieseArbeitsmappe  Typ: Element der Mappe(Sheet, Workbook, ...)
' **********************************************************************

Option Explicit

Private Sub Workbook_Open()
  Dim lngMonth As Long, vntDay As Variant
  
  lngMonth = Month(Date) * 2 + 1
  
  With Sheets("StdKal")
    vntDay = Application.Match(Clng(Date), .Rows(lngMonth), 0)
    If IsNumeric(vntDay) Then Application.Goto .Cells(lngMonth, vntDay)
  End With
  
End Sub



« Gruß Sepp »

Anzeige
AW: Einfach PRIMA!
15.09.2012 09:58:19
Dieter(Drummer)
Hi Sepp,
vielen Dank für deine schnelle Hilfe. Es funktioniert prima!
Wie muss ich das Makro anpassen, dass die Zelle direkt UNTER dem aktuellen aktuellen Datum aktiviert wird?
Danke für evtl. weitere Hilfe und Sorry, dass ich dies nicht direkt gefragt habe.
Gruß, Dieter(Drummer)

Anzeige
AW: Einfach PRIMA!
15.09.2012 10:00:43
Josef

Hallo Dieter,
Application.Goto .Cells(lngMonth + 1, vntDay)


« Gruß Sepp »

Anzeige
AW: Danke Sepp, einfach perfekt!
15.09.2012 10:07:04
Dieter(Drummer)
Hi Sepp,
Danke dir für schnelle und perfekte Hife bzw. Makro. Funktioniert prima!
Ein schönes Wochenende und nochmal DANKE.
Gruß, Dieter(Drumnmer)
;

Forumthreads zu verwandten Themen

VBA Code auch mit aktuellem Datum statt CommandBut
alex

Hallo zusammen,
Den Code in dieser Datei:
https://www.herber.de/bbs/user/55491.xls
schrieb mir ein Forumsmitglied heute Vormittag.
Der funzt so wie ich mir das vorgestellt habe.
Jedoch bräuchte ich das Ding mit aktuellem Datum (also immer am "Heute" ausgerichtet) statt mit...
18.09.2008 22:47:00
Thread-ID: 1010873
2 Beiträge
bedingte Formatierung mit Datum
Andy

Guten Tag,
ich habe eine Frage.
Ich würde gerne die folgende Bedienung in einer bedingten Formatierung umsetzen.
wenn ein Datum in einer Zelle (A1) nach dem Datum in einer anderen Zelle (A2) ist und eine dritte Zelle (A3) leer ist, dann mache die Zelle (A1) rot.
geht das?
vi...
21.01.2009 16:33:00
Thread-ID: 1042306
3 Beiträge
Zeile mit aktuellem Datum auslesen
Horst

Hallo Excel-Gemeinde!
Wie kann ich bei untenstehendem VBA-Code angeben, dass von der B.xls die Spalte AA jener Zeile A ausgelesen wird, welche dem aktuellem Systemdatum entspricht (Spalte A enthält Datumswerte, Spalte AA Beträge).
Das müsste irgendwie mit "Application.Match(CLng(Date)"...
11.02.2009 14:23:00
Thread-ID: 1049595
17 Beiträge
Zellen färben mittels Datumsabfrage
Pascal

Hallo,
ich brauche mal die Hilfe von Excel "Kennern"...
Ich habe verschiedene Spalten in einem Sheet, die eine zeigt einen Endtermin an, die andere den Status. Dieser steht auf "Released" oder "Service"...
Ist nun ein Endtermin erreicht und der Status steht immer noch auf "Released"...
12.02.2009 11:15:00
Thread-ID: 1049955
2 Beiträge
Zellen färben mittels Datumsabfrage
Pascal

Hallo,
ich brauche mal die Hilfe von Excel "Kennern"...
Ich habe verschiedene Spalten in einem Sheet, die eine zeigt einen Endtermin an, die andere den Status. Dieser steht auf "Released" oder "Service"...
Ist nun ein Endtermin erreicht und der Status steht immer noch auf "Released"...
12.02.2009 11:15:00
Thread-ID: 1049956
3 Beiträge
Wochentag aus Zelle mit Datum
MikeM

Hallo zusammen,
hab ein Problem und hoffe auf eine Lösung.
Ich möchte mir gerne aus einem Datum den Wochentag anzeigen lassen - allerdings als Text.
Beispiel:
Zelle A1 = 11.02.2009 (formatiert als TT, da ich nur den Tag brauche, also 11, da es sich um einen Kalender handelt)
...
18.05.2009 14:47:49
Thread-ID: 1075909
4 Beiträge
VBA Datumsspalte bis zum aktuellen Tag markieren
Michael

Hallo, ich habe einiges ausprobiert aber nichts hat annährend funktioniert daher suche ich nun hier Hilfe.
Ich habe eine Tabelle wo in der Spalte A immer ein Datum steht.
In Zelle E:3 befindet sich das aktuelle Datum.
Nun möchte ich gern das in Spalte A alle Werte bis zum Tag vor de...
10.06.2009 09:13:18
Thread-ID: 1080342
2 Beiträge
Anzeige
Zellen mit Datum - ändern
Burghard

Hallo,
ich brauche mal Hilfe.
Ich möchte in der Spalte A (Bereich A1 bis A200) in der Tabelle1 alle Zellen mit Datum finden und diese Zellen auf das Datumsformat "TTTT TT.MM.JJJJ" verändern.
Ich brauche die Lösung in VBA (nicht als bedingte Formatierung), da ich sie in ein Makro ein...
30.07.2009 09:06:19
Thread-ID: 1092422
4 Beiträge
Anzeige
Formel für ganze Spalte
Andreas

Hallo zusammen,
ich stehe bei dieser wahrscheinlich einfachen Formel echt auf dem Schlauch.
Ich würde mich über eine Hilfe gaaanz riesig freuen
https://www.herber.de/bbs/user/63900.xls
18.08.2009 11:46:25
Thread-ID: 1096693
14 Beiträge
Datum mit Klick in andere Zelle kopieren
Josef_T

Hallo zusammen,
ich bräuchte mal eure Hilfe, für eine Formel die folgendes ausführt:
In B6:B30, habe ich Datums (Datümer?) stehen. Wenn ich dann irgendeins der Datümer in dieser Spalte anklicke, soll das jeweilige Datum in die Zelle D6 geschrieben werden. Die Datümer in Spalte B, sollen...
17.09.2009 19:18:21
Thread-ID: 1103686
7 Beiträge
Aktuellen Tag im Chart markieren?
ChrisW

Hallo Leute,
besteht die Möglichkeit und wenn ja - wie - in einem Chart eine Senkrechte linie darzustellen, die den Heutigen Tag markiert?
So ähnlich wie in meinem Screenshot simuliert:

Danke
Chris
23.09.2009 15:32:31
Thread-ID: 1104968
3 Beiträge
bedingte Formatierung anhand Datum i. Kommentar?
Wolfgang

Hallo,
wäre denkbar, dass anhand eines Kommentars bzw. des darin enthaltenen Datums der Zellhintergrund auf gelb geändert wird, wenn seit dem Datum mehr als 4 Wochen vergangen sind und der Zellinhalt mehr als 0 beträgt? - Abgefragt werden sollen dabei die Spalten I2:K der Tabelle "Daten". U...
17.10.2009 03:03:37
Thread-ID: 1110195
9 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige