CLR: .Net / Mono / Boo / Otros CLR > VB .NET

 Problema Con Excel

<< < (2/2)

senzao18:
No  uses la libreria, yo lo hago de la siguiente manera para no depender del excel..


--- Código: Text --- Dim isExcelOpen As Boolean = False             Dim xlapp            Dim wbxl            Dim wsxl             Dim intRow As Integer 'counter             Dim oRow As DataRow             On Error Resume Next            xlapp = GetObject(, &#34;Excel.Application&#34;)            If xlapp Is Nothing Then                xlapp = CreateObject(&#34;Excel.Application&#34;)                If xlapp Is Nothing Then                    MsgBox(&#34;Necesita Microsoft Excel para utilizar esta opción.&#34;, vbCritical, &#34;Auditoría de Retiros&#34;)                    Exit Sub                End If            Else                xlapp = CreateObject(&#34;Excel.Application&#34;)            End If             wbxl = xlapp.Workbooks.Add            wsxl = xlapp.Sheets(1)  

Navegación

[0] Índice de Mensajes

[*] Página Anterior