MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access


    [Resolvido]Sequencia de Comandos para Importar Excel

    Luiz Gustavo M
    Luiz Gustavo M
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 447
    Registrado : 13/09/2011

    [Resolvido]Sequencia de Comandos para Importar Excel Empty [Resolvido]Sequencia de Comandos para Importar Excel

    Mensagem  Luiz Gustavo M 16/1/2014, 23:49

    Boa noite a todos.

    Utilizo um botão com código para importar dados de uma planilha do Excel.
    Access 2003 / XP

    Importo os "Dados!Area_de_Impressão" de uma subplanilha do Excel.

    O problema é que só consegui abrir a tela de importação: (código: DoCmd.RunCommand acCmdImport)

    Saberiam me informar os códigos para os comandos:
    > para especificar que se trata de importação de Excel;
    > informar o caminho (C:/...), o nome da planilha e a subplanilha.
    > e que os dados a serem importados são os "Dados!Area_de_Impressão"

    Pesquisei no forum e encontrei muito material sobre importação do excel, mas não conseguí adaptá-los, principalmente no que se refere a "Área de Impressão". Embarassed 

    Obrigado a todos


    .................................................................................
    Luiz Gustavo
    Luiz Gustavo M
    Luiz Gustavo M
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 447
    Registrado : 13/09/2011

    [Resolvido]Sequencia de Comandos para Importar Excel Empty Re: [Resolvido]Sequencia de Comandos para Importar Excel

    Mensagem  Luiz Gustavo M 17/1/2014, 19:06

    Senhores.

    Pesquisei um pouco mais e achei a solução.

    Como diria o Mestre JPaulo: "Busque o simples"


    Dim strTabela As String
    strTabela = "TblTeste"
    DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel9, strTabela, "C:\teste.xlsx", True, "NomeAbaExcel" & "!A1:AQ500"




    .................................................................................
    Luiz Gustavo

      Data/hora atual: 23/11/2024, 12:30