Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 22:18:24
Liste mit Links - tricky
26.09.2025 18:34:36
Welches Datum gibt mein M-Code aus?
26.09.2025 10:29:46
Wert aus einer Zelle bei jeder Eingabe in neue Zelle
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
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
996to1000
996to1000
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

If then else

Forumthread: If then else

If then else
06.08.2008 10:27:54
Sven
Guten Morgen,
ich tüftel gerade an einem Code, aber wie es immer so ist, stößt man schnell an seine Grenzen.
In Spalte A1 steht eine Anfangsuhrzeit bsp. 06:00 Uhr
In Spalte B1 steht eine Endzeit bsp. 14:00 Uhr
In Spalte C1 soll dann Früh Spät oder Nacht stehen.
Früh = 06:00 Uhr bis 14:00 Uhr
Spät = 14:00 Uhr bis 22:00 Uhr
Nacht = 22:00 Uhr bis 06:00 Uhr
Der nachfolgende Code war ein kläglicher Versuch. Vielleicht hat ja jemand der Profis eine ähnliche Anforderung und dementsprechend einen Tip für mich.
Vielen Dank

Sub Schicht()
Application.Sheets("Tabelle1").Activate
If CDate(Range("A1")) >= CDate("06:00")  CDate("06:00") Then
Application.Sheets("Tabelle1").Range("C1") = "Früh"
ElseIf CDate(Range("A1")) >= CDate("14:00")  CDate("14:00") Then
Application.Sheets("Tabelle1").Range("C1") = "Spät"
ElseIf CDate(Range("A1")) >= CDate("22:00")  CDate( _
"00:00")


Anzeige

8
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: If then else
06.08.2008 10:48:04
David
VBA ist auch nicht so mein Ding.
Als Formellösung würde es so funzen:
Tabellenblattname: Tabelle2
 

B

C

D

E

F

G

12

Früh

6:00

14:00

 

1:00

Nacht

13

Spät

14:00

22:00

 

 

 

14

Nacht

22:00

6:00

 

 

 


Benutzte Formeln:
G12: =WENN(UND(F12>=$C$12;F12=$C$13;F12 Vielleicht reicht dir das ja auch so, ansonsten musst du evtl. die Formel in VBA "übersetzen".
Rückmeldung wäre nett.
Gruß
David

Anzeige
AW: If then else
06.08.2008 10:53:00
Sven
Erstmal danke für Deine Mühe, aber leider gebe ich Anfangs- und Endzeit ein. Das ganze sieht dann etwas anders aus.
So eine ähnliche Formel habe ich bereits, leider ist diese auch mit Fehlern behaftet. Ich dachte mit einem Code komme ich einfacher davon.
=WENN(UND(F44>ZEITWERT("21:59");I44=6/24;I44=14/24;I44 Gruß
Anzeige
AW: If then else
06.08.2008 11:25:13
David
dann sei nicht so sparsam mit Infos. Definiere doch mal, was bei den einzelnen Zeiten angezeigt werden soll. Kann deine "Such-Range" immer nur innerhalb der Vorgaben liegen oder auch "grenzüberschreitend" sein etc.?
Gruß
David

AW: If then else
06.08.2008 11:38:25
Sven
Wie bereits erwähnt, in den nachfolgenden Zeiträumen soll die entsprechende Schicht angezeigt werden. Trage ich beispielsweise 07:00 (in Spalte A1) und 13:00 (in Spalte B1) ein, dann soll er Früh in Spalte C1 ausgeben. Überschneidungen würde ich erstmal ausblenden wollen, da der Code wahrscheinlich zu aufwendig wird.
Früh = 06:00 Uhr bis 14:00 Uhr
Spät = 14:00 Uhr bis 22:00 Uhr
Nacht = 22:00 Uhr bis 06:00 Uhr

Anzeige
AW: If then else
06.08.2008 11:42:20
David
Wenn keine Überschneidungen möglich sind, brauchst du doch nur die Anfangszeit zu prüfen. Und damit würde meine Formel arbeiten. Alternativ könnte man noch die Ende-Zeit prüfen lassen und das Ergebnis dann z. Bsp. über UND oder ODER ausgeben lassen.
Gruß
David

AW: If then else
06.08.2008 11:49:30
Sven
Da hast Du wohl Recht. Ich probiere das erstmal aus und schaue dann weiter. Mein Problem ist, dass ich wahrscheinlich zu viele Möglichkeiten abdecken möchte und dann irgendwo hängen bleibe.
Danke

Anzeige
AW: If then else
06.08.2008 12:14:00
yusuf
Hi,
versuch mal diesen angepassten Code.
Ungetestet:

Sub Schicht()
Application.Sheets("Tabelle1").Activate
If CDate(Range("A1")) >= CDate("06:00") Or CDate(Range("A1"))  CDate("06:00") Then
Application.Sheets("Tabelle1").Range("C1") = "Früh"
ElseIf CDate(Range("A1")) >= CDate("14:00") Or CDate(Range("A1"))  CDate("14:00") Then
Application.Sheets("Tabelle1").Range("C1") = "Spät"
ElseIf CDate(Range("A1")) >= CDate("22:00") Or CDate(Range("A1"))  CDate("00:00") Or CDate(Range("A1"))


Gruß
Yusuf

Anzeige
AW: Formel
06.08.2008 15:12:15
hary
Hallo Sven
Hatte dasselbe Problem. Der Fehler liegt in der Formel: Excel rechnet mit Zahlen.
Gib mal in C1 diese Formel ein

=WENN(UND(A1>=0,25;A1


0,25 steht fuer 6 Uhr, 0,58 fuer 14 Uhr. Um die richtigen Zahlen zu bekommen schreibe in die zeile die Uhrzeit rein zb.: 6:00 und wandele sie dann als Zahl um. So bekommst Du die richtigen Zahlen fuer die Formel, anschliessend kannst du sie wieder zurueck wandeln. Wichtig noch(da bin ich auch verzweifelt) wenn Du die Stunden ueber Null Uhr zusammen rechnest brauchst Du die 1(fuer 24Std).
Gruss Hary

Anzeige
;

Forumthreads zu verwandten Themen

If Then mit mehreren Schritten
Pfannen-Meister

Guten Morgen,
leider ist mein Betreff etwas unglücklich formuliert, aber ich weiß nicht, wie ich mein Problem in wenigen Worten zusammen fassen soll:
In VBA nutze ich eine If Then Anweisung. Ist die Bedingungen erfüllt, so soll er mehrer Schritte abarbeiten. Aber wie sage ich ihm, daß...
13.08.2008 10:34:00
Thread-ID: 1001416
5 Beiträge
VBA - If Anweisung mehrerer Abfragen
Jana

Hallo liebes Forum!!
Ich stehe gerade komplett (mal wieder auf dem Schlauch)!..
Ich habe einen umfangreichen VBA-Code mit Arrays. Nun möchte ich, dass in der Spalte 3 geguckt wird, ob die Zahl 2,3,7,9,11 oder 13 in dieser Zelle steht. Ist einer dieser Zahlen vorhanden, dann soll eine Va...
11.09.2008 12:06:28
Thread-ID: 1009072
3 Beiträge
VBA - if anweisung mit variable
Thomas

Hallo,
ich habe ein blöds Problem und zwar habe ich folgendes If Abfrage in einer Forschleife in Pseudo:
Wenn A1 kleiner als A2 tu dies sonst tu das
VBA:
For i = 2 To 5 If "A" & i
Irgendwie trifft dort immer nur Else ein, ich glaube es liegt an der Bedingungsformulier...
16.10.2008 10:10:50
Thread-ID: 1016763
4 Beiträge
Zeilen einfärben mit mehreren Bedingungen
donald

Hallo Forum,
ich bräuchte eure Hilfe. Ich möchte folgendes erreichen:
wenn in spalte B "Ja"/"Nein" reingeschrieben wird, soll Excel die Zeile entsprechend einfärben (Grün/gelb). Das ist an sich noch gar nicht das Problem. In Spalte C wird ebenfalls eine Ja/Nein-Abfrage erwartet, so da...
22.10.2008 12:03:56
Thread-ID: 1018296
6 Beiträge
Schleife: Zählen mit 2 Bedingungen
Sabrina

Hallo liebe Excel - Freunde,
Wollte erstmal sagen, dass ich das Forum ganz toll finde. Hat mir als Einsteiger schon den ein oder anderen Tipp gegeben.
Nun habe ich ein spezifisches Problem, bei dem ich einfach nicht weiterkomme. Ich hoffe ihr könnte mir dabei ein bisschen helfen.
Ic...
23.11.2008 20:21:00
Thread-ID: 1027155
6 Beiträge
Anzeige
If then else für Anfänger
Gunter

Hallo Zusammen,
wenn ich eine If then else Abfrage habe z.B:
If ComboBox2.Value = "Trailer" And TextBox10.Value = "" Then _
Label36.Visible = True
TextBox10.BackColor = &HFF&
If ComboBox2.Value = "Spot" And TextBox11.Value = "" Then _
Label37.Visible = True
T...
30.11.2008 12:49:00
Thread-ID: 1029010
9 Beiträge
Anzeige
If und else in Label.caption
Leon

Hi Zusammen
Was mache da falsch, daß Range I11 immer angezeigt wird obwohl nichts drin steht. Falls Range I11 grösser als 0 dann I11 zeigen ansonsten H11.
Private Sub userform_initialize() If Sheets("Wesentlichkeit").Range("I11") >= 0 Then Label20.Caption = Sheets("Wesentlichkeit")...
31.01.2009 22:28:06
Thread-ID: 1045773
3 Beiträge
Sumif mit 2 Bedingungen
HeinzS

Hallo zusammen, kann mir jemand sagen, wie ich die formel richtig aufbauen muß:
Aufgabenstellung: Addiere alle Zahlen aus dem Bereich A1:A100, welche entweder =123 sind? Habe es mit Sumif versucht, scheitere aber an der 2ten Bedingung.
Danke für eure Hilfe!
Lg, Heinz
04.02.2009 10:26:00
Thread-ID: 1046913
4 Beiträge
Zählenwenn mit mehreren Bedingungen
Thomy

Hallo Excelprofis
Ich habe 2 Spalten. In der 1. befinden sich Zahlen und in der 2. Namen.
Welche Formel muss ich verwenden, wenn ich die Anzahl Zahlen in der Spalte A ermitteln will, die grösser als 2 und kleiner als 6 sind und in der Spalte B der Name Meier steht.
Ich bin mal bis...
13.03.2009 15:38:03
Thread-ID: 1059916
2 Beiträge
Anzeige
ZÄHLENWENN() mit mehreren Bedingungen
Kasimir

Hallo Leute,
irgendwie komme ich nicht weiter. Ich möchte eine ZÄHLENWENN()-Funktion mit mehreren Bedingungen erstellen, scheitere aber kläglich daran. Ich möchte eigentlich nur Zählen, wenn in Spalte B und C und D etwas steht. Das Ganze von Zeile 20 bis 269.
Mal als Beispiel, in Zelle...
14.03.2009 14:22:53
Thread-ID: 1060148
4 Beiträge
VBA Code if or then nicht richtig
andreas

Hallo zusammen,
habe hier in einer Anwendung einen kleine Code bei dem wird der Systembenutzer abgefragt, das funktioniert. Jetzt soll folgendes passieren, wenn der Benutzer "Andreas" oder "martin2" ist, soll Spalte "f:G" eingeblendet sein, bei allen anderen Systembenutzern soll Spalte "F:G...
13.05.2009 11:25:25
Thread-ID: 1074763
9 Beiträge
Wenn Und Funktion mit mehreren Bedingungen
Katja

Hallo Leute,
brauche bei einer Funktion Eure Hilfe.
Spalte F steht die Dienstart, z.B. VD, B, RB usw.
Spalte W steht die Stundenanzahl ohne Pausenabzug
Ich möchte jetzt folgendes berechnen:
WENN(UND(F2="VD";W2 kleiner als 6);W2;WENN(UND(F2="VD";W2 kleiner als 9);W2-0,5;W...
13.07.2009 13:55:40
Thread-ID: 1088213
2 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

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