Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Fehlerbehandlung bei scrollen zu Datum

Forumthread: Fehlerbehandlung bei scrollen zu Datum

Fehlerbehandlung bei scrollen zu Datum
19.10.2012 18:11:15
karl
Hallo miteinander
mit
ActiveWindow.ScrollRow = [A:A].Find(suchdat - 5).Row

scrolle ich zu der Zeile mit dem datum suchdat.
wenn das Datum suchdat in der Spalte nicht vorhanden ist,
wie überwache ich am besten diesen Fehler
...msgbox datum nicht vorhanden und abbruch
gruss
karl

Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Fehlerbehandlung bei scrollen zu Datum
19.10.2012 18:21:18
hary
Hallo
Teste mal.
Sub spring()
Dim a As Variant
a = Application.Match(CLng(Date) - 5, Columns(1), 0)
If IsNumeric(a) Then
ActiveWindow.ScrollRow = a
Else
MsgBox "Datum nicht vorhanden"
Exit Sub
End If
End Sub

gruss hary

AW: Fehlerbehandlung bei scrollen zu Datum
19.10.2012 18:26:17
karl
Hallo hary
dankeschön , läuft genau so wie ich es benötige
gruss
karl

Anzeige
AW: Korrektur
19.10.2012 18:23:13
hary
Hallo nochmal
Fuer Date musst du natuerlich suchdat einsetzen.
gruss hary

AW: Korrektur
19.10.2012 18:27:50
karl
hary, danke für den Nachtrag,
da ich hier schon einiges gelernt....habe, hatte ich das auch so geändert.
dennoch besten dank
karl
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige