Wie berechne ich in Excel ein bestimmtes Datum?

Question

Wie berechne ich in Excel ein bestimmtes Datum?

Antwort

Verwandte Fragen

Wie funktioniert der Dreisatz in Excel?

Vermehrten Grundwert in Excel berechnen?

Wie berechne ich das Ergebnis von A1 in A2?

Excel Formel zur Berechnung von Eingang Email zu Auslieferung

Excel-Formel: Wenn der Wert in C4:I4 M1/M2 ist, dann multipliziere mit 2, sonst null.

Excel-Formel: Wende auf die Zeilen C1:C5 den Wert M1/M2 an und multipliziere mit 2.

Wie rechne ich den minimalen Umsatz von 4 Kollegen in Excel aus, wenn der ganze Umsatz 706.240,00 beträgt?

Wie kann ich aus einem Datum die Kalenderwoche in Excel erstellen?

Wie kann der VBA-Code angepasst werden, damit in 'Personen einzelnd drucken' der Name in Spalte C9-C66 gesucht und mit dem Wert im Arbeitsplan verglichen wird?

Warum erkennt mein Excel VBA-Makro das Datum im Arbeitsplan nicht, obwohl es als Datum hinterlegt ist, aber in einer anderen Tabelle als Zahl angezeigt wird?

Accepted Answer

Um in Excel ein bestimmtes Datum zu berechnen, kannst du verschiedene Funktionen verwenden, je nach dem, was genau du erreichen möchtest. Hier sind einige gängige Methoden: 1. **Ein bestimmtes Datum eingeben**: Du kannst einfach ein Datum in eine Zelle eingeben, z.B. `01.01.2023`. 2. **Datum mit der Funktion `DATUM` erstellen**: Du kannst die Funktion `DATUM(Jahr; Monat; Tag)` verwenden, um ein Datum zu erstellen. Beispiel: `=DATUM(2023; 1; 1)` ergibt den 1. Januar 2023. 3. **Datum berechnen, indem du Tage hinzufügst**: Wenn du ein Datum hast und eine bestimmte Anzahl von Tagen hinzufügen möchtest, kannst du einfach die Zahl zu dem Datum addieren. Beispiel: Wenn in Zelle A1 der 01.01.2023 steht, kannst du `=A1 + 30` verwenden, um den 31. Januar 2023 zu erhalten. 4. **Datum berechnen mit `HEUTE()`**: Wenn du das aktuelle Datum verwenden möchtest, kannst du die Funktion `HEUTE()` nutzen. Beispiel: `=HEUTE() + 30` gibt das Datum in 30 Tagen an. 5. **Datum berechnen mit `DATEDIF`**: Um die Differenz zwischen zwei Daten zu berechnen, kannst du die Funktion `DATEDIF(Startdatum; Enddatum; "Einheit")` verwenden. Beispiel: `=DATEDIF(A1; B1; "d")` gibt die Anzahl der Tage zwischen den Daten in A1 und B1 zurück. Diese Methoden sollten dir helfen, mit Datumsberechnungen in Excel zu arbeiten.

Accepted Answer

Um den Dreisatz in Excel zu verwenden, kannst du die folgende Methode anwenden: 1. **Daten eingeben**: Trage die bekannten Werte in separate Zellen ein. Zum Beispiel: - A1: 10 (Wert 1) - B1: 20... [mehr]

Accepted Answer

Um den Dreisatz in Excel zu verwenden, kannst du die folgende Methode anwenden: 1. **Daten eingeben**: Trage die bekannten Werte in separate Zellen ein. Zum Beispiel: - A1: 10 (Wert 1) - B1: 20 (Wert 2) - A2: 5 (Wert 3, für den du den Wert 4 berechnen möchtest) - B2: ? (Wert 4, den du berechnen möchtest) 2. **Formel eingeben**: In die Zelle B2 gibst du die folgende Formel ein, um den Wert 4 zu berechnen: ``` = (A2 * B1) / A1 ``` 3. **Ergebnis anzeigen**: Drücke die Eingabetaste, und Excel berechnet den Wert in B2 basierend auf den eingegebenen Werten. Diese Methode ermöglicht es dir, den Dreisatz einfach und effektiv in Excel zu nutzen.

Accepted Answer

Um den vermehrten Grundwert in Excel zu berechnen, kannst du die folgende Formel verwenden: 1. **Grundwert (G)**: Dies ist der ursprüngliche Wert. 2. **Prozentsatz (p)**: Der Prozentsatz, um den... [mehr]

Accepted Answer

Um den vermehrten Grundwert in Excel zu berechnen, kannst du die folgende Formel verwenden: 1. **Grundwert (G)**: Dies ist der ursprüngliche Wert. 2. **Prozentsatz (p)**: Der Prozentsatz, um den der Grundwert erhöht werden soll. Die Formel für den vermehrten Grundwert (G') lautet: \[ G' = G + (G \times \frac{p}{100}) \] In Excel kannst du dies wie folgt umsetzen: 1. Gib den Grundwert in Zelle A1 ein. 2. Gib den Prozentsatz in Zelle B1 ein. 3. In Zelle C1 kannst du die folgende Formel eingeben: ``` =A1 + (A1 * (B1 / 100)) ``` Drücke Enter, und in Zelle C1 wird der vermehrte Grundwert angezeigt.

Accepted Answer

Um das Produkt der in Zelle A1 stehenden Aufgabe "1+2" in Zelle A2 anzuzeigen, kannst du die folgende Formel in Zelle A2 eingeben: ```excel =EVAL(A1) ``` Allerdings unterstützt Excel... [mehr]

Accepted Answer

Um das Produkt der in Zelle A1 stehenden Aufgabe "1+2" in Zelle A2 anzuzeigen, kannst du die folgende Formel in Zelle A2 eingeben: ```excel =EVAL(A1) ``` Allerdings unterstützt Excel die Funktion `EVAL` nicht direkt. Stattdessen kannst du die Formel in Zelle A1 direkt als Berechnung verwenden. Gib in Zelle A2 einfach die Formel ein: ```excel =1+2 ``` Das Ergebnis in Zelle A2 wird dann 3 sein. Wenn du die Berechnung dynamisch aus Zelle A1 übernehmen möchtest, kannst du die Funktion `TEXT` verwenden, um den Text in eine Formel umzuwandeln, aber das erfordert ein Makro oder eine benutzerdefinierte Funktion, da Excel standardmäßig keine Textformeln auswertet.

Accepted Answer

Um in Excel die Differenz zwischen einem Datum und einer Uhrzeit (z.B. "Eingang Email") und einem anderen Datum (z.B. "Auslieferung") zu berechnen, kannst du die folgende Formel ve... [mehr]

Accepted Answer

Um in Excel die Differenz zwischen einem Datum und einer Uhrzeit (z.B. "Eingang Email") und einem anderen Datum (z.B. "Auslieferung") zu berechnen, kannst du die folgende Formel verwenden: Angenommen, das Datum und die Uhrzeit des Eingangs der E-Mail stehen in Zelle A1 und das Datum der Auslieferung in Zelle B1. Die Formel zur Berechnung der Differenz in Tagen wäre: ```excel =B1 - A1 ``` Wenn du die Differenz in Tagen, Stunden und Minuten anzeigen möchtest, kannst du die folgende Formel verwenden: ```excel =TEXT(B1 - A1, "Tage: 0; Stunden: 0; Minuten: 0") ``` Stelle sicher, dass die Zellen A1 und B1 im richtigen Datumsformat formatiert sind, damit Excel die Berechnungen korrekt durchführen kann.

Accepted Answer

Die gewünschte Excel-Formel könnte wie folgt aussehen: ```excel =IF(AND(C4:I4=M1/M2), C4:I4*2, 0) ``` Diese Formel prüft, ob der Wert in den Zellen C4 bis I4 gleich dem Ergebnis von M... [mehr]

Accepted Answer

Die gewünschte Excel-Formel könnte wie folgt aussehen: ```excel =IF(AND(C4:I4=M1/M2), C4:I4*2, 0) ``` Diese Formel prüft, ob der Wert in den Zellen C4 bis I4 gleich dem Ergebnis von M1/M2 ist. Wenn dies der Fall ist, wird der Wert in C4 bis I4 mit 2 multipliziert, andernfalls wird 0 zurückgegeben. Beachte, dass du die Formel möglicherweise anpassen musst, um sie auf die gesamte Zeile anzuwenden, da die Funktion `AND` in dieser Form nicht direkt auf einen Bereich angewendet werden kann. Eine mögliche Lösung könnte sein, die Formel für jede Zelle einzeln zu verwenden oder eine Array-Formel zu erstellen, je nach Bedarf.

Accepted Answer

Um in Excel die Werte in den Zellen C1 bis C5 zu überprüfen und, falls sie dem Wert M1/M2 entsprechen, diese mit 2 zu multiplizieren, kannst du die folgende Formel verwenden: ```excel =SUMM... [mehr]

Accepted Answer

Um in Excel die Werte in den Zellen C1 bis C5 zu überprüfen und, falls sie dem Wert M1/M2 entsprechen, diese mit 2 zu multiplizieren, kannst du die folgende Formel verwenden: ```excel =SUMMEWENN(C1:C5; M1/M2; C1:C5) * 2 ``` Diese Formel summiert die Werte C1:C5, die dem Wert M1/M2 entsprechen, und multipliziert das Ergebnis mit 2. Wenn du die Berechnung für jede Zelle einzeln durchführen möchtest, kannst du auch eine Hilfsspalte verwenden, um die Berechnung für jede Zeile durchzuführen.

Accepted Answer

Um den minimalen Umsatz von den vier Kollegen in Excel zu berechnen, kannst du die Funktion `MIN` verwenden. Angenommen, die Umsätze der vier Kollegen stehen in den Zellen A1 bis A4, dann wü... [mehr]

Accepted Answer

Um den minimalen Umsatz von den vier Kollegen in Excel zu berechnen, kannst du die Funktion `MIN` verwenden. Angenommen, die Umsätze der vier Kollegen stehen in den Zellen A1 bis A4, dann würdest du folgende Schritte ausführen: 1. Gib die Umsätze der Kollegen in die Zellen A1 bis A4 ein. 2. Klicke in eine leere Zelle, in der das Ergebnis angezeigt werden soll. 3. Gib die folgende Formel ein: `=MIN(A1:A4)`. 4. Drücke die Eingabetaste. Diese Formel gibt dir den minimalen Umsatz der vier Kollegen zurück.

Accepted Answer

Um aus einem Datum die Kalenderwoche (KW) in Excel zu erstellen, kannst du die FunktionKALENDERWOCHE` verwenden. Hier ist, wie du es machst: 1. Angenommen, dein Datum steht in Zelle A1. 2. In eine an... [mehr]

Accepted Answer

Um aus einem Datum die Kalenderwoche (KW) in Excel zu erstellen, kannst du die FunktionKALENDERWOCHE` verwenden. Hier ist, wie du es machst: 1. Angenommen, dein Datum steht in Zelle A1. 2. In eine andere Zelle (z.B. B1) gibst du die folgende Formel ein: ```excel =KALENDERWOCHE(A1; 2) ``` Der zweite Parameter `2` gibt an, dass die Woche am Montag beginnt (ISO-Woche). 3. Drücke die Eingabetaste, und die Kalenderwoche für das Datum in A1 wird angezeigt. Falls du die ISO-Kalenderwoche (nach ISO 8601) benötigst, kannst du die Funktion `ISOKALENDERWOCHE` verwenden, die in neueren Excel-Versionen verfügbar ist: ```excel =ISOKALENDERWOCHE(A1) ``` Diese Formel gibt die Kalenderwoche gemäß den ISO-Standards zurück.

Accepted Answer

Um die Schleife so umzubauen, dass **in "Personen einzelnd drucken"** in den Zellen **C9:C66** nach dem Namen gesucht und mit der Spalte B im "Arbeitsplan" verglichen wird, muss di... [mehr]

Accepted Answer

Um die Schleife so umzubauen, dass **in "Personen einzelnd drucken"** in den Zellen **C9:C66** nach dem Namen gesucht und mit der Spalte B im "Arbeitsplan" verglichen wird, muss die Namensprüfung in eine Schleife über diese Zellen gelegt werden. Für jeden gefundenen Namen wird dann geprüft, ob er in der gefundenen Zeile im "Arbeitsplan" steht. Die Übertragung erfolgt dann in die jeweilige Zeile (also z.B. in Zeile 9, 10, ...). Hier die angepasste Version des relevanten Teils: ```vba Sub übertragallepersonen() Dim wb As Workbook Dim wsQuell As Worksheet, wsZiel As Worksheet Dim datumToFind As Variant, rGef As Range Dim nameQuell As Variant Dim zielStartCol As Long, zielCol As Long, quelleCol As Long Dim i As Long Set wb = ThisWorkbook Set wsQuell = wb.Sheets("Personen einzelnd drucken") Set wsZiel = wb.Sheets("Arbeitsplan") ' Datum aus Spalte B8 der Quell-Tabelle als Zahl If IsDate(wsQuell.Range("B8").Value) Then datumToFind = CLng(wsQuell.Range("B8").Value) Else MsgBox "Datum in Personen einzeln drucken!B8 ist ungültig oder leer.", vbExclamation Exit Sub End If ' In Arbeitsplan Spalte A suchen (ebenfalls als Zahl) Set rGef = Nothing For Each cell In wsZiel.Columns("A").Cells If IsDate(cell.Value) Then If CLng(cell.Value) = datumToFind Then Set rGef = cell Exit For End If End If If cell.Row > 1000 Then Exit For ' Optional: Suchbereich begrenzen Next cell If rGef Is Nothing Then MsgBox "Datum nicht in Arbeitsplan Spalte A gefunden.", vbInformation Exit Sub End If zielStartCol = 4 ' Spalte D ' Jetzt alle Namen in C9:C66 durchgehen For i = 9 To 66 nameQuell = wsQuell.Cells(i, 3).Value ' Spalte C If Not IsEmpty(nameQuell) Then If wsZiel.Cells(rGef.Row, "B").Value = nameQuell Then ' Kopiere Werte von Arbeitsplan F bis BA in die Zielspalten ab Spalte D der aktuellen Zeile For zielCol = 6 To 54 ' F(6) bis BA(54) wsQuell.Cells(i, zielStartCol + (zielCol - 6)).Value = wsZiel.Cells(rGef.Row, zielCol).Value Next zielCol End If End If Next i MsgBox "Datenübertragung abgeschlossen.", vbInformation End Sub ``` **Hinweis:** - Die Übertragung erfolgt für jede Zeile von C9 bis C66, sofern dort ein Name steht und dieser in der gefundenen Zeile im "Arbeitsplan" (Spalte B) steht. - Die Werte werden in die jeweilige Zeile (i) ab Spalte D geschrieben. - Die Meldung am Ende kommt nur einmal, wenn alle Zeilen durchlaufen wurden. Falls du möchtest, dass für jeden gefundenen Namen eine eigene Zeile im "Arbeitsplan" gesucht wird (also nicht nur für das eine Datum), müsste die Logik noch weiter angepasst werden.

Accepted Answer

Das Problem liegt sehr wahrscheinlich an der Art, wie Excel intern mit Datumswerten umgeht. Ein Datum in Excel ist eigentlich eine Zahl (z.B. 45123 für den 01.09.2023), aber die Anzeige kann unte... [mehr]

Accepted Answer

Das Problem liegt sehr wahrscheinlich an der Art, wie Excel intern mit Datumswerten umgeht. Ein Datum in Excel ist eigentlich eine Zahl (z.B. 45123 für den 01.09.2023), aber die Anzeige kann unterschiedlich sein – als Zahl, als Datum, als Text. Wenn du ein Datum per Formel erzeugst (z.B. `=A1` oder `=DATUM(...)`), kann es sein, dass beim Kopieren oder beim Vergleich mit VBA Unterschiede auftreten, insbesondere wenn das eine Feld als Zahl und das andere als Text formatiert ist. **Typische Ursachen und Lösungen:** ### 1. Unterschiedliche Formate (Datum vs. Text) - **Problem:** In `wsQuell.Range("B8")` steht das Datum als Zahl, im Arbeitsplan ist es vielleicht als Text oder per Formel erzeugt. - **Lösung:** Stelle sicher, dass beide Werte als Datum (also als Zahl) vorliegen. Du kannst das in VBA erzwingen: ```vba datumToFind = CLng(wsQuell.Range("B8").Value) ``` und beim Suchen: ```vba Set rGef = wsZiel.Columns("A").Find(What:=datumToFind, LookIn:=xlValues, LookAt:=xlWhole) ``` ### 2. Zeitanteil im Datum - **Problem:** Ein Datum kann auch eine Uhrzeit enthalten (z.B. 01.09.2023 00:00:00 vs. 01.09.2023 12:00:00). Das sieht gleich aus, ist aber intern unterschiedlich. - **Lösung:** Beim Vergleich nur das Datum nehmen: ```vba datumToFind = Int(wsQuell.Range("B8").Value) ``` und beim Suchen: ```vba Set rGef = wsZiel.Columns("A").Find(What:=datumToFind, LookIn:=xlValues, LookAt:=xlWhole) ``` ### 3. Formelzellen - **Problem:** In der Zieltabelle steht das Datum als Formel, z.B. `=Tabelle1!A1`. Das ist aber für den Wertvergleich egal, solange der Wert ein Datum ist. - **Lösung:** Prüfe, ob in der Zieltabelle wirklich ein Datum steht (kein Text!). Teste das z.B. mit: ```vba Debug.Print wsZiel.Cells(1, "A").Value, IsDate(wsZiel.Cells(1, "A").Value) ``` ### 4. Find-Methode: LookIn-Parameter - **Problem:** `LookIn:=xlValues` ist meist richtig, aber manchmal hilft auch `xlFormulas`. - **Lösung:** Teste beide Varianten: ```vba Set rGef = wsZiel.Columns("A").Find(What:=datumToFind, LookIn:=xlValues, LookAt:=xlWhole) If rGef Is Nothing Then Set rGef = wsZiel.Columns("A").Find(What:=datumToFind, LookIn:=xlFormulas, LookAt:=xlWhole) End If ``` --- **Zusammengefasst:** - Stelle sicher, dass du wirklich mit Zahlen (Datumswerten) vergleichst, nicht mit Text. - Nutze `CLng` oder `Int`, um den Zeitanteil zu entfernen. - Probiere ggf. beide `LookIn`-Varianten. - Prüfe mit `IsDate`, ob in beiden Zellen wirklich ein Datum steht. **Beispiel für robusten Vergleich:** ```vba Dim datumToFind As Long datumToFind = CLng(wsQuell.Range("B8").Value) Dim cell As Range For Each cell In wsZiel.Columns("A").Cells If CLng(cell.Value) = datumToFind Then Set rGef = cell Exit For End If Next cell ``` Das ist zwar etwas langsamer als `.Find`, aber sehr robust. --- **Tipp:** Wenn du weiterhin Probleme hast, prüfe die Werte mit `Debug.Print` im Direktfenster, um zu sehen, wie sie intern aussehen. --- **Weitere Infos zu Excel-Datumswerten:** [Microsoft: Arbeiten mit Datumsangaben und Uhrzeiten in Excel](https://support.microsoft.com/de-de/office/arbeiten-mit-datumsangaben-und-uhrzeiten-in-excel-9ffb6c2f-2c42-4b53-9573-2b8b0a77b3c0) --- Falls du einen bestimmten Wert als Beispiel hast, kannst du ihn im Direktfenster (`Debug.Print wsQuell.Range("B8").Value`) ausgeben und vergleichen, wie er in der Zieltabelle aussieht.