Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 19:29:30
24.04.2024 18:49:56
Anzeige
Archiv - Navigation
708to712
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
708to712
708to712
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Tabelle prüfen

Tabelle prüfen
22.12.2005 07:38:59
Peter
Guten Morgen,
vielleicht könnt Ihr mir bei meinem Problem helfen,
in Tabelle I:\NG\NG1.xls letzte Zeile in Spalte A prüfen, ob das Datum in dieser Zelle mindestens 2 Tage eher ist als HEUTE, wenn nicht, dann Makroabbruch.
Bsp.
Heute=22.12.05 letzter Eintrag in Tabelle = 19.12.05 Abbruch
= 20.12.05 Weiter
Heute=23.12.05 letzter Eintrag in Tabelle = 20.12.05 Abbruch
= 21.12.05 Weiter
Heute=01.01.06 letzter Eintrag in Tabelle = 19.12.05 Weiter
= 30.12.05 Weiter
= 31.12.05 Abbruch
Also die Differenz der letzten Zelle zu Heute muß mindestens 2 Tage betragen.
Danke
Peter

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Tabelle prüfen
22.12.2005 07:49:45
IngGi
Hallo Peter,
meinst du so?
If Range("A65536").End(xlUp) > Date - 2 Then Exit Sub
Gruß Ingolf
AW: Tabelle prüfen
22.12.2005 08:24:43
Peter
Morgen Ingolf,
habe deine Antwort eingefügt, aber läuft trotzdem durch.
Workbooks.Open Filename:="I:\INFO1\HPS_Nutzgrad\nutzgrad.xls"
If Range("A65536").End(xlUp) &gt Date - 2 Then
ActiveWorkbook.Close
MsgBox ("noch keine neuen Daten im HPS")
Exit Sub
Else
------ab hier soll Makro weiterlaufen, wenn ok----
Application.Run "GMT2005.xls!Modul1.Galvanik"
Peter
AW: Problem selbst gelöst OT
22.12.2005 09:32:03
Peter
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige