Visual Basic para Aplicaciones - Abrir Excel desde VB

Life is soft - evento anual de software empresarial
 
Vista:

Abrir Excel desde VB

Publicado por Ian (3 intervenciones) el 04/12/2004 15:44:23
HOla:
Necesito que alguien me diga la manera en que abro algun archivo excel y leer los datos contenidos en en por favor.. que es de vida o muerte y si no es mucha molestia tambien .... me gustaria saber como es que se insertan tablas desde vidual en un archivo de word.. ya puedo ingresar textos pero me falta saber como ingresar tablas y texto dentro de sus celdas muchas gracias de antemano
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:Abrir Excel desde VB

Publicado por fernando (10 intervenciones) el 04/12/2004 18:49:45
Dim objexcel As Excel.Application
If Trim(nom_arch) = "" Then Exit Sub
If Dir(Trim(nom_arch)) = "" Then
MsgBox "El archivo no se pudo abrir", vbCritical
Exit Sub
End If

' Define cuál archivo se va a abrir y en cuál hoja va a leer
Set objexcel = New Excel.Application
Set ObjBook = objexcel.Workbooks.Open(nom_arch)
Set ObjSheet = ObjBook.Worksheets.Item(1)

ReDim variable_value(3) As String ' Definir el tamaño del arreglo que recibirá los datos de excel

' Lee los datos del archivo y los lleva a las variables definidas
With ObjSheet
variable_value(0) = .Cells(1, 3)
variable_value(1) = .Cells(2, 3)
variable_value(2) = .Cells(3, 3)
End With
Dim i As Integer
For i = 0 To 2
MsgBox variable_value(i)
Next i

objexcel.Quit
Set objexcel = Nothing

saludos y suerte!
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