title image


Smiley Wie Unterformular ansprechen?
Hallo zusammen,



wie kann ich ein Unterformular ansprechen wenn ich alle Controls der Hauptform durchlaufe.

Der Name des Controls für das UFO und der Name des UFO's selbst sind identisch.



Code (Access2003):



Set frm = Forms(Me.Name)

For Each ctl In frm.Controls

If ctl.ControlType = acSubform Then

Me!Forms(ctl.Name).Form.AllowEdits = bolAllowEdits <=== Fehler

End If

Next



Der Fehler lautet: .. kann das in Ihrem Ausdruck angesprochene Feld 'Forms' nicht finden. (Nr. 2465)



Wenn ich den UFO-Name fix angebe, funktionierts:



Me!frmSubUFO1.Form.AllowEdits = bolAllowEdits





Ich brauch aber die Schleife. Wie ist da die Syntax?



Gruß

EW

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: