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] Atualizar campos de data e hora a partir de caixa de combinação

    julianovv
    julianovv
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 686
    Registrado : 14/12/2010

    [Resolvido] Atualizar campos de data e hora a partir de caixa de combinação Empty [Resolvido] Atualizar campos de data e hora a partir de caixa de combinação

    Mensagem  julianovv 20/11/2012, 15:59

    Boa tarde pessoal. Tenho um formulário pop-up com uma caixa de combinação (combox) de status (em andamento, cancelado, finalizado). No mesmo formulário tem dois campos de data e hora (fechamento_data e fechamento_hora).
    Quando o usuário escolhe "finalizado" na lista, esses dois campos de data e hora precisam atualizar a data e hora atuais, senão devem ficar em branco.
    Se o usuário escolher "em andamento", os dois campos devem ficar em branco.
    Tentei esse código mas fica dando erro.
    Alguém sabe onde estou errando?

    If Forms!Frm_PopEditarChamado!cbStatus = "finalizado" Then
    Me.fechamento_data = Date
    Me.fechamento_hora = Now()
    Else
    Forms![Frm_PopEditarChamado].[cbStatus]=""


    End If
    End Sub


    Obrigado!
    Rolling Eyes


    Última edição por julianovv em 3/4/2013, 12:43, editado 1 vez(es)


    .................................................................................
    Juliano

    USO O ACCESS 2007 NO XP SP3
    Pentil 4 Duo Core 2 - 3.2 ghz - HD 250 GB ATA II - Placa Asus P5QPL-AM - 2 GB de memória DDR2 667 mhz Kingston - NVidia GForce GT 370 - Monitor AOC 24 pol G2HE524G2 - Impressora Epson T33 - Scanner Bright.
    Smile
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido] Atualizar campos de data e hora a partir de caixa de combinação Empty Re: [Resolvido] Atualizar campos de data e hora a partir de caixa de combinação

    Mensagem  JPaulo 20/11/2012, 16:10



    Select Case SuaCombobox
    Case "finalizado"
    Me.fechamento_data = Date
    Me.fechamento_hora = Now()
    Case "andamento"
    'faz outra coisa
    Case "cancelado"
    'faz outra coisa
    End Select



    .................................................................................
    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] Atualizar campos de data e hora a partir de caixa de combinação Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido] Atualizar campos de data e hora a partir de caixa de combinação Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido] Atualizar campos de data e hora a partir de caixa de combinação Folder_announce_new Instruções SQL como utilizar...
    julianovv
    julianovv
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 686
    Registrado : 14/12/2010

    [Resolvido] Atualizar campos de data e hora a partir de caixa de combinação Empty Res: Atualizar campos de data e hora a partir de caixa de combinação

    Mensagem  julianovv 20/11/2012, 18:05

    Obrigado JPaulo. Não deu certo. Não houve alteração em nenhum dos itens escolhidos na lista. E também não veio mensagem de erro.

    Rolling Eyes


    .................................................................................
    Juliano

    USO O ACCESS 2007 NO XP SP3
    Pentil 4 Duo Core 2 - 3.2 ghz - HD 250 GB ATA II - Placa Asus P5QPL-AM - 2 GB de memória DDR2 667 mhz Kingston - NVidia GForce GT 370 - Monitor AOC 24 pol G2HE524G2 - Impressora Epson T33 - Scanner Bright.
    Smile
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido] Atualizar campos de data e hora a partir de caixa de combinação Empty Re: [Resolvido] Atualizar campos de data e hora a partir de caixa de combinação

    Mensagem  JPaulo 20/11/2012, 20:04

    Tem de verificar em que coluna da sua combo está esse "finalizado" e os outros;

    Select Case Me.SuaCombobox.Column(0)


    .................................................................................
    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] Atualizar campos de data e hora a partir de caixa de combinação Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido] Atualizar campos de data e hora a partir de caixa de combinação Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido] Atualizar campos de data e hora a partir de caixa de combinação Folder_announce_new Instruções SQL como utilizar...
    julianovv
    julianovv
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 686
    Registrado : 14/12/2010

    [Resolvido] Atualizar campos de data e hora a partir de caixa de combinação Empty Res: Atualizar campos de data e hora a partir de caixa de combinação

    Mensagem  julianovv 21/11/2012, 10:50

    Bom dia. Obrigado, deu certo mas agora eu queria adicionar mais um item no código.
    A escolha na lista de "em andamento" e "cancelado" gostaria que os campos data e hora ficassem em branco se já existir data e hora neles, ou seja se o registro for reaberto depois de finalizado..
    Segue o código que estou usando:

    Select Case Me.cbStatus.Column(1)
    Case "finalizado"
    Me.fechamento_data = Date
    Me.fechamento_hora = Now()
    Case "andamento"
    'faz outra coisa
    Case "cancelado"
    'faz outra coisa
    End Select
    End Sub


    Obrigado!
    Wink


    .................................................................................
    Juliano

    USO O ACCESS 2007 NO XP SP3
    Pentil 4 Duo Core 2 - 3.2 ghz - HD 250 GB ATA II - Placa Asus P5QPL-AM - 2 GB de memória DDR2 667 mhz Kingston - NVidia GForce GT 370 - Monitor AOC 24 pol G2HE524G2 - Impressora Epson T33 - Scanner Bright.
    Smile
    julianovv
    julianovv
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 686
    Registrado : 14/12/2010

    [Resolvido] Atualizar campos de data e hora a partir de caixa de combinação Empty Res: Atualizar campos de data e hora a partir de caixa de combinação

    Mensagem  julianovv 22/11/2012, 17:08

    Obrigado. Faltou limpar os campos quando é escolhido 'em andamento' ou 'cancelado'.

    Wink


    .................................................................................
    Juliano

    USO O ACCESS 2007 NO XP SP3
    Pentil 4 Duo Core 2 - 3.2 ghz - HD 250 GB ATA II - Placa Asus P5QPL-AM - 2 GB de memória DDR2 667 mhz Kingston - NVidia GForce GT 370 - Monitor AOC 24 pol G2HE524G2 - Impressora Epson T33 - Scanner Bright.
    Smile

    Conteúdo patrocinado


    [Resolvido] Atualizar campos de data e hora a partir de caixa de combinação Empty Re: [Resolvido] Atualizar campos de data e hora a partir de caixa de combinação

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 6/12/2024, 16:41