Buscador
YoReparo.com La Web 

Regístrate gratis para participar de los foros, o si ya estás registrado haz login.

Foros de soluciones « Programación

Consulta de Visual Basic 6

comentario del autor Mie Mar 09, 2005 11:37 pm
   
Necesito crear una aplicacion que lea una celda "x" de un archivo de excel y en base a esta lectura, me permita o no escribir datos en la misma u otra celda del mismo archivo excel.

lechitos

Reputación
sin valorar Mie Mar 16, 2005 5:46 am
   
El siguiente código abre el archivo de excel Libro1
que se encuentra en la raíz del disco local C: y escribe
el contenido de la celda [1, 1] en la celda [2, 2] de la
primera hoja del libro

Dim xlApp As Excel.Application 'variable para el objeto activeX Excel
Dim xlBook As Excel.Workbook 'variable para el libro de Excel
Dim xlSheet As Excel.Worksheet 'variable para la hoja de Excel

Set xlApp = New Excel.Application
Set xlBook = xlApp.Workbooks.Open("c:\Libro1.xls")
Set xlSheet = xlBook.Worksheets(1) 'la primer hoja del libro

xlSheet.Cells(2, 2).Value = xlSheet.Cells(1, 1).Value

xlBook.Save
xlBook.Close
xlApp.Quit

' Libera los objetos.
Set xlApp = Nothing
Set xlBook = Nothing
Set xlSheet = Nothing

Para que te funcione en Visual Basic 6 tienes que activar la referencia
Microsoft Excel 9.0 Object Library
lo cual haces en el menú
Project | References...
y lo buscas en las referencias disponibles

Juan_Perez

Reputación


Hacer una pregunta

Reglamento / P+F

Foros

Miembros / Expertos