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


2 participantes

    [Resolvido]Unir 2 tabelas de vendas

    avatar
    fazerbem
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Unir 2 tabelas de vendas Empty [Resolvido]Unir 2 tabelas de vendas

    Mensagem  fazerbem 29/5/2018, 22:50

    Boa noite, meu sistema de gerenciamento foi todo baseado em excel e vba. Porem mantive um bd montado numa planilha de nome vendas.
    Montei agora um sistema todo baseado em apenas Acess. Neste possuo uma Tabela de nome "tblVendas".

    Na planilha em excel na plan: Vendas Feitas, possuo la 1334 recibos de vendas , sendo 1 venda por linha. ( Empresa-Id Venda- COD Cliente- Cliente-Total da conpra - Forma de Pagamento- Cod Produto- Produto- valor- QNT- Total- etc.

    Eu preciso Mandar isso para o ACess, ate aqui tudo certo, porem minha Tabela em acess eu fiz os campos de "Forma de Pagamento","ClienteID", "Vendedor" com Assistente de Pesquisa.
    Quando eu mandar o BD antigo pra dentro desta Tabela em acess, , devido a mesma ter campos que foram feitos pelo assistente de pesquisa, os nomes dos clientes , Vendedor e Forma de Pagamento serao apagados, pois se referem a um número.

    Mediante a isso explicado, como farei para nao perder todo meu BD antigo ? Se fossem poucas vendas eu digitaria tudo, mas sao muitas vendas .

    Grato Andre

    PS: Fiz um Form chamado VendasFeitas com a fonte de registro usando a tabela VendasFeitas ja convertida em acess, fiz uma Macro abaixo que eu usaria para puxar apenas o item escolhido, mas nao estou conseguindo copiar o referido registro pra adentro da tblVendas, a macro copia somente o primeiro registro e o restante permanece em branco na TblVendas.

    Se algum puder ajudar eu agradeço.


    Código:
    Private Sub Comando1_Click()

    Dim bc As Database

    'Nessa Parte vc pode declarar com qualquer nome, geralmente eu uso o proprio nome da tabela que quero inserir as informaçãos, ou abrevio ela, tanto faz.

    Dim Tab2 As Recordset

    'Inicializa os Valores das Variaveis

    Set bc = CurrentDb()
    Set Tab2 = bc.OpenRecordset("tblVenda")

    'Cria Um novo Registro
    Tab2.Edit

    'No Novo Registro Insere Os Dados que vc Deseja

    Tab2!ClienteID = Me.txtCliente
    Tab2!formapag = Me.txtFormaPag
    Tab2!vendedor = Me.txtVendedor


    'Atualiza Tabela
    Tab2.Update

        DoCmd.GoToRecord , , acNext 'Vai para o próximo registro

    End Sub
    avatar
    fazerbem
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Unir 2 tabelas de vendas Empty Re: [Resolvido]Unir 2 tabelas de vendas

    Mensagem  fazerbem 29/5/2018, 22:56

    outra duvida, enquanto nao acho a solucao a este problema , caso eu venha abastecendo esta nova tabela, achando a solucao aqui no forum, como farei para jogar as vendas antigas antes dessa novas ?
    FabioPaes
    FabioPaes
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3914
    Registrado : 14/08/2013

    [Resolvido]Unir 2 tabelas de vendas Empty Re: [Resolvido]Unir 2 tabelas de vendas

    Mensagem  FabioPaes 30/5/2018, 15:16

    Amigo, terá que utilizar programação VBa para Importar esses Dados... Veja na Sala de repositórios que possuem vários Exemplo. Eu mesmo ja devo ter postado uns 3 Exemplo diferentes sobre como importar dados do Excel.
    Terá que Le a Planilha do Excel e desmembrar os dados nas suas tabelas...


    .................................................................................
    _____________________________________________________________________
    Achou a solução para sua dúvida? Não seja Egoísta, Compartilhe com todos!
    A dica do Colega foi útil? Agradeça!

    O importante não saber tudo, mas sim a Onde procurar!
    avatar
    fazerbem
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Unir 2 tabelas de vendas Empty Re: [Resolvido]Unir 2 tabelas de vendas

    Mensagem  fazerbem 30/5/2018, 15:53

    vou testar e reponderei, grato
    Andre
    avatar
    fazerbem
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Unir 2 tabelas de vendas Empty Re: [Resolvido]Unir 2 tabelas de vendas

    Mensagem  fazerbem 30/5/2018, 20:18

    Consegui aqui fazer de outra forma, na tabela em excel antes de importar ao Acess associei o nome ao codigo do cliente, parceiro e Vendedor, dai deu certo.

    Grato

    Andre

    Conteúdo patrocinado


    [Resolvido]Unir 2 tabelas de vendas Empty Re: [Resolvido]Unir 2 tabelas de vendas

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 22/11/2024, 05:51