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]Abrir planilha Excel ja criada e atualizar com Access

    avatar
    fazerbem
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 437
    Registrado : 05/03/2017

    [Resolvido]Abrir planilha Excel ja criada e atualizar com Access Empty [Resolvido]Abrir planilha Excel ja criada e atualizar com Access

    Mensagem  fazerbem 6/8/2022, 21:26

    Ola, queria uma ajuda de quem puder auxiliar.

    Tenho um formulário Access com Nome Produto, Valor, sabor e Apresentação aberto.
    Tenho uma planilha com os mesmos campos já criada, porem a planilha estará fechada.

    Preciso através do formulário Access, que ao pressionar um botão salvar, que o comando abra esta planilha Excel, que estará em formato xLsx, e salve os dados do Access: Nome do produto, valor, sabor e apresentação nesta planilha Excel a partir da linha 6 em diante. Apos passar para o próximo registro Accees, que salve na linha 7 da excel e assim por diante.

    Feito isso, que salve a planilha Excel e salve a mesma na pasta Download com o nome Exportar.

    Muito Obrigado desde já como sempre.
    Anexos
    [Resolvido]Abrir planilha Excel ja criada e atualizar com Access AttachmentDownloads.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (44 Kb) Baixado 0 vez(es)


    Última edição por fazerbem em 14/8/2022, 00:38, editado 2 vez(es)
    avatar
    fazerbem
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 437
    Registrado : 05/03/2017

    [Resolvido]Abrir planilha Excel ja criada e atualizar com Access Empty Re: [Resolvido]Abrir planilha Excel ja criada e atualizar com Access

    Mensagem  fazerbem 6/8/2022, 21:42

    Corrigindo, Se bem que nem precisa abrir e fechar a tabela Excel , se possível fazer as adições com ela fechada mesmo.

    Grato
    avatar
    fazerbem
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 437
    Registrado : 05/03/2017

    [Resolvido]Abrir planilha Excel ja criada e atualizar com Access Empty Re: [Resolvido]Abrir planilha Excel ja criada e atualizar com Access

    Mensagem  fazerbem 9/8/2022, 15:07

    Tá difícil eu resolver , então peço a alguém que talvez tenha um link de um problema parecido com que eu preciso .
    avatar
    fazerbem
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 437
    Registrado : 05/03/2017

    [Resolvido]Abrir planilha Excel ja criada e atualizar com Access Empty Re: [Resolvido]Abrir planilha Excel ja criada e atualizar com Access

    Mensagem  fazerbem 12/8/2022, 02:21

    Consegui aqui resolver meu caso em 99%, faltando apenas um detalhe que vou explicar abaixo.



    Acontece que após acionado este código , é salvo na Planilha todos os dados requisitados normalmente.

    Mas ao escolher outro produto e acionar novamente este código, entao aparece a seguinte mensagem de erro:

    Erro em tempo de execução 1004

    O método "Rows" do objeto '_Global' falhou

    Então após eu dar CtrL + Alt + Del e Gerenciador de Tarefas e excluir do Processos em segundo Plano " Microsoft Excel ", que deveria estar fechado, Consigo fazer o comando funcionar novamente.
    Mas se eu acionar novamente o comando, novamente o erro se repete.

    Alguém poderia me dar uma dica para fechar de vez o Excel no termino do comando VBA e resolver este problema ?

    Obrigado !


    Última edição por fazerbem em 14/8/2022, 00:37, editado 1 vez(es)
    avatar
    fazerbem
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 437
    Registrado : 05/03/2017

    [Resolvido]Abrir planilha Excel ja criada e atualizar com Access Empty Re: [Resolvido]Abrir planilha Excel ja criada e atualizar com Access

    Mensagem  fazerbem 13/8/2022, 16:17

    Novamente eu aqui , Desde que fiz esta postagem venho tentando e achei o codigo acima e adaptei a minha necessidade, tudo Ok, porem pra ficar 100% so preciso fazer o excel fechar em segundo plano pois esta ficando aberto. Somente se fecha se eu fechar pelo gerenciador CRTL + ALT + DEL.
    Com o excel aberto nao consigo novamente fazer o comando funcionar.
    avatar
    fazerbem
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 437
    Registrado : 05/03/2017

    [Resolvido]Abrir planilha Excel ja criada e atualizar com Access Empty Re: [Resolvido]Abrir planilha Excel ja criada e atualizar com Access

    Mensagem  fazerbem Ontem à(s) 00:36

    Envio em anexo um modelo basico com o erro que esta apresentando aqui.
    Abrir o Formulario E acionar o botao .
    Vai se feito com sucesso.
    Repetir novamente o procedimento e entao dará o erro.

    Esse é meu problema aqui, se alguém puder ajudar serei novamente grato.

    Descompactar na pasta Download !

    Andre

    PS: Sera que esta faltando no VBA incluir alguma Referencia na Ferramentas do VBA ???
    Anexos
    [Resolvido]Abrir planilha Excel ja criada e atualizar com Access AttachmentDownloads.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (44 Kb) Baixado 1 vez(es)
    avatar
    fazerbem
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 437
    Registrado : 05/03/2017

    [Resolvido]Abrir planilha Excel ja criada e atualizar com Access Empty Re: [Resolvido]Abrir planilha Excel ja criada e atualizar com Access

    Mensagem  fazerbem Ontem à(s) 01:24

    Resolvido aqui !!

    Private Sub Comando7_Click()
    Dim xlapp As Excel.Application
    Dim xlBook As Excel.Workbook
    Dim xlSheet As Excel.Worksheet
    Dim xldata As Excel.Range
    Dim rowNo As Long
    Dim xLastRow As Long
    Dim a

    Set xlapp = CreateObject("Excel.Application")
    Set xlBook = xlapp.Workbooks.Open("C:\Users\amigo\Downloads\Produtos Shopee2.xlsx")
    Set xlSheet = xlBook.Worksheets("Modelo")

    xlapp.Visible = False
    xlSheet.Select
    xlSheet.Activate

    With xlBook.Worksheets("Modelo")
    xLastRow = .Cells(.Rows.Count, "A").End(xlUp).Row
    End With

    a = xLastRow

    xlBook.Worksheets("Modelo").Range("A" & a) = Me.Código
    xlBook.Worksheets("Modelo").Range("B" & a) = Me.Produto
    xlBook.Worksheets("Modelo").Range("C" & a) = Me.Sabor
    xlBook.Worksheets("Modelo").Range("D" & a) = Me.Apresentacao
    xlBook.Worksheets("Modelo").Range("E" & a) = Me.QNT

    xlBook.Save
    xlBook.Close
    xlapp.Application.Quit

    Set xlSheet = Nothing
    Set xlBook = Nothing
    Set xlapp = Nothing

    MsgBox " Feito com Sucesso", vbOKOnly + vbInformation


    End Sub

      Data/hora atual: 15/8/2022, 13:27