Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 00:20:14
Bestimmte Spalten als xls exportieren per Makro
23.04.2024 22:08:10
Auflisten in Spalte VBA
23.04.2024 21:33:46
Nur farbige/nicht farbige Zellen markieren
23.04.2024 21:29:56
Bestimmte Zellen auf andere Arbeitsblätter kopieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1724to1728
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1724to1728
1724to1728
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Wenn dann Funktionen mit Uhrzeiten

Wenn dann Funktionen mit Uhrzeiten
26.11.2019 08:17:29
Bastian

Moin zusammen,
ich will eine wenn dann funktion in einem Makro realisieren. Excel soll zwischen bestimmten Uhrzeiten in einer gewissen Spalte +1 rechnen. Mit der Startzeit hab ich es hinbekommen, krieg es aber leider nicht hin die Endzeit einzufügen. Bis jetzt schreibt Excel in jeder Spalte +1. Der erste Zeitraum soll von 06:30 bis 08:30 gehen und soweiter. Kann mir jemand helfen?
Das hab ich bis jetzt:

Sub DatumHeute()
ThisWorkbook.Sheets("Tabelle1").Range("D3").Value = Time
If Range("D3").Value = Time > "06:30:00" Then
Sheets("Tabelle1").Cells(3, 5).Value = Sheets("Tabelle1").Cells(3, 5).Value + 1
End If
If Range("D3").Value = Time > "9:15:00" And Time  "11:00:00" And Time  "15:00:00" And Time

Vielen Dank :)

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

Betreff
Datum
Anwender
Anzeige
AW: Wenn dann Funktionen mit Uhrzeiten
26.11.2019 08:48:46
Hajo_Zi
Du Vergleichts eine Zeiot mit Text das geht nicht.
bis wird bei mir nicht eiongtetragen, was wohl daran liegt das der Code nicht vprhanden ist. 
Option Explicit
Sub DatumHeute()
With ThisWorkbook.Sheets("Tabelle4")
.Range("D3").Value = Time
If Range("D3").Value = Time > CDate("06:30:00") Then
.Cells(3, 5).Value = .Cells(3, 5).Value + 1
End If
If Range("D3").Value = Time > CDate("9:15:00") And Time  CDate("11:00:00") And Time  CDate("15:00:00") And Time

AW: Wenn dann Funktionen mit Uhrzeiten
26.11.2019 08:57:58
Bastian
So schreibt er leider bei mir aber keine eins in die Spalte.
In die Spalte D3 schreibt er die aktuelle Uhrzeit, das passt.
Nun will ich aber das in E3 bei jeden klick auf die Schaltfläche +1 gerechnet wird wenn die Uhrzeit zwischen 06:30 und 09:10 liegt. In Spalte F3 soll +1 gerechnet werden wenn die Zeit zwischen 09:15 und 11:00 liegt.
Muss es eventuell anders geschrieben werden?
Anzeige
AW: Wenn dann Funktionen mit Uhrzeiten
26.11.2019 09:11:30
Hajo_Zi
jetzt getest. 
Option Explicit
Sub DatumHeute()
With ThisWorkbook.Sheets("Tabelle4")
.Range("D3") = Time
If .Range("D3") > CDate("06:30:00") Then
.Cells(3, 5).Value = .Cells(3, 5).Value + 1
End If
If .Range("D3") > CDate("9:15:00") And .Range("D3")  CDate("11:00:00") And .Range("D3")  CDate("15:00:00") And .Range("D3")

Gruß Hajo
AW: Wenn dann Funktionen mit Uhrzeiten
26.11.2019 09:37:25
hary
Moin
Ich verstehe das nicht ganz.
Probier mal: 
Sub DatumHeute()
With ThisWorkbook.Sheets("Tabelle1")
.Range("D3").Value = Time
If Range("D3").Value > CDate("06:30:00") And Range("D3").Value  CDate("9:15:00") And Time  CDate("11:00:00") And Time  CDate("15:00:00") And Time

evtl. mal eine Bsp.-Mappe hochladen wie es ausehen soll. Ein/ Zwei Beispiele waeren nicht schlecht.
gruss hary
Anzeige
AW: Wenn dann Funktionen mit Uhrzeiten
26.11.2019 10:01:46
Bastian
Mitleerweile klappt es :). Vielen Dank für eure Antworten

326 Forumthreads zu ähnlichen Themen

"Wenn Zeit > 17.30 Uhr dann"
Susanne99

Hallo,
wie formuliere und formatiere ich den o.g. Ausdruck als Formel?
Gruß
Susanne
14.09.2008 23:24:58
Thread-ID: 1009640
6 Beiträge
Anzeige
Wenn Formel mit Spalte
Maris

Hi zusammen,
ist das möglich, dass ich eine Wenn-Formel auf eine Spalte und eine Zelle in der Zeile beziehe? Bsp.:
Tabelle A B C Ergebnis ERM VOLL OHNE 1 x ERM 2 x...
05.11.2008 16:30:00
Thread-ID: 1021984
6 Beiträge
Wenn Funktion mit *
Stan

Hallo,
Ich habe eine WENN Funktion eingebaut die prüft Inhalt G2 und dann multipliziert andere Zellen.
Beispiel ==WENN(G2="A12";M2*4;WENN(G2="B12";M2*2;"Fehler")). Es kommen verschiedene Werte nach A und B vor (A12, A22, A27 usw.)
Kann ich nur erste Stelle Abfragen und die nächsten...
21.11.2008 13:27:00
Thread-ID: 1026711
3 Beiträge
Anzeige
Wenn-Formel mit 12 Bedingugen
Lars

Hallo.
Ich habe eine Frage zur Wenn-Formel. Ich möchte in Zelle A3 einen Wert ausgelesen bekommen.
Wenn A1 = D1 dann Wert aus D3
Wenn A1 = F1 dann Wert aus F3
usw.
Insgesamt sind es 12 bedingungen. Die Spalten liegen nicht nebeneinander.
10.12.2008 12:51:00
Thread-ID: 1031660
4 Beiträge
WENN Funktion mit mehr als 8 Bezügen
AcJoker

Hallo,
ich versuche eine Exceltabelle zu erstellen bei der in Spalte A etwas steht das 20 Verschieden Werte annehmen kann.
In Spalte B hätte ich gerne im Bezug auf Spalte A einen Wert stehen.
Im Hintergrund z.B. auf AA und AB gibt es eine "Übersetzung" der 20 möglichen Werte von Spa...
03.01.2009 16:13:58
Thread-ID: 1036563
6 Beiträge
Wenn Funktion mit mehreren Argumenten
Britta

Hallo Zusammen,
im moment steh ich total aufm Schlauch, ich habe mit Funktionen lange nicht gearbeitet und bekomme es grade nicht so recht hin.
Also hier das Ding: ich habe eine Tabelle in der in B2 eine Eingabe erfolgt, diese kann nur 16 oder 18 sein, sollte es anders sein, soll ein F...
07.03.2009 09:41:28
Thread-ID: 1057522
11 Beiträge
wenn dann funktion
jannis

Hallo zusammen
wäre super wenn mir einer weiterhelfen könnte!
3 lösungen bräuchte ich für folgende berechnungen
1.Beispiel
wenn das Ergebniss gößer als das Ziel dann 1 ; wenn das Ergebniss kleiner dann -1
wenn gleich bleibend dann 0
2. Beispiel (ich weis nicht ob man hi...
09.03.2009 15:02:36
Thread-ID: 1058181
22 Beiträge
Username und Uhrzeit mit Wenn-Dann?
Mario

Hallo zusammen,
ich habe schon so Einiges in Richtung Usernamen ermitteln usw. gelesen, bin aber nicht in der Lage, die Codes auf mein Problem hin anzupassen. Deshalb erhoffe ich mir nun hier Hilfe.
Wir haben im Team eine "offene-Punkte-Liste.xls", in die entsprechende Daten eingetragen...
30.06.2009 18:10:03
Thread-ID: 1085453
4 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
5
8
5
2
10
3
5
10
21
3
4
1
23
2
14
11
2
6
40
16
2
1
8
5
2