Hello daneron,

Je kan best de knop in de subformulier zetten en dat is het gemakkelijkste.
Als de knop in de hoofdformulier staat dan moet je mogelijk dit toevoegen om naar de subformulier te gaan.
Forms!naamvansubformulier.SetFocus

Maar dat hang veel af hoe je allemaal ingesteld hebt.

De knop zelf activeren doet je zo:
naamvanknop.Visible = False  (onzichtbaar)
naamvanknop.Visible = true  (zichtbaar)

Je dient wel in eigenschappen van de knop op zichtbaar of onzichtbaar in te stellen.
In uw geval is dan onzichtbaar.

Bijvoorbeeld:
Stel dat van subformulier zo uit ziet:
code aantal prijs totaal

Bij code (verlaten) stel je zo in:

If code > 0 then
naamvanknop.Visible = true
else
naamvanknop.Visible = false
end if

Bij de knop zet je dan dit:

Sub naamvanknop_click()
On Error GoTo Err_naamvanknop_Click


    DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
    DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70
    DoCmd.GoToControl "code"
    naamvanknop.Visible = false

Exit_naamvanknop_Click:
    Exit Sub

Err_naamvanknop_Click:
    msgbox Err.Description
    Resume Exit_naamvanknop_Click
   
End Sub

Ik heb een snelle voorbeelddatabase gemaakt.
Je hebt wel access 2007 of 2010 nodig om te bekijken.

Klik op bestelbon_F
Vul in de subformulier in de eerste veel 3 cijfers en dan enter.
Dan wordt de knop zichtbaar en als je dan wis dan de knop onzichtbaar worden.

Groetjes

Stegisoft

Hello daneron,

Je kan onmogelijk een knop voorzien bij ieder record bij doorlopend formulier.
Dat is nutteloos.
Wat je kan doen een een bijwerkqeury doen van zodra je naar een nieuw record gaat.
Maar kan je misschien geen voorbeeld database maken zodat we beter kunnen zien wat je bedoeld?

Groetjes

Stegisoft

Als je van je subformulier een doorlopend formulier maakt, staat toch sowiezo naast elke record?

Als je eens duidelijk zou uitleggen wat het doel van dit allemaal is?
Een praktisch voorbeeldje maken? zodat wij hier niet zitten te gissen naar war jij mogelijks wilt?

dizzl

Wat je probeerde was goed maar je deed het omgekeerde
Je wilt de waarde van veld2 dezelfde waarde krijgen als veld1

Vervang dus je code
Private Sub Knop6_Click()
    Me.Veld2 = Me.Veld1
End Sub
Alles vervangen zou ook kunnen maar niet zomaar omdat Access niet weet hoeveel element er in je subform zitten. Je Subform zit wel in je hoofdform maar het is er niet aan gekoppeld.

je kan ze wel allemaal in een keer doen dus met die knop
Private Sub Knop7_Click()
    Dim strSQL As String
    strSQL = "UPDATE Table1 Set Veld2= Veld1"
    DoCmd.RunSQL strSQL
End Sub
Vraag rest nog ..Waarom zou je iets dubbel willen opslaan?

Als je nu eens een eenvoudig vbtje zou maken met twee xls bestanden en uitleggen wat er mee moet gebeuren?