Åbne/Lukke enkelt WorkSheet uden at forstyrre andre Regneark
Jeg er ved at skrive en application som skal hente data fra et Excel Regneark. Det går fint med at åbne, hente data og lukke igen når Excel ikke er åbent i forvejen.Jeg gør følgende:
Dim XL_Sheet as object
Set XL_Sheet = GetObject(, "Excel.Application") 'Åbn Excel
IF ERR <> 0 Then
Set XL_Sheet = CreateObject("EXCEL.APPLICATION") ' Hvis fejl så start Excel og Create Excel object
END IF
XL_Sheet.Visible = True 'Synlig
XL_Sheet.workbooks.Open(Data_Path) 'Åben fil
' Hent data!!
XL_Sheet.workbook.Close
Hvis der er andre Excel regneark åbne bliver de også lukket. Kan jeg på en eller anden måde kun udføre Close metoden på det ene object jeg har åbnet?