Microsoft Excel é um programa de planilha eletrônica que permite criar planilhas para organizar e calcular dados e gráficos. Visual Basic 6 ( VB6 ) é uma versão do Visual Basic , que é a linguagem de programação e ambiente de desenvolvimento integrado criado pela Microsoft. Criação de informações no Excel é mais fácil do que em VB6 , por isso às vezes é prático para importar dados do Excel para o VB6. Existem várias maneiras de fazer isso , mas o mais simples é uma linha de código em Visual Basic que automatiza o processo . Instruções
1

Inicie um novo projeto Visual Basic.
2

Adicione uma caixa de listagem e um botão de comando ao formulário .
3

Selecione "Menu Project" e selecione a opção "Referências". De lá , pegue a linha " Microsoft Excel Biblioteca " .
4

Digite o código a seguir .

Private Sub Command1_Click () Dim

objXLApp Como Excel. Aplicação

Dim intLoopCounter As Integer

Set objXLApp = New Excel.Application

Com objXLApp

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

. pastas de trabalho (1). Worksheets ( 1). Selecione

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

Lista1 . AddItem . Range (" A" & intLoopCounter )

Próxima intLoopCounter

. pastas de trabalho (1). Feche
Falso

. Quit

End With

Set objXLApp = Nothing

End Sub
5

Altere o "C: \\ File.xls " para o nome do arquivo Excel. Isso agora irá importar os dados de sua planilha Excel.