DRINGENDES VB-Problem!!!

[SNo0py]

Folgender Code wurde von mir verbrochen:

===
Dim x As a2e_ini.Value
For Each x In GlobalOptions.Sections(1).Values
Debug.Print x.Data
Next x
===
a2e_ini.Value ist eine eigene Klasse
Globaloptions.Sections(1).Values ist eine eigene Collection der Klasse Value

ABER:
Dieser Code hat schon einwandfrei funktioniert und jetzt bekomme ich immer "438 - Objekt unterstützt diese Eigenschaft oder Methode nicht" in der 2. Zeile (For each...) --> WARUM?? Des hat doch schon mal gefunkt.... :-(