VB.NET: ABRIR O CERRAR UN LIBRO DE EXCEL

Iniciaremos con el código para abrir el libro:

1)Primero hay que adicionar la referencia del Excel

a) clic en Menu Project

b) clic en Add Reference

c) clic en Pestaña COM

d) Seleccionar Microsoft Excel XX.X Object Library

e) clic en ok

f) Luego insertamos el siguiente codigo en la rutina deseada:

Imports Microsoft.Office.Interop.Excel

Private Sub XXXXXXX

Dim xlibro As Microsoft.Office.Interop.Excel.Application

    Dim strRutaExcel As String

    Dim Workbooks As String

'El siguiente codigo es para crear la ruta,entre comillas se pone la ruta donde esta el libro

strRutaExcel = "C:\Libro1.xls"

'El siguiente codigo es para abrir el libro y hacerlo visible, si se quiere dejar el libro oculto, se cambia la palabra True por False

xlibro = CreateObject("Excel.Application")

        xlibro.Workbooks.Open(strRutaExcel)

        xlibro.Visible = True

End Sub

Ya tenemos el libro abierto, para cerrarlo simplemente adicionamos el siguiente codigo en la ubicación deseada, siempre debe estar más abajo del código que usamos para abrir el libro o en un proceso posterior, ya que de lo contrario resultaría un error.

xlibro.Workbooks("Libro1.xls").Close()