Live-Forum - Die aktuellen Beiträge
Datum
Titel
05.10.2025 23:18:01
Summewenns aber mit VBA
05.10.2025 11:43:19
Bed. Format. Spezialfall, Möglich, die Registerfarbe nutzen?
04.10.2025 18:18:42
Anzahl in einer Zelle automatisch ermitteln
04.10.2025 17:44:54
Power Query - Filtern einer Spalte mittels einer Liste
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
1816to1820
1816to1820
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

wenn Eintrag in Zelle, dann Datum

Forumthread: wenn Eintrag in Zelle, dann Datum

wenn Eintrag in Zelle, dann Datum
05.03.2021 10:01:06
Marc-David
Hallo zusammen,
ich benutze die Formel 
=WENN($A1=0;"";WENN(ODER(F1"";E1"";D1"";C1"");"";WENN($A1"";VERKETTEN("CW";" "; ISOKALENDERWOCHE(HEUTE());""))))
meine Idee war damit, wenn ich in Zelle 1 etwas schreibe erscheint die Kalenderwoche des Eintrags in der Zelle, wenn dann in F1, E1, D1 oder C1 etwas geschrieben wird, verschwindet diese.
Meine Frage ist aber, mit meiner Formel wird immer die aktuelle Kalenderwoche geschrieben oder? Nicht die zum Zeitpunkt des Eintrags. Also steht nächste Woche dann statt Kalenderwoche 9 Kalenderwoche 10 in der Zelle.
Kann man die Formel ändern, dass Kalenderwoche 9 stehen bleibt oder braucht man dafür ein Macro?
Viele Grüße
MD

Anzeige

11
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: wenn Eintrag in Zelle, dann Datum
05.03.2021 10:13:18
Marc-David
Ein Zusatz noch, kann man das dann im Format "cw 09.21" ausgeben? Also Kalenderwoche 9 im Jahr 2021.
Besten Dank,
MD

AW: wenn Eintrag in Zelle, dann Datum
05.03.2021 10:29:06
Marc-David
Mit 
=WENN($A17=0;"";WENN(ODER(F17"";E17"";D17"";C17"");"";WENN($A17"";VERKETTEN("CW";" "; ISOKALENDERWOCHE(HEUTE());" ";JAHR(HEUTE());""))))
generiere ich jetzt "cw 9 2021". Problem ists weiterhin aber noch, dass ich mit "heute()" arbeite, deswegen denke ich mal, dass sich die Kalenderwoche immer ändert?
Und kann ich dies dann eben als "cw 09.21" ausgeben? Oder beispielsweise "cw 21.21" wenn es die 21. Kalenderwoche von 2021 ist?
Viele Grüße
MD

Anzeige
AW: wenn Eintrag in Zelle, dann Datum
05.03.2021 10:52:53
Marc-David
Hallo zusammen,
also ich habe mal etwas rumprobiert und das mit der Ausgabe ausreichend hinbekommen. Bzw. festgestellt, dass ich auch mit "CW 9 2021" arbeiten kann.
Nur ist das Formelproblem mit "heute()" noch :)
Viele Grüße
MD

AW: wenn Eintrag in Zelle, dann Datum
05.03.2021 11:02:54
Rudi
Hallo,
wenn die Woche erhalten bleiben soll, brauchst du definitiv ein Makro (Worksheet_Change-Event).
Gruß
Rudi

Anzeige
AW: wenn Eintrag in Zelle, dann Datum
05.03.2021 11:13:14
Marc-David
Hallo Rudi,
danke sehr, dann lese ich mich mal zu dem Thema ein :)
Viele Grüße
MD

AW: wenn Eintrag in Zelle, dann Datum
05.03.2021 11:44:45
Marc-David
Hallo Rudi,
also mein 
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then
If Target.Value > "0" Then Range("B1").Value = Date
If Target.Value
funktioniert schon mal.
Aber wenn ich es über mehrere Zellen machen möchte, 
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1:$A$20" Then
If Target.Value > "0" Then Range("B1:B20").Value = Date
If Target.Value
#
kommt eine Fehlermeldung, geht das nicht so einfach?
Viele Grüße
MD

Anzeige
nein, so einfach geht das nicht
05.03.2021 13:36:39
Rudi
Hallo,
z.B. 
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.CountLarge = 1 Then 'nur 1 Zelle geändert
Select Case Target.Column
Case 1  'A
If Target  "" Then
'Eintrag in B
Cells(Target.Row, 2) = _
"CW " & Format(WorksheetFunction.IsoWeekNum(Date), "00") & _
"." & Year(Date) Mod 2000
End If
Case 3 To 6 'C:F
If Application.CountA(Cells(Target.Row, 3).Resize(, 4)) Then  'Inhalt vorhanden
Cells(Target.Row, 2) = "" 'B löschen
End If
End Select
End If
End Sub
Gruß
Rudi

Anzeige
AW: nein, so einfach geht das nicht
05.03.2021 13:49:15
Marc-David
Hallo Rudi,
vielen Dank, eine Verständnisfrage hätte ich noch, was müsste ich ändern wenn ich erst in einer anderen Zeile als 1 anfangen würde?
Viele Grüße
MD

AW: nein, so einfach geht das nicht
05.03.2021 14:36:52
Werner
Hallo,
z.B. so: 
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Row > 9 Then 'ab Zeile 10
If Target.CountLarge = 1 Then 'nur 1 Zelle geändert
Select Case Target.Column
Case 1  'A
If Target  "" Then
'Eintrag in B
Cells(Target.Row, 2) = _
"CW " & Format(WorksheetFunction.IsoWeekNum(Date), "00") & _
"." & Year(Date) Mod 2000
End If
Case 3 To 6 'C:F
If Application.CountA(Cells(Target.Row, 3).Resize(, 4)) Then
Cells(Target.Row, 2) = "" 'B löschen
End If
End Select
End If
End If
End Sub
Gruß Werner

Anzeige
AW: nein, so einfach geht das nicht
05.03.2021 14:53:31
Marc-David
Hallo Werner,
vielen Dank, das funktioniert super.
Bedanke mich und schönes Wochenende :)
Viele Grüße
MD

Gerne und Danke für die Rückmeldung. o.w.T.
05.03.2021 15:08:44
Werner
;

Forumthreads zu verwandten Themen

Wenn nur Text in Zelle...
MichiM

Hallo,
ich habe eine umfangreiche Artikelliste (ca. 250.000 Artikel) aus einer Datanormdatei erstellt.
Aus dieser muss ich jetzt alle Artikel entfernen, dessen Artikelnummer (in Spalte A; als Text formatiert, damit führende Nullen nicht gelöscht werden) keinerlei Zahlen enthalten.
E...
22.08.2008 16:24:44
Thread-ID: 1003960
4 Beiträge
Wenn in Zelle folgender String, dann
mehmet

Hallo Forum,
In Spalte G4:G92 sind viele kodierte Zeichenfolgen.
Fest steht aber, dass diese zu erkennen sind, z.B.
in Zelle G4: METAR EKAH 052150Z AUTO 12005KT 9999NDV DZ OVC080/// 15/14 Q1005=
in Zelle G5: METAR ESSA 051940Z 20006KT CAVOK 11/10 Q1006 NOSIG=
und so weiter.....
06.09.2008 01:08:00
Thread-ID: 1007801
16 Beiträge
Wenn in Zelle folgende Zeichen, dann
mehmet

Hallo Forum,
in Spalte G4:G92 sind folge Codes:
in G4= TAF LSZH 090600Z 090716 VRB03KT 0200 FG VV001 BECMG 0709 CAVOK=
in G5= TAF DTTA 090600Z 090716 VRB03KT 0700 FG BKN013 BECMG 1012 07010KT 8000 SCT026=
in G6= TAF EPKT 090500Z 090615 24002KT 0500 FG NSC BECMG 0608 26005KT 9999...
09.09.2008 09:39:00
Thread-ID: 1008320
6 Beiträge
Wenn Zelle leer, dann Grafik löschen
TomTom

Hi,
ich möchte auf meinem Sheet abprüfen, ob die Zelle A41 und B41 leer sind, und wenn ja, soll eine Grafik (.bmp / wurde eingefügt mit Kopieren und einfügen und heisst im Namensfeld "Bild 01")
gelöscht oder unsichtbar werden.
Wie mache ich dies ?
Danke mal
Gruss
Tom<...
22.09.2008 08:28:10
Thread-ID: 1011373
3 Beiträge
Formelproblem "wenn(text - beinhaltet, dann....)
Andi

Hallo Experten,
Ich steh bei folgender Excelformel an.
=WENN(D13=....folgender text beinhaltet ist (AA).....;"True";"false")
Ich würde gerne überprüfen ob im Feld D13 der Text "AA" vorkommt (z.B. Artikel "AA01"), falls dies zutrifft bitte "True" schreiben, ansonsten "false".
Da...
04.12.2008 11:42:00
Thread-ID: 1030117
3 Beiträge
wenn zelle gelb, dann ganze zeile loeschen
maxx_1985

Hi zusammen
wie kann man excel das folgende sagen;
wenn in spalte A irgendwo eine gelbe zelle vorkommt, dann loesche mir die ganze ZEILE.
gelb sind naemlich die zwischensummen, die ich raus haben moechte.
danke euch vielmals
gruss
denis
10.12.2008 16:19:09
Thread-ID: 1031735
8 Beiträge
Anzeige
Wenn feste Zeichenfolge in Textbox, dann...
Lenni

Moin Excellianer!
Im Archiv finde ich leider nichts Vergleichbares und mit der InStr-Funktion setze ich mich auch schon bezüglich meiner Fragestellung auseinander. Komme aber leider zu keinen Ergebnissen.
In einem UserForm1 steht in der Textbox1 ein beliebiger Text von beliebiger Länge....
27.04.2009 22:31:44
Thread-ID: 1071497
3 Beiträge
Anzeige
Wenn bistimmte Werte in zwei Zellen dann Zeile ..
Micha

Hallo zusammen,
habe folgendes Problem:
habe eine große Datentabelle (B1:O31407); in dieser sollen diejenigen Zeilen gelöscht werden
in denen sowohl in der Spalte B als auch in der Spalte H der Zellwert "1" ist.
steht in einer der besagten Zellen ein anderer Werte soll nichts...
14.05.2009 08:36:57
Thread-ID: 1074984
4 Beiträge
Wenn Zelle enthält, dann
Rudolph

Hallo,
ich möchte mit .xls meine Kontodaten auswerten. Die Kontoauszugsdaten stehen in Spalte "D" auf dem Sheet "Kontodaten" Im selben Sheet Spalte "E" steht der Betrag. Das Sheet "Bezüge" enthält Namensfelder (z.B. "Auto" mit einer Auflistung der Tankstellen, KFZ-Versicherung o.ä.; "Lebens...
23.05.2009 14:30:40
Thread-ID: 1076853
5 Beiträge
Wenn Zeile doppelt dann löschen
walli

Guten Morgen,
ich möchte gern, wenn eine Zeile in meiner großen Tabelle doppelt vorhanden ist,
löschen.
Die Werte fangen ab Zeile 6 an und sind von Spalte A bis M,
es soll dann die doppelte Zeile nur von A-M gelöscht werden.
mfg walli
24.06.2009 11:29:15
Thread-ID: 1084058
5 Beiträge
Wenn Dann Funktion mit zählen wenn
Christian

Hallo zusammen,
ich brauche eine Funktion, die es mir ermöglicht, in einem Datenblatt erst nach einem bestimmten Wert zu suchen und dann zum gefundenen Wert einen weiteren Wert zu suchen und diese dann in der Anzahl zusammen zu zählen.
Bisher dachte ich, ich komme so zu meinem Ziel:
...
07.08.2009 10:26:38
Thread-ID: 1094218
3 Beiträge
Stichwort in Zelle B7,dann zusammzählen VBA
Wolfgang

Hallo,
im Tabellenblatt "Start" befinden sich in Zelle B7 bis B23 bestimmte Stichwörter, die auch in Tabelle "Daten", Spalte H vorkommen. Ich würde gerne zu jedem Stichwort zwei Abfragen klären:
Beispiel:
(Abfrage1)
1. Stichwort aus Zelle B7 kommt in Spalte H (Tabelle "Daten") v...
06.10.2009 19:49:07
Thread-ID: 1107632
10 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