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]Início do mês retirado de uma combox

    Compartilhe

    Luís Antunes
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 173
    Registrado : 05/04/2016

    [Resolvido]Início do mês retirado de uma combox

    Mensagem  Luís Antunes em 1/9/2017, 23:17

    Me perdoem voltar à carga!
    Tenho um campo de texto no form que queria que aceitasse o início do mês referente à combox onde escolho o Mês Pretendido.
    Fiz uma bd com o exemplo da minha questão.
    Grato pela vossa disponibilidade

    Luís Antunes
    Anexos
    InicioMês.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (38 Kb) Baixado 8 vez(es)
    avatar
    FabioPaes
    Moderador
    Moderador

    Respeito às Regras 100%

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

    Re: [Resolvido]Início do mês retirado de uma combox

    Mensagem  FabioPaes em 2/9/2017, 03:41

    Olá, sua duvida ficou mau explicada!

    Porém, acredito que sei que prentende.


    Se o que pretende é selecionar um Mes na combo mes, e ja preencher o inicio e o Fim do mes em seus respectivos campos, faça assim:


    No Evento apos atualizar da sua campo comb_Mês coloque:

    Private Sub comb_Mês_AfterUpdate()

    Me.txt_DataInicial = "01/" & Format(Me.comb_Mês, "mm") & "/" & Format(Date, "yyyy")
    Me.txt_DataFinal = FinalMes(Me.txt_DataInicial)

    End Sub


    ==> Corrija a opção "Novembro" da sua combo, pois esta escrito errado:  "Setetembro"


    .................................................................................
    _____________________________________________________________________
    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!

    Luís Antunes
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 173
    Registrado : 05/04/2016

    Início do mês retirado de uma combox

    Mensagem  Luís Antunes em 2/9/2017, 10:59

    Fábio.
    O código funciona só para o ano presente, não serve para anos anteriores. Foi erro meu não ter junto, ao anterior exemplo, combox do ano, Anexo um novo exemplo BD.
    quanto à formatação da data, funciona neste exemplo que envio, tenho que perceber porque não dá no meu projecto.
    Obrigado pela atenção.

    Luís Antunes
    Anexos
    InicioMês .zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (39 Kb) Baixado 4 vez(es)


    Última edição por Luís Antunes em 3/9/2017, 02:12, editado 1 vez(es)
    avatar
    FabioPaes
    Moderador
    Moderador

    Respeito às Regras 100%

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

    Re: [Resolvido]Início do mês retirado de uma combox

    Mensagem  FabioPaes em 2/9/2017, 17:36

    O formato é "mmm".
    Tente e retorne.


    .................................................................................
    _____________________________________________________________________
    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!

    Luís Antunes
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 173
    Registrado : 05/04/2016

    Início do mês retirado de uma combox

    Mensagem  Luís Antunes em 2/9/2017, 23:03

    Olá Fábio
    Já fiz a experiência com "vazio", "m", "mm", "mmm" e "mmmm". O resultado é sempre o mesmo, isto é: aparece sempre o Mês por extenso.
    Se não hover solução fica mesmo assim.
    Mais uma vez fico-lhe grato.
    Luís Antunes
    avatar
    FabioPaes
    Moderador
    Moderador

    Respeito às Regras 100%

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

    Re: [Resolvido]Início do mês retirado de uma combox

    Mensagem  FabioPaes em 3/9/2017, 02:07

    Amigo, agora foi que nao entendi mais nada 

    Qual e mesmo a forma de data que quer que apaeça?

    Pode colocar direto no campo, propriedade, guia formato. Escolha data no formato que pretente. ..


    .................................................................................
    _____________________________________________________________________
    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!

    Luís Antunes
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 173
    Registrado : 05/04/2016

    Início do mês retirado de uma combox

    Mensagem  Luís Antunes em 3/9/2017, 02:18

    Fábio
    Editei a mensagem e alterei-a, não devia te-lo feito,  veja-a mensagem nº 3
    avatar
    FabioPaes
    Moderador
    Moderador

    Respeito às Regras 100%

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

    Re: [Resolvido]Início do mês retirado de uma combox

    Mensagem  FabioPaes em 4/9/2017, 13:40

    Meu amigo, sempre que tiver uma duvida, poste-a completa! Assim agiliza a resolução dele e evita trabalho perdido!

    Esqueça as dicas postadas anteriormente, e siga essa:

    Coloque no evento apos atualizar da sua combo Ano "cbo_Ano"

    Private Sub cbo_Ano_AfterUpdate()

    Me.txtDataInicial = "01/" & Format(Me.cbo_Mês, "mm") & "/" & Me.cbo_ano 'Format(Me.cbo_ano, "yyyy")
    Me.txtDataFinal = FinalMes(Me.txtDataInicial)

    End Sub



    .................................................................................
    _____________________________________________________________________
    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!

    Luís Antunes
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 173
    Registrado : 05/04/2016

    Início do mês retirado de uma combox

    Mensagem  Luís Antunes em 4/9/2017, 16:03

    Boa Tarde Fábio.
    Desculpe-me a trapalhada que causei. Para a próxima vou ter mais cuidado a expor as minhas mensagens e anexos.
    Um muito obrigado pelo tempo e disponibilidade.

    Luís Antunes

    PS O código serviu lindamente. Vou dar o tema como encerrado.
    avatar
    FabioPaes
    Moderador
    Moderador

    Respeito às Regras 100%

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

    Re: [Resolvido]Início do mês retirado de uma combox

    Mensagem  FabioPaes em 4/9/2017, 19:42

    Grato pelo retorno amigo! Até aproxima se Deus quiser!


    .................................................................................
    _____________________________________________________________________
    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!

      Data/hora atual: 23/9/2018, 00:15