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]Copiar e Colar com Condição

    Compartilhe
    avatar
    Jeferson de Paula
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 364
    Registrado : 06/04/2013

    [Resolvido]Copiar e Colar com Condição

    Mensagem  Jeferson de Paula em 19/7/2013, 13:01

    Fala Galerinha,

    Tenho uma função VBA simples que copia dados de um formulário para outro formulário. No formulário "formEscala" possui a data e o município da filial, porém eu preciso escalar um funcionário para ir até a filial em um fim de semana exemplo: 03/08/2013 e 04/08/2013, mas não consigo fazer isso, quando eu clico no botão escalar que está no "formEscala" ele copia o código e o nome do funcionário do formulário "formFuncionarios" somente em uma data exemplo: 03/08/2013 e 04/08/2013 fica em branco. Alguém pode me ajudar?

    Vale lembrar que as vezes o mesmo vai no meio da semana, depende da data criada na tabela para a filial. Por exemplo, se possível fazer ele somar ("03/08/2013 + 1") para não haver problemas.

    Está em anexo no link abaixo parte do banco de dados, o mesmo usado no tópico anterior do JPaulo (Condição com Not Exists - VBA) de comparação de datas.

    Download do Banco de Dados


    .................................................................................
    Atenciosamente
    Aldo Jeferson de Paula
    Blog Support SQL Server
    Fórum Support SQL Server

    Quem nunca ouviu alguém falando mal do Microsoft® Access? Compartilhe suas experiências e conhecimentos, clique aqui e faça seu comentário!

    Tópicos Recomendáveis
    > Kit Geográfico 2013
    > Novo na Programação do Access?
    > Curso de Access/VBA Completo
    > Conceitos Básicos em T-SQL
    avatar
    HARYSOHN
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 12230
    Registrado : 01/03/2011

    Re: [Resolvido]Copiar e Colar com Condição

    Mensagem  HARYSOHN em 6/9/2013, 17:04

    Como anda esta solução amigão?

    Cumprimentos.


    .................................................................................
    PILOTO
    الله أكبر Paz, Justiça e Liberdade! الله أكبر
    CLIQUE AQUI E VEJA O VÍDEO >>> BIOMETRIA EM ACCESS

    Iniciando no Access? Então veja esse tópico e também esse


    BUSCA NO FÓRUM - CLIQUE AQUI!!!

    Quando tua dúvida for RESOLVIDA, dê retorno com AGRADECIMENTO a aqueles que gastaram seu tempo em te ajudar.
    Clique no botão Resolvido logo acima do botão Enviar, do lado direito. Todos nós agradecemos.  
    [Você precisa estar registrado e conectado para ver esta imagem.]
    avatar
    HARYSOHN
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 12230
    Registrado : 01/03/2011

    Re: [Resolvido]Copiar e Colar com Condição

    Mensagem  HARYSOHN em 6/9/2013, 18:33

    Se ainda não resolveu ai vai:

    Crie um módulo e o nomeie de mdlVarGlobais, neste:
    Public StrNome as string
    Public strID as string

    No frmEscala no evento ao receber foco da caixa texto txtNomeFuncionario:

    Private Sub txtNomeDoFuncionario_GotFocus()
    Dim rs As DAO.Recordset
    Dim X As Integer
    Set rs = Me.RecordsetClone


    For X = 1 To rs.RecordCount
    Me.txtNomeDoFuncionario = strNome
    Me.CodFuncionario = strId
    DoCmd.GoToRecord , , acNext
    MsgBox rs.AbsolutePosition
    Next X

    End Sub


    No botão Escalar do frmFuncionarios:

    Private Sub Escalar_Click()
        strId = Me.CodFuncionario
        strNome = Me.NomeFuncionario
        Forms!formEscala!txtNomeDoFuncionario.SetFocus
    End Sub



    Cumprimentos.


    .................................................................................
    PILOTO
    الله أكبر Paz, Justiça e Liberdade! الله أكبر
    CLIQUE AQUI E VEJA O VÍDEO >>> BIOMETRIA EM ACCESS

    Iniciando no Access? Então veja esse tópico e também esse


    BUSCA NO FÓRUM - CLIQUE AQUI!!!

    Quando tua dúvida for RESOLVIDA, dê retorno com AGRADECIMENTO a aqueles que gastaram seu tempo em te ajudar.
    Clique no botão Resolvido logo acima do botão Enviar, do lado direito. Todos nós agradecemos.  
    [Você precisa estar registrado e conectado para ver esta imagem.]
    avatar
    Jeferson de Paula
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 364
    Registrado : 06/04/2013

    Re: [Resolvido]Copiar e Colar com Condição

    Mensagem  Jeferson de Paula em 7/9/2013, 18:52

    Olá amigo PILOTO,

    Ainda não resolvi não, obrigado pela dica, estarei retornando para o serviço na segunda-feira, vou tentar o que sugeriu na mensagem anterior e então darei um retorno, ok? Muito obrigado pela ajuda!


    .................................................................................
    Atenciosamente
    Aldo Jeferson de Paula
    Blog Support SQL Server
    Fórum Support SQL Server

    Quem nunca ouviu alguém falando mal do Microsoft® Access? Compartilhe suas experiências e conhecimentos, clique aqui e faça seu comentário!

    Tópicos Recomendáveis
    > Kit Geográfico 2013
    > Novo na Programação do Access?
    > Curso de Access/VBA Completo
    > Conceitos Básicos em T-SQL
    avatar
    Jeferson de Paula
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 364
    Registrado : 06/04/2013

    Re: [Resolvido]Copiar e Colar com Condição

    Mensagem  Jeferson de Paula em 9/9/2013, 07:37

    Então amigo PILOTO,

    Tentei fazer o que sugeriu mas não deu certo! Segue em anexo o exemplo com as alterações...

    Download do Exemplo

    Desde já agradeço a ajuda!


    .................................................................................
    Atenciosamente
    Aldo Jeferson de Paula
    Blog Support SQL Server
    Fórum Support SQL Server

    Quem nunca ouviu alguém falando mal do Microsoft® Access? Compartilhe suas experiências e conhecimentos, clique aqui e faça seu comentário!

    Tópicos Recomendáveis
    > Kit Geográfico 2013
    > Novo na Programação do Access?
    > Curso de Access/VBA Completo
    > Conceitos Básicos em T-SQL
    avatar
    HARYSOHN
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 12230
    Registrado : 01/03/2011

    Re: [Resolvido]Copiar e Colar com Condição

    Mensagem  HARYSOHN em 9/9/2013, 09:01

    Eis:


    Cumprimentos.
    Anexos
    ExemploEscala.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (35 Kb) Baixado 49 vez(es)


    .................................................................................
    PILOTO
    الله أكبر Paz, Justiça e Liberdade! الله أكبر
    CLIQUE AQUI E VEJA O VÍDEO >>> BIOMETRIA EM ACCESS

    Iniciando no Access? Então veja esse tópico e também esse


    BUSCA NO FÓRUM - CLIQUE AQUI!!!

    Quando tua dúvida for RESOLVIDA, dê retorno com AGRADECIMENTO a aqueles que gastaram seu tempo em te ajudar.
    Clique no botão Resolvido logo acima do botão Enviar, do lado direito. Todos nós agradecemos.  
    [Você precisa estar registrado e conectado para ver esta imagem.]
    avatar
    Jeferson de Paula
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 364
    Registrado : 06/04/2013

    Re: [Resolvido]Copiar e Colar com Condição

    Mensagem  Jeferson de Paula em 9/9/2013, 09:19

    Sim está correto! Mas, o problema é que o funcionário só pode ir em uma Filial em um Fim de Semana... Exemplo: No Município da Filial de São Paulo, dia 03/08/2013 e 04/08/2013 Funcionário (José Sobrinho do Paulo); No Município da Filial de São Paulo - SP 10/08/2013 e 11/08/2013 Funcionário diferente (Manuel Primo do José).

    Funciona +/- assim... o nome do funcionário tem que estar no município x entre a data do fim de semana... Sab - 03/08/2013 e Dom - 04/08/2013...

    Cumprimentos!


    .................................................................................
    Atenciosamente
    Aldo Jeferson de Paula
    Blog Support SQL Server
    Fórum Support SQL Server

    Quem nunca ouviu alguém falando mal do Microsoft® Access? Compartilhe suas experiências e conhecimentos, clique aqui e faça seu comentário!

    Tópicos Recomendáveis
    > Kit Geográfico 2013
    > Novo na Programação do Access?
    > Curso de Access/VBA Completo
    > Conceitos Básicos em T-SQL
    avatar
    HARYSOHN
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 12230
    Registrado : 01/03/2011

    Re: [Resolvido]Copiar e Colar com Condição

    Mensagem  HARYSOHN em 9/9/2013, 14:35

    Lance um modelo dos dados manualmente no form.. e mmande um print explicativo.

    Cumprimentos.


    .................................................................................
    PILOTO
    الله أكبر Paz, Justiça e Liberdade! الله أكبر
    CLIQUE AQUI E VEJA O VÍDEO >>> BIOMETRIA EM ACCESS

    Iniciando no Access? Então veja esse tópico e também esse


    BUSCA NO FÓRUM - CLIQUE AQUI!!!

    Quando tua dúvida for RESOLVIDA, dê retorno com AGRADECIMENTO a aqueles que gastaram seu tempo em te ajudar.
    Clique no botão Resolvido logo acima do botão Enviar, do lado direito. Todos nós agradecemos.  
    [Você precisa estar registrado e conectado para ver esta imagem.]
    avatar
    Jeferson de Paula
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 364
    Registrado : 06/04/2013

    Re: [Resolvido]Copiar e Colar com Condição

    Mensagem  Jeferson de Paula em 9/9/2013, 15:04

    Segue em anexo o Print... Baixar Exemplo!

    Cumprimentos!


    .................................................................................
    Atenciosamente
    Aldo Jeferson de Paula
    Blog Support SQL Server
    Fórum Support SQL Server

    Quem nunca ouviu alguém falando mal do Microsoft® Access? Compartilhe suas experiências e conhecimentos, clique aqui e faça seu comentário!

    Tópicos Recomendáveis
    > Kit Geográfico 2013
    > Novo na Programação do Access?
    > Curso de Access/VBA Completo
    > Conceitos Básicos em T-SQL
    avatar
    Jeferson de Paula
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 364
    Registrado : 06/04/2013

    Re: [Resolvido]Copiar e Colar com Condição

    Mensagem  Jeferson de Paula em 11/9/2013, 12:36

    E então amigo PILOTO, conseguiu entender o raciocínio?

    Cumprimentos!

    Este tópico o ajudou? Agradecer não custa nada e ainda nos motiva a continuar lhe ajudando. Então que tal dar um joinha [Você precisa estar registrado e conectado para ver esta imagem.]?


    .................................................................................
    Atenciosamente
    Aldo Jeferson de Paula
    Blog Support SQL Server
    Fórum Support SQL Server

    Quem nunca ouviu alguém falando mal do Microsoft® Access? Compartilhe suas experiências e conhecimentos, clique aqui e faça seu comentário!

    Tópicos Recomendáveis
    > Kit Geográfico 2013
    > Novo na Programação do Access?
    > Curso de Access/VBA Completo
    > Conceitos Básicos em T-SQL
    avatar
    HARYSOHN
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 12230
    Registrado : 01/03/2011

    Re: [Resolvido]Copiar e Colar com Condição

    Mensagem  HARYSOHN em 31/10/2013, 20:58

    Como anda este tópico amigão?

    Cumprimentos.


    .................................................................................
    PILOTO
    الله أكبر Paz, Justiça e Liberdade! الله أكبر
    CLIQUE AQUI E VEJA O VÍDEO >>> BIOMETRIA EM ACCESS

    Iniciando no Access? Então veja esse tópico e também esse


    BUSCA NO FÓRUM - CLIQUE AQUI!!!

    Quando tua dúvida for RESOLVIDA, dê retorno com AGRADECIMENTO a aqueles que gastaram seu tempo em te ajudar.
    Clique no botão Resolvido logo acima do botão Enviar, do lado direito. Todos nós agradecemos.  
    [Você precisa estar registrado e conectado para ver esta imagem.]
    avatar
    Jeferson de Paula
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 364
    Registrado : 06/04/2013

    Re: [Resolvido]Copiar e Colar com Condição

    Mensagem  Jeferson de Paula em 5/11/2013, 09:59

    Do mesmo jeito... Ainda não consegui nada!

    Cumprimentos!

    Este tópico o ajudou? Agradecer não custa nada e ainda nos motiva a continuar lhe ajudando. Então que tal dar um joinha [Você precisa estar registrado e conectado para ver esta imagem.]?


    .................................................................................
    Atenciosamente
    Aldo Jeferson de Paula
    Blog Support SQL Server
    Fórum Support SQL Server

    Quem nunca ouviu alguém falando mal do Microsoft® Access? Compartilhe suas experiências e conhecimentos, clique aqui e faça seu comentário!

    Tópicos Recomendáveis
    > Kit Geográfico 2013
    > Novo na Programação do Access?
    > Curso de Access/VBA Completo
    > Conceitos Básicos em T-SQL
    avatar
    HARYSOHN
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 12230
    Registrado : 01/03/2011

    Re: [Resolvido]Copiar e Colar com Condição

    Mensagem  HARYSOHN em 5/11/2013, 11:25

    Reaviva-me a memória...
    O que está faltando ainda?

    Mande a explicação e o modelo atual

    Cumprimentos.


    Última edição por HARYSOHN em 1/2/2014, 05:40, editado 1 vez(es) (Razão : Tópico dado como resolvido por falta de resposta)


    .................................................................................
    PILOTO
    الله أكبر Paz, Justiça e Liberdade! الله أكبر
    CLIQUE AQUI E VEJA O VÍDEO >>> BIOMETRIA EM ACCESS

    Iniciando no Access? Então veja esse tópico e também esse


    BUSCA NO FÓRUM - CLIQUE AQUI!!!

    Quando tua dúvida for RESOLVIDA, dê retorno com AGRADECIMENTO a aqueles que gastaram seu tempo em te ajudar.
    Clique no botão Resolvido logo acima do botão Enviar, do lado direito. Todos nós agradecemos.  
    [Você precisa estar registrado e conectado para ver esta imagem.]

      Data/hora atual: 26/6/2017, 13:18