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 Sex 19 Jul 2013 - 17: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 ([Você precisa estar registrado e conectado para ver este link.]) de comparação de datas.

    [Você precisa estar registrado e conectado para ver este link.]


    .................................................................................
    Atenciosamente
    Aldo Jeferson de Paula
    [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver este link.]

    Quem nunca ouviu alguém falando mal do Microsoft[Você precisa estar registrado e conectado para ver esta imagem.] Access? Compartilhe suas experiências e conhecimentos, [Você precisa estar registrado e conectado para ver este link.] e faça seu comentário!

    Tópicos Recomendáveis
    > [Você precisa estar registrado e conectado para ver este link.]
    > [Você precisa estar registrado e conectado para ver este link.]
    > [Você precisa estar registrado e conectado para ver este link.]
    > [Você precisa estar registrado e conectado para ver este link.]
    avatar
    HARYSOHN
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

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

    Mensagem  HARYSOHN em Sex 6 Set 2013 - 21:04

    Como anda esta solução amigão?

    Cumprimentos.


    .................................................................................
    PILOTO
    الله أكبر Paz, Justiça e Liberdade! الله أكبر
    [Você precisa estar registrado e conectado para ver este link.]

    Iniciando no Access? Então veja esse [Você precisa estar registrado e conectado para ver este link.] e também [Você precisa estar registrado e conectado para ver este link.]


    [Você precisa estar registrado e conectado para ver este link.]

    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 : 12233
    Registrado : 01/03/2011

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

    Mensagem  HARYSOHN em Sex 6 Set 2013 - 22: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! الله أكبر
    [Você precisa estar registrado e conectado para ver este link.]

    Iniciando no Access? Então veja esse [Você precisa estar registrado e conectado para ver este link.] e também [Você precisa estar registrado e conectado para ver este link.]


    [Você precisa estar registrado e conectado para ver este link.]

    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 Sab 7 Set 2013 - 22: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
    [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver este link.]

    Quem nunca ouviu alguém falando mal do Microsoft[Você precisa estar registrado e conectado para ver esta imagem.] Access? Compartilhe suas experiências e conhecimentos, [Você precisa estar registrado e conectado para ver este link.] e faça seu comentário!

    Tópicos Recomendáveis
    > [Você precisa estar registrado e conectado para ver este link.]
    > [Você precisa estar registrado e conectado para ver este link.]
    > [Você precisa estar registrado e conectado para ver este link.]
    > [Você precisa estar registrado e conectado para ver este link.]
    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 Seg 9 Set 2013 - 11:37

    Então amigo PILOTO,

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

    [Você precisa estar registrado e conectado para ver este link.]

    Desde já agradeço a ajuda!


    .................................................................................
    Atenciosamente
    Aldo Jeferson de Paula
    [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver este link.]

    Quem nunca ouviu alguém falando mal do Microsoft[Você precisa estar registrado e conectado para ver esta imagem.] Access? Compartilhe suas experiências e conhecimentos, [Você precisa estar registrado e conectado para ver este link.] e faça seu comentário!

    Tópicos Recomendáveis
    > [Você precisa estar registrado e conectado para ver este link.]
    > [Você precisa estar registrado e conectado para ver este link.]
    > [Você precisa estar registrado e conectado para ver este link.]
    > [Você precisa estar registrado e conectado para ver este link.]
    avatar
    HARYSOHN
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

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

    Mensagem  HARYSOHN em Seg 9 Set 2013 - 13:01

    Eis:


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


    .................................................................................
    PILOTO
    الله أكبر Paz, Justiça e Liberdade! الله أكبر
    [Você precisa estar registrado e conectado para ver este link.]

    Iniciando no Access? Então veja esse [Você precisa estar registrado e conectado para ver este link.] e também [Você precisa estar registrado e conectado para ver este link.]


    [Você precisa estar registrado e conectado para ver este link.]

    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 Seg 9 Set 2013 - 13: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
    [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver este link.]

    Quem nunca ouviu alguém falando mal do Microsoft[Você precisa estar registrado e conectado para ver esta imagem.] Access? Compartilhe suas experiências e conhecimentos, [Você precisa estar registrado e conectado para ver este link.] e faça seu comentário!

    Tópicos Recomendáveis
    > [Você precisa estar registrado e conectado para ver este link.]
    > [Você precisa estar registrado e conectado para ver este link.]
    > [Você precisa estar registrado e conectado para ver este link.]
    > [Você precisa estar registrado e conectado para ver este link.]
    avatar
    HARYSOHN
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

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

    Mensagem  HARYSOHN em Seg 9 Set 2013 - 18:35

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

    Cumprimentos.


    .................................................................................
    PILOTO
    الله أكبر Paz, Justiça e Liberdade! الله أكبر
    [Você precisa estar registrado e conectado para ver este link.]

    Iniciando no Access? Então veja esse [Você precisa estar registrado e conectado para ver este link.] e também [Você precisa estar registrado e conectado para ver este link.]


    [Você precisa estar registrado e conectado para ver este link.]

    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 Seg 9 Set 2013 - 19:04

    Segue em anexo o Print... [Você precisa estar registrado e conectado para ver este link.]

    Cumprimentos!


    .................................................................................
    Atenciosamente
    Aldo Jeferson de Paula
    [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver este link.]

    Quem nunca ouviu alguém falando mal do Microsoft[Você precisa estar registrado e conectado para ver esta imagem.] Access? Compartilhe suas experiências e conhecimentos, [Você precisa estar registrado e conectado para ver este link.] e faça seu comentário!

    Tópicos Recomendáveis
    > [Você precisa estar registrado e conectado para ver este link.]
    > [Você precisa estar registrado e conectado para ver este link.]
    > [Você precisa estar registrado e conectado para ver este link.]
    > [Você precisa estar registrado e conectado para ver este link.]
    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 Qua 11 Set 2013 - 16: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
    [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver este link.]

    Quem nunca ouviu alguém falando mal do Microsoft[Você precisa estar registrado e conectado para ver esta imagem.] Access? Compartilhe suas experiências e conhecimentos, [Você precisa estar registrado e conectado para ver este link.] e faça seu comentário!

    Tópicos Recomendáveis
    > [Você precisa estar registrado e conectado para ver este link.]
    > [Você precisa estar registrado e conectado para ver este link.]
    > [Você precisa estar registrado e conectado para ver este link.]
    > [Você precisa estar registrado e conectado para ver este link.]
    avatar
    HARYSOHN
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

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

    Mensagem  HARYSOHN em Sex 1 Nov 2013 - 0:58

    Como anda este tópico amigão?

    Cumprimentos.


    .................................................................................
    PILOTO
    الله أكبر Paz, Justiça e Liberdade! الله أكبر
    [Você precisa estar registrado e conectado para ver este link.]

    Iniciando no Access? Então veja esse [Você precisa estar registrado e conectado para ver este link.] e também [Você precisa estar registrado e conectado para ver este link.]


    [Você precisa estar registrado e conectado para ver este link.]

    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 Ter 5 Nov 2013 - 14: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
    [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver este link.]

    Quem nunca ouviu alguém falando mal do Microsoft[Você precisa estar registrado e conectado para ver esta imagem.] Access? Compartilhe suas experiências e conhecimentos, [Você precisa estar registrado e conectado para ver este link.] e faça seu comentário!

    Tópicos Recomendáveis
    > [Você precisa estar registrado e conectado para ver este link.]
    > [Você precisa estar registrado e conectado para ver este link.]
    > [Você precisa estar registrado e conectado para ver este link.]
    > [Você precisa estar registrado e conectado para ver este link.]
    avatar
    HARYSOHN
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

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

    Mensagem  HARYSOHN em Ter 5 Nov 2013 - 16: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 Sab 1 Fev 2014 - 10:40, editado 1 vez(es) (Razão : Tópico dado como resolvido por falta de resposta)


    .................................................................................
    PILOTO
    الله أكبر Paz, Justiça e Liberdade! الله أكبر
    [Você precisa estar registrado e conectado para ver este link.]

    Iniciando no Access? Então veja esse [Você precisa estar registrado e conectado para ver este link.] e também [Você precisa estar registrado e conectado para ver este link.]


    [Você precisa estar registrado e conectado para ver este link.]

    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: Seg 23 Out 2017 - 15:19