Ik probeer de volgende code om een Excelbestand te openen in een Excel venster vanuit Internet Explorer. Echter deze geeft problemen. Wie kan mij helpen?
Dim oApp As Object
Set oApp = CreateObject("Excel.Application")
On Error Resume Next
'oApp.Visible = True
'oApp.UserControl = True
'oApp.Workbooks.Open Filename:="S:\Speelkaarten\Kaartenregistratie.xls"
Deze code staat in Private Sub Workbook_Open()
Als ik het bestand open worden er meerdere bestanden gegeneert en dat moet dus niet.
Laat ik de laatste regel weg, dan opent het bestand zich in explorer. Het bestand moet zich openen in Excel "bovenop" de webpage.
Alvast bedankt
John
Dim oApp As Object
Set oApp = CreateObject("Excel.Application")
On Error Resume Next
'oApp.Visible = True
'oApp.UserControl = True
'oApp.Workbooks.Open Filename:="S:\Speelkaarten\Kaartenregistratie.xls"
Deze code staat in Private Sub Workbook_Open()
Als ik het bestand open worden er meerdere bestanden gegeneert en dat moet dus niet.
Laat ik de laatste regel weg, dan opent het bestand zich in explorer. Het bestand moet zich openen in Excel "bovenop" de webpage.
Alvast bedankt
John
