Anzahl der Bereiche eines frm feststellen

18/11/2009 - 16:26 von Michael Alexander | Report spam
Hallo!

Für den Durchlauf durch alle Bereiche eines frm müßte ich wissen, wie viele
Bereiche ein bestimmtes frm überhaupt hat.
Meine haben verschiedene, von einem bis 5 Bereiche.

Wie kann man das festellen?

Me.Section.Count gibt es ja nicht.

Allerdings Me.Section(0) bis Me.Section(4) schon.

Danke
Michael
 

Lesen sie die antworten

#1 Jörg Ackermann
18/11/2009 - 20:29 | Warnen spam
Hallo Michael,

Michael Alexander meinte:


Für den Durchlauf durch alle Bereiche eines frm müßte ich wissen, wie
viele Bereiche ein bestimmtes frm überhaupt hat.
Meine haben verschiedene, von einem bis 5 Bereiche.

Wie kann man das festellen?

Me.Section.Count gibt es ja nicht.

Allerdings Me.Section(0) bis Me.Section(4) schon.



Fange halt einen Fehler eim Zugriff auf
die betr. Section ab.

z.B.:

Public Function HasSection(f As Form, s As Long) As Boolean

Dim sec As Section

On Error Resume Next
Set sec = f.Section(s)
HasSection = (Err = 0)
If Err Then Err.Clear
On Error GoTo 0

End Function

Dann irgendwo:

...
If HasSection(Me, acFooter) then
...

Gruß

Ähnliche fragen