Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
504to508
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
504to508
504to508
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Find Funktion und Laufzeitfehler 91

Find Funktion und Laufzeitfehler 91
21.10.2004 12:44:51
Stefanie
Hallo an alle,
ich habe seit letzter Woche Office XP.
Das folgende Makro lief unter Excel 97 einwandfrei. Beim Abspielen unter Office XP
erscheint Fehlermeldung 91 und ich habe keine Ahnung warum.
Anbei das Makro

Private Sub CommandButton1_Click()
Dim frm2 As UserForm2
Set frm2 = UserForm2
With frm2
Sheets("2").Select
Range("a1:z1").Select
On Error GoTo Fehler
Selection.Find(What:=CDate(TextBox1.Value), After:=ActiveCell, _
LookIn:=xlDate, LookAt:=xlPart, SearchOrder:=xlByColumns, _
SearchDirection:=xlNext, MatchCase:=False).EntireColumn.Select
UserForm2.Hide
Exit Sub
Fehler:
MsgBox "Datum konnte nicht gefunden werden"
End With
End Sub

Leider habe ich noch ein anderes Verständnisproblem. Ich habe mit dem Makrorekorder folgendes Makro aufgezeichnet und verändert und es erscheint der gleiche Fehler
Sub Makro2()
'
'
' On Error GoTo ERRORHANDLER
With Worksheets(1)
Range("A1").Select
Cells.Find(What:=CDbl("14905,46"), After:=ActiveCell, LookIn:=xlValues, _
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False, SearchFormat:=False).Activate
Columns("H:H").Select
End With
Exit Sub
ERRORHANDLER:
MsgBox "Suchbegriff nicht gefunden!"
End Sub
Vielleicht weiß ja einer Rat.

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

Betreff
Datum
Anwender
Anzeige
AW: Find Funktion und Laufzeitfehler 91
EtoPHG
Hallo Stefanie,
Dies ist nur eine vage Vermutung. Es könnte sein das für den Code ein Verweis auf eine Excelkomponente fehlt. Versuch mal VOR die Sub xxx Anweisung die Option Explicit Anweisung zu setzen und dann zu kompilieren. Damit kannst Du feststellen ob alle Variablen deklariert sind. Verweise findest Du im VBE Editor unter Extras|Verweise.
Gruss Hansueli
AW: Find Funktion und Laufzeitfehler 91
21.10.2004 13:39:57
Stefanie
Hallo Hansueli
vielen Dank für deinen Tip. Das einfügen option explicit hat ausgereicht, damit das Makro lief.
und nach Änderung LookIn:=xlDate in LookIn:=xlValues findet das Makro jetzt auch ein Datum
Nochmal danke und einen schönen Tag
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige