NavigationsControl aktivieren
willi154
Gesendet: 17.05.21 14:49
Betreff: NavigationsControl aktivieren


Member

Beiträge: 17

Hallo,

ich habe ein Navigationsformular mit insg. 6 Reitern.
Alle Reiter beziehen sich auf das selbe Navigationsziel (Formular). Die Selektion der benötigten Daten erfolgt in der WhereKlausel.
Wähle ich die Reiter per Hand aus, funktioniert alles.

Aber...
Beim Öffnen des Navigationsformular soll anhand des ermittelten Benutzers der entsprechende Reiter geöffnet werden.
Mittels der BrowseTo - Funktion funktioniert das auch soweit, nur wird das entsprechende NavigationsControl nicht aktiviert - es bleibt immer das erste Reiter aktiv.
Versuche mit Enabled und SetFocus brachten keine Lösung. Ich vermute mal es liegt an den gleichen Navigationszielen. Sobald die Unterschiedlich sind, funktioniert das mit BrowseTo - was mir aber hier ja nichts hilft.

Gibt es hier eine Möglichkeit den richtigen Reiter zu aktivieren?

Hier das Coding:,

Private Sub Form_Current()
Debug.Print SuchStr
DoCmd.BrowseTo ObjectType:=acBrowseToForm, _
ObjectName:="Belegungsplan", _
PathToSubformControl:="for_nav_haupt.ctr_nav_haupt>for_nav_abt.ctr_nav_abt", _
WhereCondition:=SuchStr, _
Page:=""
End Sub

Danke
Willi

PS. MS Office Pro+2019 + Win10
Top of the page Bottom of the page