Beste Helpmijers,
Vanuit Excel wil ik graag een formulier in Access openen, ik gebruik hiervoor de volgende code:
Sub Regelopenen()
ActiveWorkbook.FollowHyperlink "\\SERVER DORPSHUIS\data\planning & administratie.accdb"
Set oApp = GetObject(, "Access.Application")
oApp.DoCmd.OpenForm "Plandata", , , "ID = " & Range("AM" & Selection.Row)
End Sub
Hoewel de followhyperlink-methode vrij ongebruikelijk is, ben ik er liefhebber van aangezien het met deze methode niet uit maakt of een bestand al geopend is of niet. Met deze code treden er echter fouten op zodra er meerdere Access bestanden geopend zijn, de code probeert dan altijd het formulier "Plandata" te openen in het Access bestand dat als eerste geopend is.
Ik heb een aantal methoden geprobeerd maar allen resulteerden in het openen van het Access bestand, ook als het bestand al geopend is. Ook de methode GetObject("\\SERVER DORPSHUIS\data\planning & administratie.accdb", "Access.Application") resulteert hierin.
Ik ben ten einde raad. Kan iemand van jullie mij uit de spreekwoordelijke brand helpen?
Vanuit Excel wil ik graag een formulier in Access openen, ik gebruik hiervoor de volgende code:
Sub Regelopenen()
ActiveWorkbook.FollowHyperlink "\\SERVER DORPSHUIS\data\planning & administratie.accdb"
Set oApp = GetObject(, "Access.Application")
oApp.DoCmd.OpenForm "Plandata", , , "ID = " & Range("AM" & Selection.Row)
End Sub
Hoewel de followhyperlink-methode vrij ongebruikelijk is, ben ik er liefhebber van aangezien het met deze methode niet uit maakt of een bestand al geopend is of niet. Met deze code treden er echter fouten op zodra er meerdere Access bestanden geopend zijn, de code probeert dan altijd het formulier "Plandata" te openen in het Access bestand dat als eerste geopend is.
Ik heb een aantal methoden geprobeerd maar allen resulteerden in het openen van het Access bestand, ook als het bestand al geopend is. Ook de methode GetObject("\\SERVER DORPSHUIS\data\planning & administratie.accdb", "Access.Application") resulteert hierin.
Ik ben ten einde raad. Kan iemand van jullie mij uit de spreekwoordelijke brand helpen?
