Zelle suchen

16/12/2008 - 08:48 von Beck, Alwin | Report spam
ACESS 2003

Hallo,
wie löse ich in VBA folg. :

In A1 steht immer das aktuelle Tagesdatum.
Nun soll dieses Datum eingelesen werden und in
Spalte A ab Zeile 3 beginnend nach diesem Datum
gesucht werden - dann soll sich der Cursor auf diese Zeile
stellen.

Hier mein Ansatz (welcher leider nicht funktioniert) :


Dim Datum
Dim Position As Range

Range("A1").Select
Datum = ActiveCell.Value

Set Position = Range("A1:A999").Find.Datum.Address
Range(Position).Select
 

Lesen sie die antworten

#1 Eberhard Funke
16/12/2008 - 09:46 | Warnen spam
Am Tue, 16 Dec 2008 08:48:43 +0100 schrieb Beck, Alwin:

ACESS 2003

In A1 steht immer das aktuelle Tagesdatum.
Nun soll dieses Datum eingelesen werden und in
Spalte A ab Zeile 3 beginnend nach diesem Datum
gesucht werden - dann soll sich der Cursor auf diese Zeile
stellen.



Hallo Alwin,

ob das bei Acess funktioniert, weiß ich nicht, aber bei Excel:

Sub DatumSuchen()
Range("A3:A999").Find(Date).Select
End Sub


Mit freundlichen Grüssen Eberhard
XP home XL 2000
Eberhard(punkt)W(punkt)Funke(at)t-online.de

Ähnliche fragen