Fange værdi fra underformular

Du skal referere til underformularen først:

Me.Underformular!feltnavn

Proev med:

= [Forms]![underpoodre]![Tekst0]

Overchord.. virker ikke.. det samme som jeg havde forsøgt..

mugs.. jeg ved at man nok skal bruge "me".. men hvordan skal koden konkret se ud?

MsgBox ([underpoordre].Form![Tekst0])

=([underpoordre].Form![Tekst0])

(Msgbox var bare til test...) ;O)))

virker ikke.. madschristensen... har rodet med noget lignende før.. og der mener jeg man skal brug Me..

Det er Office 97.

Me.underproordre!Tekst0

Afhængig af hvordan du skal bruge værdien, skal du jo indsætte den enten i en variabel:

Dim a As String
a = Me.underproordre!Tekst0

eller et felt:

Me.felt1 = Me.underproordre!Tekst0

Og så ændre String til en numerisk variabel med den rette størrelse.

Jeg vil indsætte den i en tekstboks.
Den første linie du skriver virker ikke... resten forstår jeg ikke så meget af.

Vender tilbage i morgen tidlig.

NOTE: In Microsoft Access 7.0 and 97, the "Form" or "Report" identifier is optional when referring to control properties. It is necessary, however, when referring to subform or subreport properties.

To refer to a control on a subform, use the following syntax:
  Forms![main form name]![subform control name].Form![control name]

Altså:
=Forms![navnet på hovedformular]![underpoordre].Form![tekst0]

Me er ikke strengt nødvendigt, det refererer til den aktuelle formular i stedet for at skrive [Forms]![formular1]![felt1)

Altså: =[Forms]![ordre]![underpoordre].[Form]![tekst0]



Virker ikke madschristensen.. i øvrigt ligger underformularen i formularfoden.

Har du prøvet min kode? Den er afprøvet og fungerer, og så går jeg ud og slår græs!

Har afprøvet min kode med underformularen liggende i formularfoden. Ingen forskel - Virker perfekt.

Skulle du ikke slå græs??? ;O)))

Nu går jeg hjem ihvertfald. Min kode er også teste og virker - dog på OfficeXP.

Kan i ha' fortsat god dag allesammen.

Hmm.. prøvede lige denne igen: =Forms![navnet på hovedformular]![underpoordre].Form![tekst0]

og den virkede.. værdien kommer dog først frem når jeg aktiverer feltet...

Hvor har du indsat koden?

i en tekstboks ved kontrolelementkilde

Hvis tekstboksen aktid skal indeholde værdien fra underformularen, kan du i hovedformularens VedAktuel hændelse indsætte flg.:

Me.felt1 = Me.underproordre!Tekst0

Hvor felt1 er feltet i hovedformularen, der skal modtage værdien.

Ved: Me.tekst65 = Me.underpoordre!Tekst0

Skriver den at den ikke kan finde makroen "Me"

Jeg bruger denne kode til at få værdien: =[Forms]![ordre]![underpoordre].[Form]![tekst0]

Private Sub Form_Current()
Me.tekst65 = Me.underpoordre!Tekst0
End Sub

fungerer perfekt her.

Du skal ikke have nogen postkilde i tekst65 og heller ikke noget stående i feltets hændelsesprocedürer.

virker.... hvad gør jeg så hvis den skal tage mere end det ene felt?

Hvordan udvider jeg koden til det?

Den skal medtage

Me.tekst69 = Me.poordre!Forbrug
Me.tekst71 = Me.poordre!Tekst61

Rart det endelig fungerer. Du udvider blot koden således:

Private Sub Form_Current()
Me.tekst65 = Me.underpoordre!Tekst0
Me.tekst69 = Me.poordre!Forbrug
Me.tekst71 = Me.poordre!Tekst61
End Sub

så virker det... et sidste spørgsmål.... hvor skal jeg yderligere indsætte denne kode.. hvis den skal opdatere felterne hvis der bliver ændret i værdierne i underformularerne?

I hvert felt i underformularen i BeforeUpdate. Men nu skal du "vende" koden, idet du jo nu arbejder i underformularen:

Private Sub Tekst0_BeforeUpdate(Cancel As Integer)
Me.Parent!tekst65 = Me.Tekst0
End Sub

Når du ændrer værdien i underformularens tekst0 og flytter markøren, vil hovedformularen blive opdateret. Ret feltnavnene og indsæt koden i de andre felter i underformularen.

tak... mangler lige et svar fra madschristensen... da jeg også synes han fortjener lidt point.

Det gør han da ;o)

ehm... har måske lige et spørgsmål mere.. evt. kan jeg oprette et nyt spørgsmål til det... mene hvordan skal denne kode se ud, hvis jeg ligge den ind i en underformular og skal hente værdien fra en anden underformuar.

Private Sub Form_Current()
Me.Tekst65 = Me.underpoordre!Tekst0
Me.Tekst69 = Me.poordre!Forbrug
Me.Tekst71 = Me.poordre!Tekst61
End Sub

Så tror jeg du skal referere til objektsamlingen først.

Me.feltnavn = [Forms]![FORMULARNAVN]![FELTNAVN]

Men jeg har ikke afprøvet dette.

Mht.

Private Sub Tekst0_BeforeUpdate(Cancel As Integer)
Me.Parent!tekst65 = Me.Tekst0
End Sub

Så virker det ikke helt...

ved ændring af værdi i feltet.. skal den opdatere felt65 i hovedformularen til den værdi der er i den pågældende underformularen felt "tekst0"

Feltet der bliver ændret i og "tekst0" er i samme underformular.

Det skal fungere. Men du skriver:

Feltet der bliver ændret i og "tekst0" er i samme underformular

Modtager tekst65 værdien fra tekst0? I så fald fungerer det jo. Men hvis du ændrer i et andet felt i underformularen, skal tekst0 jo sættes = dette felt.

Alle point til Mugs - jeg slog jo bare op i dokumentationen ;O))

--- han skulle jo også slå græs - alene det er point værd ;O)))

ja.. har fået det til at virke.

tak for god indsats.... jeg støder nok på flere problemer senere på dagen...