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 : 112
    Registrado : 05/04/2016

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

    Mensagem  Luís Antunes em Sex 01 Set 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 : 3417
    Registrado : 14/08/2013

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

    Mensagem  FabioPaes em Sab 02 Set 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 : 112
    Registrado : 05/04/2016

    Início do mês retirado de uma combox

    Mensagem  Luís Antunes em Sab 02 Set 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 3 vez(es)


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

    Respeito às Regras 100%

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

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

    Mensagem  FabioPaes em Sab 02 Set 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 : 112
    Registrado : 05/04/2016

    Início do mês retirado de uma combox

    Mensagem  Luís Antunes em Sab 02 Set 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 : 3417
    Registrado : 14/08/2013

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

    Mensagem  FabioPaes em Dom 03 Set 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 : 112
    Registrado : 05/04/2016

    Início do mês retirado de uma combox

    Mensagem  Luís Antunes em Dom 03 Set 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 : 3417
    Registrado : 14/08/2013

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

    Mensagem  FabioPaes em Seg 04 Set 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 : 112
    Registrado : 05/04/2016

    Início do mês retirado de uma combox

    Mensagem  Luís Antunes em Seg 04 Set 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 : 3417
    Registrado : 14/08/2013

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

    Mensagem  FabioPaes em Seg 04 Set 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: Ter 21 Nov 2017, 17:39