Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Aus Datum Jahreszahl extrahieren

Forumthread: Aus Datum Jahreszahl extrahieren

Aus Datum Jahreszahl extrahieren
31.03.2003 14:26:22
Karsten
Hallo ihr!

Wie kann ich aus einem Datum in VBA nur die Jahreszahl extrahieren?

Danke euch schonmal!

Euer Karsten

Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Aus Datum Jahreszahl extrahieren
31.03.2003 14:27:21
richard

hi karsten

das geht mit =jahr(a1)

wenn in a1 dein datum steht.

mfg richi

Re: Aus Datum Jahreszahl extrahieren
31.03.2003 14:30:44
karsten

in vba??? bitte konkreter!

Re: Aus Datum Jahreszahl extrahieren
31.03.2003 14:30:47
Mike E.

Hallo Karsten,

so z.B.

in Zelle B1 steht dein Datum, in A1 wird das Jahr ausgegeben

Cells(1,1) = format(Cells(1,2),"YYYY")

Gruß
Mike

Anzeige
Re: Aus Datum Jahreszahl extrahieren
31.03.2003 15:06:23
GQ

Versuch's doch einfach mal! Kann doch nicht aufwendiger sein, als noch mal zu posten!
Nein, ist nicht VBA, kannste direkt im Excelsheet benutzen!

Gruß GQ

Die Lösung
31.03.2003 15:39:54
Moe

Ich glaube das ist es was du suchst

Sub test()

jahr = Year(Date)

end sub

;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Infobox / Tutorial

Jahreszahl aus Datum in Excel extrahieren


Schritt-für-Schritt-Anleitung

Um in Excel die Jahreszahl aus einem Datum zu extrahieren, gibt es verschiedene Ansätze. Hier ist eine Schritt-für-Schritt-Anleitung für die Verwendung von Excel-Formeln und VBA.

Mit einer Excel-Formel:

  1. Angenommen, dein Datum steht in Zelle A1.
  2. Du kannst die folgende Formel in Zelle B1 verwenden:
    =JAHR(A1)

    Diese Formel gibt die Jahreszahl aus dem Datum in A1 zurück.

Mit VBA:

  1. Öffne den Visual Basic for Applications (VBA) Editor mit ALT + F11.
  2. Füge ein neues Modul hinzu.
  3. Verwende den folgenden Code, um das Jahr aus einem Datum zu extrahieren:
    Sub JahrAusDatum()
       Dim jahr As Integer
       jahr = Year(Cells(1, 1).Value) ' Hier wird das Datum aus Zelle A1 genommen
       Cells(1, 2).Value = jahr ' Das Jahr wird in Zelle B1 ausgegeben
    End Sub
  4. Schließe den Editor und führe das Makro aus.

Häufige Fehler und Lösungen

  • Fehler: #WERT!

    • Lösung: Stelle sicher, dass die Zelle A1 ein gültiges Datum enthält.
  • Fehler: Das Makro funktioniert nicht.

    • Lösung: Überprüfe, ob du die richtigen Berechtigungen hast, um Makros auszuführen, und dass das Datum korrekt in Zelle A1 eingegeben ist.

Alternative Methoden

  1. Pivot-Tabellen: Du kannst auch Pivot-Tabellen verwenden, um aus einer Datensammlung nur die Jahre anzuzeigen. Füge die Datumsdaten als Zeilenfeld hinzu und gruppiere sie nach Jahr.

  2. Formatierung: Wenn du nur das Jahr anzeigen möchtest, kannst du auch die Zelle formatieren:

    • Rechtsklicke auf die Zelle mit dem Datum.
    • Wähle „Zellen formatieren“ und dann „Benutzerdefiniert“.
    • Gib JJJJ ein, um nur das Jahr anzuzeigen.

Praktische Beispiele

  • Wenn du mehrere Datumswerte in einer Spalte hast, kannst du die Formel =JAHR(A1) nach unten ziehen, um die Jahreszahlen für alle Datumswerte zu extrahieren.

  • Mit VBA kannst du eine Schleife verwenden, um über mehrere Zellen zu iterieren:

    Sub AlleJahreAuslesen()
       Dim i As Integer
       For i = 1 To 10 ' von A1 bis A10
           Cells(i, 2).Value = Year(Cells(i, 1).Value)
       Next i
    End Sub

Tipps für Profis

  • Verwende die Funktion =TEXT(A1,"JJJJ"), um das Jahr als Text auszugeben, falls du das Ergebnis nicht als Zahl benötigst.
  • Makro optimieren: Achte darauf, dass dein VBA-Code effizient ist, besonders wenn du mit großen Datenmengen arbeitest. Nutze Application.ScreenUpdating = False zu Beginn des Makros, um die Ausführung zu beschleunigen.

FAQ: Häufige Fragen

1. Wie kann ich nur das Jahr aus einem Datum in einer Zelle anzeigen? Du kannst die Formel =JAHR(A1) verwenden, um das Jahr aus dem Datum in Zelle A1 zu extrahieren.

2. Ist es möglich, das Jahr automatisch aus mehreren Zellen auszulesen? Ja, du kannst die Formel nach unten ziehen oder ein VBA-Makro verwenden, um über mehrere Zellen zu iterieren und das Jahr zu extrahieren.

Beliebteste Forumthreads (12 Monate)

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