Jag har ett formulär med två flikar. I dessa flikar ligger två underformulär. För att scrolla till början av ett underformulär behöver du gå till första posten. Det kan du göra med den här koden (har kallat underformläret för uForm): Så här får jag det att fungera. Min flikkontroll heter Flik0, på första fliken ligger ett underformulär som heter uAmnen och på andra fliken ligger ett underformulär som heter uProdukter.SetFocus
Dessa är så stora att man får scrolla dom. (har stängt av musscrollningen)
När man har scrollat ner sig i formuläret så vill jag att det ska visas från toppen när man kommer till fliken nästa gång. Har lagt in ett dummyfält som inte är låst. Lagt in setfocus till detta fält. Testat kod både på fliken och i formuläret. Testat vidklickning och vidactivate men får inte till det.
Nån som har någon ide?
/evaSv: SetFocus
DoCmd.GoToControl "uForm"
DoCmd.GoToRecord , , acFirst
Händelsen att lägga in koden i borde väl vara när fliken klickas.
Sv: SetFocus
Private Sub Flik0_Change()
Select Case Me.Flik0.Value
Case 0
DoCmd.GoToControl "uAmnen"
DoCmd.GoToRecord , , acFirst
Case 1
DoCmd.GoToControl "uProdukter"
DoCmd.GoToRecord , , acFirst
End Select
End Sub