Cómo importar datos de Excel en Visual Basic 6

Microsoft Excel es un programa de hoja de cálculo que le permite crear hojas de cálculo para organizar y calcular los datos y gráficos. Visual Basic 6 ( VB6 ) es una versión de Visual Basic, que es el lenguaje de programación y entorno de desarrollo integrado creado por Microsoft . Creación de la información en Excel es más fácil que en VB6 , lo que a veces es práctico para importar datos desde Excel a VB6 . Hay varias maneras de hacer esto , pero la más sencilla es una línea de código en Visual Basic que automatiza el proceso. Instrucciones
1

Inicie un proyecto nuevo de Visual Basic.
2

Agregar un cuadro de lista y un botón de comando al formulario .
3

Seleccione " Proyecto de Menú" y seleccione la opción " Referencias". A partir de ahí , elegir la línea de " Microsoft Excel Library" .
4

Introduzca en el siguiente código.

Private Sub Command1_Click ()

Dim objXLApp Como Excel. Aplicación

intLoopCounter Dim As Integer

Set objXLApp = New Excel.Application

objXLApp

Workbooks.Open . "C: \\ File.xls "

. libros ( 1 ) . Hojas de trabajo ( 1 ) . Seleccione

Para intLoopCounter = 1 To CInt ( . ActiveSheet.Cells.SpecialCells ( xlCellTypeLastCell ) . Fila )

List1 . AddItem . Range (" A" y intLoopCounter )

Siguiente intLoopCounter

. Cuadernos de trabajo ( 1 ) . Close False

. Salir

extremo con

objXLApp Set = Nothing End Sub

5

Cambiar la carpeta "C : \\ File.xls " a su nombre de archivo de Excel. Esto ahora va a importar los datos de la hoja de cálculo Excel.