Ayuda Aplicacion .Net con Excel

Question

Hola a todos

Favor solicito ayuda urgente, necesito realizar una aplicacion con acceso a base de datos(sql 2005) desde excel

tengo instalado el office 2007 , visual studio tool for office y el .net

ayudenme con ejemplo o talleres con acceso a base para excel 2003 u office 2007

 

Gracias

 

 

Answer 1

 

Hola

Mira a ver si te sirve esto:

http://www.microsoft.com/spanish/msdn/comunidad/mtj.net/voices/art164.asp

Saludos.

Answer 2

Algunos recursos sobre el tema: que me proporcionaron

http://geeks.ms/blogs/aruiz/archive/2007/01/25/accediendo-a-datos-de-excel-desde-c-con-oledb.aspx

http://support.microsoft.com/kb/306023/es

http://www.microsoft.com/spanish/msdn/comunidad/mtj.net/voices/art05.asp

http://www.microsoft.com/spanish/msdn/comunidad/mtj.net/voices/art164.asp

Saludos.

Ejemplo de como lo hice:

Bueno ya lo hice, pero si alguien le interesa
la misma propiedad que asigna los datos a excel, permite lectura de ellos
Asigno
***********************************************************
dim ods as dataset = new dataset
ods = ows.ObtenerSaldo(Me.cbempresa.SelectedValue, Me.txanio.Text)
Dim myObject(100, 4) As Object
Dim j As Integer = 0
For Each myRow As DataRow In ods.Tables(0).Rows
myObject(j, 0) = myRow("Codigo").ToString
myObject(j, 1) = myRow("Nombre").ToString
myObject(j, 2) = CType(myRow("Saldo"), Double)
myObject(j, 3) = CType(myRow("Valor"), Double)
j = j + 1
Next
Dim objrangodata As Excel.Range = Globals.ThisAddIn.Application.Worksheets(1).Range("A10:D" & (j - 1).ToString)
objrangodata.Value2 = myObject

**************************************************************
recupero

Dim objrangodataretrieve As Excel.Range = Globals.ThisAddIn.Application.Range("A10:D" & posicion.ToString)
Dim nrow As Integer = objrangodataretrieve.Rows.Count
Dim ncol As Integer = objrangodataretrieve.Columns.Count
Dim objdata(nrow, ncol) As Object

objdata = objrangodataretrieve.Value2

Dim j As Integer = 0
Dim fila As DataRow
For j = 1 To nrow
fila = ds.Tables(0).NewRow
fila.BeginEdit()
fila.Item("Codigo") = objdata(j, 1)
fila.Item("Nombre") = objdata(j, 2)
fila.Item("Saldo") = objdata(j, 3)
fila.Item("Valor") = objdata(j, 4)
fila.EndEdit()
ds.Tables(0).Rows.Add(fila)
j += 1
Next
***************************************************
y ya tengo los datos en el dataset

Si les sirve.. aqui lo pongo
=)

Si alguien tiene otro codigo de hacerlo no esta de mas saberlo

Gracias x la ayuda