09. juli 2007 - 18:12Der er
15 kommentarer og 2 løsninger
Underformularnavn lagt ind i Hændelsesprocedure ´Ved Aktuel
Jeg har en formular med flere underformularer der kaldes kaskadevis. Det virker fint med Private Sub Form_Current (Se nedenfor) nedenfor. Jeg ønsker imidlertid at navnet Produkt_Dataark_Ordre UFrm der ligger fast inde i Private Sub Form_Current skal defineres udenfor Private Sub Form_Current. Hvordan gør jeg det?????
Private Sub Form_Current()
Dim ParentDocName As String
On Error Resume Next ParentDocName = Me.Parent.Name
If Err <> 0 Then GoTo Form_Current_Exit Else On Error GoTo Form_Current_Err Me.Parent![Produkt_Dataark_Ordre UFrm].Requery End If
".... flere underformularer der kaldes kaskadevis" can you explain what you mean here?
per2edb, when I see you rother question you have open http://www.eksperten.dk/spm/785040 I'm very unsure as to what you are trying to do.
if a main form and sub form are linked through the Linked Child fields and link Masetr field properties it shouldnt be necessary to requery the sub forms.
Here is a link on how to refer to form/sub forms etc.
Har du prøvet: Me.Parent!Controls("Produkt_Dataark_Ordre UFrm").Requery eller evt. Me.Parent!Controls("Produkt_Dataark_Ordre UFrm").Form.Requery (bare et vildt gæt)
Hvis det virker, kan du jo styre det med en parameter: Udenfor Form_Current: FormNavn = "Produkt_Dataark_Ordre UFrm" Inden i Form_Current: Me.Parent!Controls(FormNavn).Requery
You can NOT refer directly to a sub form unless you know which form it is a sub form for, or if you are on a main form and the subform is on this main form. NOTE: A sub form is contained in a subform CONTROL an they can have different names but very often they are the sub.
If the sub form is on the main form. Me![Produkt_Dataark_Ordre UFrm].form.requery
Where [Produkt_Dataark_Ordre UFrm] is the name of the subform CONTROL NOT the name of the sub form.
Any form can be used as a sub form and it can be used as a sub form on any other form So if form2 is a sub form for form1 then you would use
I'm back. 1. Du erklærer en global variabel i et eller andet modul (ikke i en forms modul!) således: Global FormNavn as String 2. Inden du åbner din hovedform sætter du FormNavn = "Produkt_Dataark_Ordre UFrm" (jeg går ud fra, at du selv har styr på at det rent faktisk er dén underform, der aktiv) 3. Herefter burde du i Form_Current() kunne bruge Me.Parent!Controls(FormNavn).Requery
"Terry jeg er bange for du misforstår." That might be the case, but if you could explain what you want to do then it might be possible to do things more simply
Jeg har i Standard moduler oprettet følgende (Er det korekt?) -------------------------------------------- Option Compare Database
Global ProjektFormNavn As String Global ProduktFormNavn As String
Public Sub FormNavn() ProjektFormNavn = "Projekt_Dataark_Ordre UFrm" ProduktFormNavn = "Produkt_Dataark_Ordre UFrm" End Sub
------------------------------- Jeg vil tro jeg i Formens hændelsesprocedure (Ved Åben) skal kalde: Public Sub FormNavn() Hvordan kalder jeg den ?????????????????????
Jeg er ved at være lige så forvirret som Terry. Jeg må erkende, at jeg ikke helt fatter, hvad det er, du vil :o(
Jeg troede, at du havde flere forskellige subforms, som du viste i en hovedform. I så tilfælde skulle du bare skrive som angivet i pkt. 1 og implementere pkt 2 i forbindelse med åbningen af din hovedform, altså noget i stil med: FormNavn = "Produkt_Dataark_Ordre UFrm" DoCmd.OpenForm "Hovedform"
Nu introducerer du en Sub og flere globale. I'm lost. For min og Terrys skyld: Forklar hvad det, du forsøger at gøre. PS: "underformularer der kaldes kaskadevis" giver ikke mening. Forklar det på en anden måde ;o)
Det jeg søgte var at få Produkt_Dataark_Ordre UFrm lagt ind i Me.Parent![Produkt_Dataark_Ordre UFrm].Requery som en streng defineret globalt. Det kan ikke lade sig gøre så jeg har løst problemet ved at anvende Me.Parent![Produkt_Dataark_Ordre UFrm].Requery 6 gange udvalgt med en IF styret med en global variabel.
I satte mig på sporet så 1000 tak for hjælpen. Jeg deler point til jer begge
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.
