Hallo,
In Access heb ik een knop gemaakt, die ik een bepaalde Excel file wil laten openen.
De code tot nu toe in VBA hiervoor is:
Private Sub Excel_starten_Click()
On Error GoTo Err_Excel_starten_Click
Dim oApp As Object
Set oApp = CreateObject("Excel.Application")
oApp.Visible = True
'Only XL 97 supports UserControl Property
On Error Resume Next
oApp.UserControl = True
Exit_Excel_starten_Click:
Exit Sub
Err_Excel_starten_Click:
MsgBox Err.Description
Resume Exit_Excel_starten_Click
End Sub
Wie kan mij vertellen hoe ik deze code aanpas, zodat het betreffende bestand geopend kan worden?
Het bestandje staat in: M/Algemeen/Diversen
Bedankt alvast!
Cindy
In Access heb ik een knop gemaakt, die ik een bepaalde Excel file wil laten openen.
De code tot nu toe in VBA hiervoor is:
Private Sub Excel_starten_Click()
On Error GoTo Err_Excel_starten_Click
Dim oApp As Object
Set oApp = CreateObject("Excel.Application")
oApp.Visible = True
'Only XL 97 supports UserControl Property
On Error Resume Next
oApp.UserControl = True
Exit_Excel_starten_Click:
Exit Sub
Err_Excel_starten_Click:
MsgBox Err.Description
Resume Exit_Excel_starten_Click
End Sub
Wie kan mij vertellen hoe ik deze code aanpas, zodat het betreffende bestand geopend kan worden?
Het bestandje staat in: M/Algemeen/Diversen
Bedankt alvast!
Cindy