InícioOlá, bom dia, preciso de uma ajuda, tenho um formulário que tem um campo "DATA" e outro "Dia da semana", como faço para que ao digitar a data, retorne no campo "dia da semana" o nome do dia da semana por extenso: Exemplo DATA: 30/05/2017 Dia da semana: Terça-feira. Desde já agradeço se alguém me ajudar. Bom semana a todos.
3 participantes
[Resolvido]Retornar "dia da semana" por extenso a partir de uma data
STRS2005- Novato
- Respeito às regras :
Sexo :
Localização :
Mensagens : 10
Registrado : 16/11/2015
- Mensagem nº1
![[Resolvido]Retornar "dia da semana" por extenso a partir de uma data Empty](https://2img.net/i/empty.gif)
[Resolvido]Retornar "dia da semana" por extenso a partir de uma data
STRS2005 30/5/2017, 15:06
JPaulo- Moderador
- Respeito às regras :
Sexo :
Localização :
Mensagens : 11026
Registrado : 04/11/2009
- Mensagem nº2
Re: [Resolvido]Retornar "dia da semana" por extenso a partir de uma data
JPaulo 30/5/2017, 15:20
Ola;
- Código:
Private Sub SeuCampoData_AfterUpdate()
Me.SeuCampoDiaExtenso.Value = WeekdayName(Weekday(Me.SeuCampoData))
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]Retornar "dia da semana" por extenso a partir de uma data Folder_announce_new](https://2img.net/i/fa/subsilver/folder_announce_new.gif)
Utilize o Sistema de Busca do Fórum... 102 Códigos VBA Gratuitos... Instruções SQL como utilizar...
STRS2005- Novato
- Respeito às regras :
Sexo :
Localização :
Mensagens : 10
Registrado : 16/11/2015
Olá, obrigado pela atenção, sou um pouco crú em access, poderia por gentileza incrementar este evento pra mim, segue o arquivo em anexo
- Anexos
![[Resolvido]Retornar "dia da semana" por extenso a partir de uma data Attachment](https://2img.net/i/fa/attachment.png)
output.zip - Tentei incrementar o campo data mas devo ter cometido algum erro, se puder me ajudar ficarei grato.
- Você não tem permissão para fazer download dos arquivos anexados.
- (920 Kb) Baixado 30 vez(es)
JPaulo- Moderador
- Respeito às regras :
Sexo :
Localização :
Mensagens : 11026
Registrado : 04/11/2009
- Mensagem nº4
Re: [Resolvido]Retornar "dia da semana" por extenso a partir de uma data
JPaulo 31/5/2017, 09:35
Ola bom dia !
Introduza a data e bata Enter;
Download
Introduza a data e bata Enter;
Download
.................................................................................
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
Utilize o Sistema de Busca do Fórum... 102 Códigos VBA Gratuitos... Instruções SQL como utilizar...
STRS2005- Novato
- Respeito às regras :
Sexo :
Localização :
Mensagens : 10
Registrado : 16/11/2015
Amigo, realmente eu fico muito agradecido, era isso mesmo que eu precisava, muito obrigado mesmo 
JPaulo- Moderador
- Respeito às regras :
Sexo :
Localização :
Mensagens : 11026
Registrado : 04/11/2009
- Mensagem nº6
Re: [Resolvido]Retornar "dia da semana" por extenso a partir de uma data
JPaulo 31/5/2017, 12:37
Obrigado pelo retorno o forum agradece.
.................................................................................
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
Utilize o Sistema de Busca do Fórum... 102 Códigos VBA Gratuitos... Instruções SQL como utilizar...
paulopeixoto- Novato
- Respeito às regras :
Sexo :
Localização :
Mensagens : 5
Registrado : 24/10/2018
- Mensagem nº7
Retornar "dia da semana" por extenso a partir de uma data
paulopeixoto 30/11/2022, 23:33
Boa noite, tenho dois campos: texto data e texto dia da semana.
ao digitar a data me aparece o dia da semana como vcs ensinaram.
só que o dia da semana não consigo salvar na tabela?
Peço ajuda. Muito obrigado.
Private Sub SeuCampoData_AfterUpdate()
Me.SeuCampoDiaExtenso.Value = WeekdayName(Weekday(Me.SeuCampoData))
End Sub
ao digitar a data me aparece o dia da semana como vcs ensinaram.
só que o dia da semana não consigo salvar na tabela?
Peço ajuda. Muito obrigado.
Private Sub SeuCampoData_AfterUpdate()
Me.SeuCampoDiaExtenso.Value = WeekdayName(Weekday(Me.SeuCampoData))
End Sub
Conteúdo patrocinado
- Mensagem nº8
Re: [Resolvido]Retornar "dia da semana" por extenso a partir de uma data
Conteúdo patrocinado