MaximoAccess

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

Obrigado

Administração do MaximoAccess

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


    [Resolvido]Importar Dados de Arquivo html para uma tabela no access.

    waraujo
    waraujo
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 57
    Registrado : 04/02/2010

    [Resolvido]Importar Dados de Arquivo html para uma tabela no access. Empty [Resolvido]Importar Dados de Arquivo html para uma tabela no access.

    Mensagem  waraujo em 17/12/2018, 22:49

    Ola amigos Boas, !!!!

    Seguinte tenho um arquivo que recebo de um Job no Software SAS pra quem conhece o SAS, porem este arquivo vem em formato html, pra piorar quando a quantidade de dados e acima de 60 registros o arquivo se divide em paginas, gostaria da ajuda dos amigos aqui, teria alguma macro ou Código VBA para importar os dados deste arquivo html de uma vez so para uma tabela no Access, lembrando que esta tabela irei deletar antes da nova importação.
    Achei um artigo aqui no Forum mas não estou conseguindo adaptar....informa que não foi possível localizar o objeto tabela, mas eu criei a tabela...

    Somente Corrigindo o Arquivo é no Formato htm, Ok !!!!

    Post Falando sobre o assunto porem não consegui...
    http://www.maximoaccess.com/t23775-criar-tabela-a-partir-de-um-arquivo-com-tabelas-html-html-tables


    Segue algumas imagens

    [Resolvido]Importar Dados de Arquivo html para uma tabela no access. Open?id=1wRVqDRvanZEq2zWcbl0SrIQSa671H0CV

    [Resolvido]Importar Dados de Arquivo html para uma tabela no access. Open?id=1f4GQwbj1RBYv371-e-TtNcyP39C9kC9z


    Agradeço !!!!
    Anexos
    [Resolvido]Importar Dados de Arquivo html para uma tabela no access. AttachmenttelahtmlN.png
    tela do arquivo HMTL
    Você não tem permissão para fazer download dos arquivos anexados.
    (76 Kb) Baixado 5 vez(es)


    .................................................................................
    Que Deus Abençoe à todos aqui presente.
    Não Fique Pobre Fazendo Festa com Dinheiro Emprestado.
    Eclesiástico 18,33
    Wellington Araujo
    IvanJr.
    IvanJr.
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 850
    Registrado : 22/11/2016

    [Resolvido]Importar Dados de Arquivo html para uma tabela no access. Empty Re: [Resolvido]Importar Dados de Arquivo html para uma tabela no access.

    Mensagem  IvanJr. em 18/12/2018, 00:07

    Tem como disponibilizar o arquivo?


    .................................................................................
    Sempre tente entender o código, não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.
    waraujo
    waraujo
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 57
    Registrado : 04/02/2010

    [Resolvido]Importar Dados de Arquivo html para uma tabela no access. Empty Re: [Resolvido]Importar Dados de Arquivo html para uma tabela no access.

    Mensagem  waraujo em 18/12/2018, 02:22

    Amigos ja resolvido por aqui segue a solução mais detalhada para um futura duvida !!!!!

    Grande Abraço à Todos Bom Natal e um prospero ano novo !!!!!


    Dim y, s As Integer
    Dim x As String

    '10 s = Nz(InputBox("Quantas tabelas deseja importar?", "Importando...")) 'Ou
    'x = Nz(InputBox("Indique o caminho\nomeFicheiro.html ", "Importando..."))
    12 x = "\\cmpintra02\sistemas_processos_redes\BaseSAP\Job PAINELCONTRATOS, Step 1.htm"

    'Deleta os dados na tabela à receber
    14 CurrentDb.Execute "DELETE * FROM Tab_Contratos_SAP_Base"


    16 For y = 0 To 50
    17 If y = 0 Then
    'ComandoImportarArquivo,"EspecificaçõesDeImportação","TabelaDadosAccess","CaminhoDoArquivoHTML",NomeCampo_Sim/Não,"NomeDaTabelaDentroArquivoHTML"
    18 DoCmd.TransferText acImportHTML, "Job PAINELCONTRATOS", "Tab_Contratos_SAP_Base", x, False, "Saída de Report"
    Else
    ''ComandoImportarArquivo,"EspecificaçõesDeImportação","TabelaDadosAccess","CaminhoDoArquivoHTML",NomeCampo_Sim/Não,"NomeDaTabelaDentroArquivoHTML"
    20 DoCmd.TransferText acImportHTML, "Job PAINELCONTRATOS", "Tab_Contratos_SAP_Base", x, False, "Saída de Report" & y
    End If
    22 Next y


    .................................................................................
    Que Deus Abençoe à todos aqui presente.
    Não Fique Pobre Fazendo Festa com Dinheiro Emprestado.
    Eclesiástico 18,33
    Wellington Araujo
    waraujo
    waraujo
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 57
    Registrado : 04/02/2010

    [Resolvido]Importar Dados de Arquivo html para uma tabela no access. Empty Re: [Resolvido]Importar Dados de Arquivo html para uma tabela no access.

    Mensagem  waraujo em 18/12/2018, 02:23

    Obrigado à Todos....

    Valeu Abraço !!!!


    .................................................................................
    Que Deus Abençoe à todos aqui presente.
    Não Fique Pobre Fazendo Festa com Dinheiro Emprestado.
    Eclesiástico 18,33
    Wellington Araujo

    Conteúdo patrocinado

    [Resolvido]Importar Dados de Arquivo html para uma tabela no access. Empty Re: [Resolvido]Importar Dados de Arquivo html para uma tabela no access.

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 24/8/2019, 10:33