Tabelle prüfen

Forumthread: Tabelle prüfen
3 Beiträge zu diesem Forumthread
Anzeige
VBA Beispiele zu verwandten Themen

Forumthread: Tabelle prüfen

Tabelle prüfen

22.12.2005 08: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

AW: Tabelle prüfen

22.12.2005 08:49:45

IngGi
AW: Tabelle prüfen

22.12.2005 09:24:43

Peter
AW: Problem selbst gelöst OT

22.12.2005 10:32:03

Peter

AW: Tabelle prüfen

22.12.2005 08: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 09: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 10:32:03

Peter