Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
648to652
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
648to652
648to652
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Laufzeitfehler 9

Laufzeitfehler 9
10.08.2005 06:38:03
Josef
Guten Morgen!
Unter
https://www.herber.de/bbs/user/25472.xls ist eine Musterdatei.
In dieser Datei gibt es eine Userform in der 3 CommandButton sind.
Mit diesen kann man in einem Arbeitsblatt nach Wortteilen suchen.
Linker Button: Aufruf zur Eingabe des Suchbegriffes
Mittlerer Button: Wenn mehrere Begriffe gefunden wurden zum weiterblättern
rechter Button: Retour
Wenn ich jetzt zum Beispiel das Wort Ambulant eingebe (2 mal enthalten), so erhalte ich beim weiterblättern einen Laufzeitfehler 9 Index außerhalb des gültigen Bereiches.
Wo könnte hier bitte der Fehler liegen, oder wie könnte man diesen Fehler auffangen?
Danke
Josef

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

Betreff
Datum
Anwender
Anzeige
AW: Laufzeitfehler 9
10.08.2005 07:29:24
Hajo_Zi
Hallo Josef,
Du solltest Workbools("Mu...") durch ThisWorkbook ersetzen.
Ich will mich jetzt nicht in den Code vertiefen.
In der Zeile
Do While strSelected = strFound(intSelected)
Vergleichst Du einen String mit strFound(intSelected). intSelected ist zu diesem Zeitpunkt 2 StrFound() enthält aber nur einen Wert. Du kannst also nich mit dem zweiten vergleichen.
Bitte keine Mail, Probleme sollten im Forum gelöst werden.
Microsoft MVP für Excel
Das Forum lebt auch von den Rückmeldungen.
Betriebssystem Windows 2000 SP4 und Excel Version 2000 SP3.



Anzeige
AW: Laufzeitfehler 9
10.08.2005 07:45:11
Josef
Guten Morgen Hajo!
Danke für Deine Antwort.
zu
Du solltest Workbools("Mu...") durch ThisWorkbook ersetzen.
In meinem Original habe ich es so. Danke für den Hiweis.
zu
Do While strSelected = strFound(intSelected)
gäbe es also praktisch keine Lösung um diesen Fehler abzufangen, zumindest mit diesem Code nicht?
Josef
AW: Laufzeitfehler 9 Lösung gefunden
10.08.2005 09:03:35
Josef
Hallo Hajo!
Habe durchs probieren die Lösung glaube ich gefunden:
Do While strSelected = strFound(intSelected)
intSelected = intSelected + 1
Exit Do
intSelected = intSelected + 1
Loop
Josef
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige