Hallo
Ik heb een formulier met meerdere tabbladen gemaakt. Ik heb in één specifiek tabblad nu met een knop een link naar een ander formulier gemaakt. als de knop wordt aangeklikt sluit het basisformulier, zodat dit formulier weer wordt geopend en alle berekeningen worden uitgevoerd als ik in het gelinkte formulier klik op opslaan en sluiten (ook een knop die ik heb gemaakt). De VBA code ziet er als volgt uit:
Private Sub Knop5_Click()
On Error GoTo Err_Knop5_Click
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "FormVoorstellingenTabbladen"
stLinkCriteria = "[ID]=" & Me![ID]
DoCmd.OpenForm stDocName, , , stLinkCriteria
stDocNaam = "Formfacturen12204"
DoCmd.Close acForm, stDocNaam
Exit_Knop5_Click:
Exit Sub
Err_Knop5_Click:
MsgBox Err.Description
Resume Exit_Knop5_Click
End Sub
Nu zou ik willen dat onmliddellijk het tabblad Resultaat wordt geopend in "FormvoorstellingenTabbladen"
Alvast bedankt!
Ik heb een formulier met meerdere tabbladen gemaakt. Ik heb in één specifiek tabblad nu met een knop een link naar een ander formulier gemaakt. als de knop wordt aangeklikt sluit het basisformulier, zodat dit formulier weer wordt geopend en alle berekeningen worden uitgevoerd als ik in het gelinkte formulier klik op opslaan en sluiten (ook een knop die ik heb gemaakt). De VBA code ziet er als volgt uit:
Private Sub Knop5_Click()
On Error GoTo Err_Knop5_Click
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "FormVoorstellingenTabbladen"
stLinkCriteria = "[ID]=" & Me![ID]
DoCmd.OpenForm stDocName, , , stLinkCriteria
stDocNaam = "Formfacturen12204"
DoCmd.Close acForm, stDocNaam
Exit_Knop5_Click:
Exit Sub
Err_Knop5_Click:
MsgBox Err.Description
Resume Exit_Knop5_Click
End Sub
Nu zou ik willen dat onmliddellijk het tabblad Resultaat wordt geopend in "FormvoorstellingenTabbladen"
Alvast bedankt!