VBA:VB6 - Usar o Excel a partir de outro aplicativo

Com esta manipulação você pode "chamar" o Excel a partir do VB6 ou de outro aplicativo Office.
Colar em um módulo geral (Módulo1, por exemplo)
No VBA >> Inserção >> Módulo e, nesta janela, colar...
No VB6 >> Projeto >> Adicionar um módulo e, nesta janela, colar...

Dim EX As New Application       
Public Book As Workbook       
Public Planilha As Worksheet

'Não esquecer de adicionar a referência...

'Microsoft Excel X,X object librairy
Sub AdicionarExcel()       
    Set EX = CreateObject("Excel.application")       
    EX.Visible = True       
    Set Book = EX.Workbooks.Add       
    'Todas as funções Application estão disponíveis com o BooK       
    Set Feuille = Book.Sheets(1)       
    'Exemplo:       
    Planilha.Name = "Esta planilha"       
    With Planilha       
        .[A1] = "Esta é a célula A1"       
        .[A2] = "Esta é a célula A2"       
        .Columns("A:A").ColumnWidth = 23.14       
    End With       
    'Todas as funções Excel estão disponíveis com Planilha.       
End Sub

Para os iniciantes, com dificuldades, consultar este link.

Nosso conteúdo é produzido em colaboração com especialistas em tecnologia da informação sob o comando de Jean-François Pillou, fundador do CCM.net. CCM é um site sobre tecnologia líder em nível internacional e está disponível em 11 idiomas.
Este documento, intitulado 'VBA:VB6 - Usar o Excel a partir de outro aplicativo', está disponível sob a licença Creative Commons. Você pode copiar e/ou modificar o conteúdo desta página com base nas condições estipuladas pela licença. Não se esqueça de creditar o CCM (br.ccm.net) ao utilizar este artigo.

Assine nossa newsletter!

Assine nossa newsletter!