MaximoAccess

Caro Usuário, não tire as suas duvidas nas Salas de Repositório, abra sempre um novo tópico relacionado, nas salas destinadas para o efeito, como Sala de Tabelas, Consultas, Formulários, Relatórios, Macros, Módulos e VBA.

Obrigado

Administração do MaximoAccess

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

    [Resolvido]Importação Excel para Access informando nome do campo

    Compartilhe

    Rafael Silva
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 587
    Registrado : 15/11/2011

    [Resolvido]Importação Excel para Access informando nome do campo

    Mensagem  Rafael Silva em Sab 09 Maio 2015, 15:52

    Boa tarde Senhores,
    Estou com um problema e tentei usar alguns exemplos que encontrei aqui mas ate o momento no não conseguir resolver.

    Antes eu tinha uma solução apresentada [Você precisa estar registrado e conectado para ver este link.] mesmo no fórum.

    Mas hoje no recebo as informações em excel de uma forma onde os campos tem nome com caracter especial (Ex. o que era "Descricao" passou a ser "Descrição" ou "LocalInstal" agora "Loc.Inst.").

    A solução seria fácil se eu pudesse alterar os nomes dos campo no banco para igual ao do excel mas alguns campos do Excel vem com "." ou "ç" e o Access não aceita nome de campo como "Loc.Inst." por exemplo.

    Obs: Extraio os arquivos excel do ERP SAP e salva em um drive de rede automatic, se eu abrir o excel a alterar os campos manual vai funcionar ,mas essa não é a ideia.
    Alguém sabe como contornar esse problema e conseguir importar os arquivos de excel para o access ?

    Obrigado.


    .................................................................................
    "Nunca abaixe a cabeça para ninguém,
    nem levante o nariz demais, olho no olho já é o suficiente."

    rubenscouto
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 554
    Registrado : 02/10/2011

    Re: [Resolvido]Importação Excel para Access informando nome do campo

    Mensagem  rubenscouto em Sab 09 Maio 2015, 16:11

    passei pelo mesmo problema a a unica solução foi alterar os nomes na planilha para que o banco reconhecesse os campos. foi justamente inportando do ERP SAP.

    Rafael Silva
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 587
    Registrado : 15/11/2011

    Re: [Resolvido]Importação Excel para Access informando nome do campo

    Mensagem  Rafael Silva em Sab 09 Maio 2015, 16:14

    Obrigado Rubens,
    Mas vc entra no excel e altera toda vez que for importar?

    Sds


    .................................................................................
    "Nunca abaixe a cabeça para ninguém,
    nem levante o nariz demais, olho no olho já é o suficiente."

    rubenscouto
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 554
    Registrado : 02/10/2011

    Re: [Resolvido]Importação Excel para Access informando nome do campo

    Mensagem  rubenscouto em Seg 11 Maio 2015, 01:50

    geralmente altero somente os nomes dos cabeçalhos das colunas. De outra forma deu erro.

    ahteixeira
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 3216
    Registrado : 15/03/2013

    Re: [Resolvido]Importação Excel para Access informando nome do campo

    Mensagem  ahteixeira em Seg 11 Maio 2015, 08:37

    Olá a todos.
    No Access, pode abrir o excel e alterar as células pretendidas, corrigindo os nomes dos campos.
    Abraço

    Rafael Silva
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 587
    Registrado : 15/11/2011

    Re: [Resolvido]Importação Excel para Access informando nome do campo

    Mensagem  Rafael Silva em Ter 12 Maio 2015, 02:42

    Boa noite !
    Rubens , VC altera o as colunas do excel toda vez que gera um novo excel ? No meu caso gero o excel a todo momento pelo menos 3x ao dia

    Teixeira
    A ideia era que no próprio access via VBA eu importasse o excel sem ter que alterar os nomes das colunas manualmente.

    Alguma dica ?
    Obrigado


    .................................................................................
    "Nunca abaixe a cabeça para ninguém,
    nem levante o nariz demais, olho no olho já é o suficiente."

    ahteixeira
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 3216
    Registrado : 15/03/2013

    Re: [Resolvido]Importação Excel para Access informando nome do campo

    Mensagem  ahteixeira em Ter 12 Maio 2015, 08:16

    Ola,
    Sim a ideia é os seguintes passos através do Access:
    1.Abrir o ficheiro Excel e corrigir os nomes dos campos, gravar, fechar.
    2.Importar como ja o fazia.
    Pode incluir tudo no mesmo botão, o utilizador não da por nada.
    Se pretender ajuda, poste pequeno exemplo do excel e nomes pretendidos a substituir.
    Abraço

    ahteixeira
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 3216
    Registrado : 15/03/2013

    Re: [Resolvido]Importação Excel para Access informando nome do campo

    Mensagem  ahteixeira em Ter 12 Maio 2015, 16:54

    Olá, não sei se já resolveu, no entanto fiz pequeno exemplo com o seguinte código:

    Código:
    Private Sub cmdAlterarXLSX_Click()
    'ahteixeira 2015 - maximoaccess
        Dim oExcel As Object
        Dim oBook As Object
        Dim oSheet As Object

        Set oExcel = CreateObject("Excel.Application")

        Set oBook = oExcel.Workbooks.Open(Application.CurrentProject.Path & "\AlteraFicheiroExcel.xlsx")
        oExcel.Visible = False

        Set oSheet = oBook.Worksheets(1)

        oSheet.Range("A1").Value = "maximoaccess A1"
        oSheet.Range("B1").Value = "maximoaccess A2"
        
        oBook.Save
        oBook.Close
        oExcel.Quit
        
        MsgBox "Feito, Veja ficheiro excel.", vbInformation
    End Sub

    Abaixo ficheiro de teste.
    Abraço
    Anexos
    AlteraFicheiroExcel.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (28 Kb) Baixado 39 vez(es)

    Rafael Silva
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 587
    Registrado : 15/11/2011

    Re: [Resolvido]Importação Excel para Access informando nome do campo

    Mensagem  Rafael Silva em Sex 15 Maio 2015, 01:53

    Perfeito !!!
    Muito Obrigado !!!


    .................................................................................
    "Nunca abaixe a cabeça para ninguém,
    nem levante o nariz demais, olho no olho já é o suficiente."

    ahteixeira
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 3216
    Registrado : 15/03/2013

    Re: [Resolvido]Importação Excel para Access informando nome do campo

    Mensagem  ahteixeira em Sex 15 Maio 2015, 08:17

    Olá, obrigado pelo retorno.
    Os utilizadores do fórum agradecem.
    Abraço

      Data/hora atual: Sex 09 Dez 2016, 03:46