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]Copiar Nome funcionário para dois subformulários

    Silvio
    Silvio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 5077
    Registrado : 20/04/2011

    [Resolvido]Copiar Nome funcionário para dois subformulários Empty Copiar Nome funcionário para dois subformulários

    Mensagem  Silvio 13/8/2012, 15:11

    Prezados colegas, bom dia a todos.

    Emperrei aqui numa duvida.

    Como fazer para copiar o nome do funcionário para dois subformulários ao mesmo tempo ? e depois disso, acrescentar registros nesses sub´s.

    Em tempo, ao abrir o cadastro, apenas a combox, estará habilitada. Terá que escolher um funcionário e depois clicar em alterar.

    Segue projeto em anexo.

    Desde já agradeço a todos.



    .................................................................................
    Caso tenha resolvido a tua duvida, coloque o tópico como resolvido.
    www.maximoaccess.com/t860-resolucao-de-topicos

    "Quase tudo é possível quando se tem determinação e força de vontade. Não desista tão rápido."
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 11016
    Registrado : 04/11/2009

    [Resolvido]Copiar Nome funcionário para dois subformulários Empty Re: [Resolvido]Copiar Nome funcionário para dois subformulários

    Mensagem  JPaulo 13/8/2012, 15:32

    Não será assim ?

    Ou não entendi direito;



    Private Sub cbofuncionario_AfterUpdate()
    DoCmd.ApplyFilter , "idfuncionario = " & Me!cbofuncionario.Column(0) ' é necessario criar uma consulta simples antes,depois criar a combo 'idcliente chave primaria,

    Me!cbofuncionario = Null 'deixa a combo vazia, limpa.

    Me!Filho66.Form!NomeFuncionario = Me.Nome.Value
    Me!Filho73.Form!NomeFuncionario = Me.Nome.Value

    End Sub



    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Resolvido]Copiar Nome funcionário para dois subformulários Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Copiar Nome funcionário para dois subformulários Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Copiar Nome funcionário para dois subformulários Folder_announce_new Instruções SQL como utilizar...
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 11016
    Registrado : 04/11/2009

    [Resolvido]Copiar Nome funcionário para dois subformulários Empty Re: [Resolvido]Copiar Nome funcionário para dois subformulários

    Mensagem  JPaulo 13/8/2012, 15:47

    Será atualizar os subs na hora de digitar ?

    Assim ????


    Private Sub Nome_Change()
    DoCmd.RunCommand acCmdSaveRecord
    Me!Filho66.Form!NomeFuncionario = Me.Nome.Value
    Me!Filho73.Form!NomeFuncionario = Me.Nome.Value
    Me!Filho66.Form.Refresh
    Me!Filho73.Form.Refresh
    End Sub


    Anexos
    [Resolvido]Copiar Nome funcionário para dois subformulários Attachmentcadastro_Silvio.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (50 Kb) Baixado 67 vez(es)


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Resolvido]Copiar Nome funcionário para dois subformulários Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Copiar Nome funcionário para dois subformulários Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Copiar Nome funcionário para dois subformulários Folder_announce_new Instruções SQL como utilizar...
    Silvio
    Silvio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 5077
    Registrado : 20/04/2011

    [Resolvido]Copiar Nome funcionário para dois subformulários Empty Re: [Resolvido]Copiar Nome funcionário para dois subformulários

    Mensagem  Silvio 13/8/2012, 15:56

    Boa tarde JPaulo.

    Sempre solicito em ajudar. A ideia é criar um cadastro básico de funcionários e ao mesmo tempo, servir de consulta para quem realiza o cadastro.

    A tua mensagem três é a correta. Porém descobri que esse micro que estou, esta com problemas dentro do Win 7, pois alguns comandos do Access, simplesmente deixaram de funfar ( botões, subformulários, lisbox)...vou ter que formatar o mesmo.

    Agradeço a tua ajuda.

    Abraços.


    .................................................................................
    Caso tenha resolvido a tua duvida, coloque o tópico como resolvido.
    www.maximoaccess.com/t860-resolucao-de-topicos

    "Quase tudo é possível quando se tem determinação e força de vontade. Não desista tão rápido."
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 11016
    Registrado : 04/11/2009

    [Resolvido]Copiar Nome funcionário para dois subformulários Empty Re: [Resolvido]Copiar Nome funcionário para dois subformulários

    Mensagem  JPaulo 13/8/2012, 16:07

    Obrigado pelo retorno.

    Veja se não é as seguranças de macro.


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Resolvido]Copiar Nome funcionário para dois subformulários Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Copiar Nome funcionário para dois subformulários Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Copiar Nome funcionário para dois subformulários Folder_announce_new Instruções SQL como utilizar...
    Silvio
    Silvio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 5077
    Registrado : 20/04/2011

    [Resolvido]Copiar Nome funcionário para dois subformulários Empty Re: [Resolvido]Copiar Nome funcionário para dois subformulários

    Mensagem  Silvio 13/8/2012, 17:02

    Já olhei, é como não tivesse nada.. foi depois de instalar aqui o MsWorks 9(em inglês) para uns testes para um cliente.

    Mexeu com um monte de coisas, macros do Excell, formulários do word...creio que meu colega que compartilha o micro comigo, melou em algo durante a instalação.

    Ainda bem que esse micro aqui é usado apenas para alguns testes.

    Abraços.


    .................................................................................
    Caso tenha resolvido a tua duvida, coloque o tópico como resolvido.
    www.maximoaccess.com/t860-resolucao-de-topicos

    "Quase tudo é possível quando se tem determinação e força de vontade. Não desista tão rápido."

    Conteúdo patrocinado


    [Resolvido]Copiar Nome funcionário para dois subformulários Empty Re: [Resolvido]Copiar Nome funcionário para dois subformulários

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 8/5/2024, 20:00