Visual Basic - transformar

Life is soft - evento anual de software empresarial
 
Vista:

transformar

Publicado por oscar (1 intervención) el 01/07/2002 19:58:44
Hola les pido ayuda.
Estoy programando en visual basic 6, y necesito pasar de una planilla de excell la información de las columnas y filas a una base de datos access, por ejemplo que me pida desde que linea hasta que linea y poder yo decirle que las columna a sea nombre, la b sea direccion donde nombre y direccion son campos de la tabla de access.
No se con cual comando o como puedo hacerlo.
desde ya gracias.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:transformar

Publicado por TheMente (36 intervenciones) el 01/07/2002 20:25:32
Este procedimiento lo utilizo para enviar datos desde VB a Excel, puedes modificarlo para hacer el trabajo inverso

Public Sub Reporte(ByVal sPath, ByRef sData() As Variant, ByVal iFila As Integer, ByVal iCol As Integer, iHoja As Integer, iCount As Integer)
On Error GoTo Error_Reporte
Dim Contador
Dim xlApp As Excel.Application
Dim xlLibro As Excel.Workbook
Dim xlHoja As Excel.Worksheet

Set xlApp = CreateObject("Excel.Application")
Set xlLibro = xlApp.Workbooks.Open(sPath)
Set xlHoja = xlLibro.Worksheets(iHoja)

Contador = 0

While Contador < iCount
Contador = Contador + 1
iFila = iFila + 1
xlHoja.Cells(iFila, iCol).Value = sData(Contador)
Wend

xlApp.Visible = True

'xlLibro.PrintOut
'xlLibro.Close
Set xlApp = Nothing

Error_Exit:
Exit Sub

Error_Reporte:
MsgBox Error$
Resume Error_Exit

End Sub
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:transformar

Publicado por Alvaro Marín (574 intervenciones) el 02/07/2002 10:06:12
Estimado amigo:
En www.ambsoftware.com encontrarás un ejemplo que te muestra cómo hacerlo.
Para localizarlo te recomiendo que utilices el buscador de recursos de la página principal y escribas en la casilla la palabra "excel".
El ejemplo en cuestión se llama "Extrae datos de una hoja de Microsoft Excel ".
Espero que esta información te sirva de ayuda.
Fdo.- Alvaro Marín
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar