Live-Forum - Die aktuellen Beiträge
Datum
Titel
20.04.2024 00:49:19
Excel Sheet in einen Excel Kalender einfügen
20.04.2024 00:08:11
In Ordner nur das Speichern von Dateien erlauben
19.04.2024 21:26:15
mehrfache Texte finden
19.04.2024 19:41:34
Bei VBA Ausführung Anzeige einfrieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
796to800
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
796to800
796to800
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Makro das abhängig von der Uhrzeit kopiert

Makro das abhängig von der Uhrzeit kopiert
30.08.2006 13:05:20
der
Hallo zusammen,
Bei diesem Problem möchte ich abhängig von der Uhrzeit, bzw der aktuellen Stunde in einem Datensatz die zugehörigen Daten kopieren.
Die Daten sind im Zweistundenraster sortiert. Also folgendermaßen:
1h
234 453 1254 23
3h
435 5645 45 325
5h
134 535 353
usw.
Wenn jetzt also 1:45 Uhr ist, möchte ich die Zeile unterhalb von "3h" kopieren und verwenden. Wenn es 3:01 ist, die Zeile unter "5h", usw. Ich habe keine Ahnung wie ich die Abfrage der Uhrzeit hinbekomme und dann eine If-Schleife oder Ähnliches erstelle, die das hinbekommt. Ich würde mich wirklich sehr freuen, wenn Ihr mir helfen könntet.
Vielen Dank im Voraus..Daniel

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Makro das abhängig von der Uhrzeit kopiert
30.08.2006 13:49:16
der
Hallo,
ich würde es so machen.

Sub versuch()
Range("A1").Copy
If Time > "13:00:00" Or Time < "15:00:00" Then
Range("b1").PasteSpecial
ElseIf Time > "15:00:00" Or Time < "17:00:00" Then
Range("b2").PasteSpecial
ElseIf Time > "17:00:00" Or Time < "19:00:00" Then
Range("b3").PasteSpecial
End If
Application.CutCopyMode = False
End Sub

Gruss
Tino
AW: Makro das abhängig von der Uhrzeit kopiert
30.08.2006 15:39:06
der
Hallo Tino,
danke für die Hilfe. Habe das umgesetzt und es funktioniert. Jetzt habe ich ein anderes Problem. Wäre super wenn Du das auch noch beantworten könntest. Ich habe in einem Excelblatt eine Sverweis-Abfrage gemacht und als Ergebnis stehen in zwei Zellen nebeneinander die Zellen-Bezeichnungn (z.B. "A23" in der einen und "C45" in der anderen), die auf den Bereich des aktuellen Datensatzes hinweisen.
Nun möchte ich in meinem Makro diesen Zellbereich ansprechen. Das soll aber relativ geschehen, weil sich die Position der Daten kontinuierlich verändert. Nur die Position der Sverweisabfrage bleibt gleich. Ich habe nun also geschrieben:
Sheets("Tabelle1").Select
Range("D4").Select
Set zelle1 = Selection
Range("E4").Select
Set zelle2 = Selection
um zwei Variablen zu definieren, die den Inhalt der beiden Ergebniszellen übernehmen. Wenn ich eine Messagebox aufrufe msgbox(zelle1) wird der korrekte inhalt , z.B. "A23" angezeigt, also übernommen wird der Inhalt.
Wenn ich jetzt aber diese Variablen mit Range("zelle1:zelle2").select ansprechen und kopieren will, bekomme ich die "Fehlermeldng 424, Objekt erforderlich". Daraus werde ich nicht schlau. Oder is es nicht möglich einen Bereich mit Variablen anzusprechen? Achso: die Variablen habe ich mit Dim zelle1, zelle2 as Range definiert.
kannst Du nochmal helfen?
Anzeige

67 Forumthreads zu ähnlichen Themen

Herausforderung: Spezialanalyse von Daten (Matrix)
Daten

Hi all,
ich möchte die Anzahl (die Kombination) von Daten in einer Matrix darstellen und irgendwie fehlt mir die zündende Idee dazu (meine Versuche mit Pivottabellen schlugen fehl).
Quelldaten (eine Liste welcher Kunde hat welche Produkte gekauft):
Kunde Produkt
K1 A
K...
17.11.2008 15:13:22
Thread-ID: 1025247
2 Beiträge
Anzeige
Bereich prüfen ob Wert enthalten oder leer
chris

Hallo Excelprofis und guten morgen,
ich hätte eine frage.Vielleicht könnt ihr mir helfen.
ich möchte gerne einen bereich prüfen ob ein wert vorhanden ist.
Also z.b Bereich A1 bis G1
ich möchte jetzt einfach prüfen ob in einer dieser 7 Zellen prüfen ob ein wert vorhanden/eingetra...
04.03.2010 07:47:03
Thread-ID: 1143197
3 Beiträge
prüfen ob versch. Ziffern in Zellen vorhanden sind
Heinz

Hallo Excellenten,
viele Grüße an Alle an an diesem (im Süden) sonnigen Tag.
Mein Problem: Ich habe eine Spalte mit folgenden Zellen:
A1: 1;0000000 9; 10;000 14;00000000 23;0 25;0 27; 28; 29;0
A2: 00000000 9;00000000000000 24; 25;00000
A3: 00 3;0000000000000000 27;000
A...
08.04.2010 21:26:15
Thread-ID: 1150683
4 Beiträge
Anzeige
Uhrzeit in Textbox eingeben und wieder ausgeben
Robert

Hallo an alle Helfer!
ich hätte folgende Frage:
ich möchte über eine Textbox eine Uhrzeit eingeben und auch wieder ausgeben.
Nach dem eingeben wird allerdings mit der Uhrzeit gerechnet.
Die Ausgabe aus der Zelle funktioniert soweit ganz gut:
Private Sub FreigabeUhrzeit_Chang...
09.11.2010 16:32:57
Thread-ID: 1185900
12 Beiträge
Formel für Uhrzeit
chris

Hallo Excel Profis,
ich habe haoofe ich für euch eine leichte frage.
Ich will die differenz zwischen zwei zeiten berechnen.
einmal 22:00 und einmal 03:30
Als ergebniss soll 5,30 Stunden heraus kommen.Wie mache ich das ?
Vielen Dank für eure Hilfe
gruß Chris
11.03.2011 07:53:24
Thread-ID: 1205231
8 Beiträge
mit VBA Prüfen ob ein Wert in Spalte A existiert
marspoki

Hallo,
gibt es in VBA die Möglichkeit in VBA zu prüfen, ob in Spalte A10:A100 der Wert "x" exsistiert?
Vielleicht gib es auch eine Möglichkeit, rauszubekommen wie oft der Wert vorhanden ist?
Vielen Dank im Vorraus
Mars
18.03.2011 10:54:48
Thread-ID: 1206302
4 Beiträge
Prüfen, ob ein Wert in einer Liste ist?
Stefan

Hallo,
meine letzte Frage für heute.
Wie kann ich per VBA prüfen, ob ein Wert in der in der Zelle (Worksheets("Daten").Cells(2, 2)) in einer Spalte auf einem anderen Tabellenblatt bereits vorhanden ist?
Danke für die Hinweise.
18.10.2011 20:53:55
Thread-ID: 1234422
3 Beiträge
Rahmen in Zelle abhängig von der Uhrzeit
Heinz

Hallo Spezialisten,
ich habe folgende Problemstellung:
Ich habe eine Zelle in der mit der Funktion =jetzt() das Datum und die Zeit hinterlegt wird.
Desweiteren habe ich drei Zellen welche als Inhalt je 2 Buchstaben haben. Nun soll in einer
der drei Zellen eine Kreuzmarkierung einge...
07.06.2002 02:46:52
Thread-ID: 126711
7 Beiträge
Anzeige

Links zu Excel-Dialogen

MessageBox

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
1
4
2
3
3
11
7
3
2
6
6
3
6
3
2
1
10
8
1
6
2
12
2
2
3