14. 12. 09 13:41:04, Aufrufe: 24 [Fest] Re: Laufzeitfehler 9 _ Index außerhalb des gültigen Bereichs von Hallo Henrik, nach meinem Wissen: glbData ist der Ausdruck, der Daten aus den Eingabefeldern holt oder dort zuweist rho = (26) holt den Wert von rho dem aus dem Eingabefeld 26 Ich habe mit F8 getestet, tatsächlich wird die linke Seite beanstandet (Index... ), das Eingabefeld hat aber definitiv den Index 34 Index001 angeklickt ergibt 34. Das Objekt (Eingabefeld 34) existiert!! Was bedeutet hier Array? Die strittige Befehlszeile holt Werte aus der Eingabe und wandelt in normale Zahle um. Sind die Eingabefelder als Array aufzufassen? Die gleiche Abfrage nur mit veränderter Mittelzeile: (index001) = CDbl(ttxtlache(index001)) funktioniert einwandfrei (Indizes sind in beiden Fällen gleich, weil gleiches Formular). VBA => VBA-Laufzeitfehler. Also was nun? Ich bin weiterhin ohne Lösung.. Wolfgang
Laufzeitfehler 9 Index Außerhalb Des Gültigen Bereichs Vba Pdf
Einführung
Code, der kompiliert wird, kann zur Laufzeit noch fehlerhaft sein. In diesem Thema werden die häufigsten Ursachen, ihre Ursachen und Möglichkeiten zur Vermeidung aufgeführt. Laufzeitfehler '3': Rückgabe ohne GoSub
Falscher Code Sub DoSomething()
GoSub DoThis
DoThis:
"Hi! " Return
End Sub
Warum funktioniert das nicht? Die Ausführung tritt in die DoSomething Prozedur ein, springt zum DoThis Label und gibt "Hi! " Aus. Laufzeitfehler 9 index außerhalb des gültigen bereichs vba pdf. kehrt der Befehl unmittelbar nach dem Aufruf von GoSub zur Anweisung zurück und druckt "Hi! " wieder, und trifft dann auf eine Return - Anweisung, aber es gibt nirgendwo jetzt zurück, weil wir hier nicht mit bekommen haben GoSub - Anweisung. Code korrigieren Sub DoSomething()
Exit Sub
Warum funktioniert das? Durch die Einführung eines Exit Sub Anweisung vor der DoThis Label Linie haben wir die getrennt DoThis Unterprogramm von dem Rest des Verfahrens Körper - der einzige Weg, die auszuführen DoThis Unterprogramm ist über den GoSub Sprung. Weitere Hinweise GoSub / Return ist veraltet und sollte zu Gunsten von Prozeduraufrufen vermieden werden.
Activate
Range("A1")
Quelle = (i - 1, 0)
Ziel = (i - 1, 1)
Workbooks(Daten). Activate
Range(Quelle)
Workbooks(Vorlage). Activate
Range(Ziel)
Next i
' EQ-Vorlage ohne Macro kopieren
Range("A1") = Daten
Kopie = Left(Daten, 8) & "_cal"
_
Filename:="D:\Marine Geologie\Thermo Finnigan MAT DeltaS\Auswertung\2018\" & Kopie
Sheets(i)
After = Workbooks(Kopie)(i)
' Fenster von Kopie
Workbooks(Kopie). Activate
' Dateien schlie§en
Workbooks(Kopiertab)
Workbooks(Daten)
Workbooks(Vorlage)
End Sub
Die Fehlermeldung erscheint bei der fett markiert und kursiv geschriebenen Zeile. Ich könnte wetten, das der Fehler nur minimal ist, aber ohne VBA Kenntnisse erkenne ich den Fehler nicht. Kann mir jemand helfen? Für jeden Tip bin ich sehr dankbar! Laufzeitfehler 9 index außerhalb des gültigen bereichs vba 4. Liebe Grüße
Doro
Betrifft: AW: Laufzeitfehler '9'
von: mmat
Geschrieben am: 14. 2018 14:14:21
wenn ich micht nicht ganz irre muß0 das heissen
Sheets(i) After:=Workbooks(Kopie)(i)
Kein Zeilenumbruch
Zuweisung auf den Parameternamen mit:=
Geschrieben am: 15. 2018 08:38:30
der Tip hat super geholfen, danke!