Vídeo recomendado
https://youtu.be/diWPPPhW-9E

DateAndTimePickerControl

Dúvidas gerais sobre Excel
Avatar do usuário
webmaster
Administrador
Mensagens: 3114
Registrado em: Sex Jul 24, 2009 2:44 pm
Contato:

Re: DateAndTimePickerControl

Mensagem por webmaster »

Jose,

Não fiz o teste. Pode enviar a planilha para dar uma olhada?


Disable adblock

This site is supported by ads and donations.
If you see this text you are blocking our ads.
Please consider a Donation to support the site.


ioncila
Colaborador
Colaborador
Mensagens: 35
Registrado em: Qui Dez 03, 2009 2:15 pm

Re: DateAndTimePickerControl

Mensagem por ioncila »

Bem, parece que comigo está a tornar-se mais difícil. Explicando:
1. Troquei a TextBox (TxData) por uma Combobox (ComboData).
2. Coloquei

Código: Selecionar todos

Option Explicit
Private DTP4 As DateTimePicker
no início da Userform.
Coloquei depois dentro da sub da ComboData o seguinte código

Código: Selecionar todos

Private Sub ComboData_AfterUpdate()
Set DTP4 = New DateTimePicker
    With DTP4
        .Create Me, "dd/mmm/yyyy", _
                BackColor:=&H125FFFF, _
                TitleBack:=&H808000, _
                Trailing:=&H99FFFF
        .Value = Date
    End With
End Sub
3. A seguir copiei a classe de módulos do DTP para o VBA do meu ficheiro, sem alterar nada.

Onde está o erro?


Avatar do usuário
webmaster
Administrador
Mensagens: 3114
Registrado em: Sex Jul 24, 2009 2:44 pm
Contato:

Re: DateAndTimePickerControl

Mensagem por webmaster »

Incola,

Coloque o código no Initialize do Form. Faltou também o Add do combobox:

Código: Selecionar todos

Private Sub UserForm_Initialize()
    Set DTP4 = New DateTimePicker
    With DTP4
        .Add ComboData

        .Create Me, "dd/mmm/yyyy", _
                BackColor:=&H125FFFF, _
                TitleBack:=&H808000, _
                Trailing:=&H99FFFF
        .Value = Date
    End With
End Sub
Abraços


Avatar do usuário
joseA
Jedi
Jedi
Mensagens: 1048
Registrado em: Qui Out 22, 2009 7:22 am
Localização: Cel. Fabriciano - MG

Re: DateAndTimePickerControl

Mensagem por joseA »

webmaster escreveu:Jose,

Não fiz o teste. Pode enviar a planilha para dar uma olhada?
Recortei e colei o 1º combobox no frame, no ambiente VBA ele aparece no frame, mas quando o form é executado o combo aparece duas vezes no frame (tipo enable = false) e no mesmo lugar no form - aonde não está no modo edição. No Multi Page ocorre o mesmo.
Anexos
DateAndTimePickerControl.rar
(40.45 KiB) Baixado 478 vezes


Disable adblock

This site is supported by ads and donations.
If you see this text you are blocking our ads.
Please consider a Donation to support the site.


ioncila
Colaborador
Colaborador
Mensagens: 35
Registrado em: Qui Dez 03, 2009 2:15 pm

Re: DateAndTimePickerControl

Mensagem por ioncila »

Boa Noite Tomaz
Segui à risca as suas instruções, mas continuo com dificuldades no seguinte:

1. Apesar de já ter uma cbox definida como "ComboData", aparece uma segunda que mostra efectivamente a data do dia, mas o calendário demora uma eternidade a aparecer (e só aparece uma vez, depois desaparece) e a cbox que eu criei como ComboData fica bloqueada. O curioso é que esta cbox só aparece no canto superior esquerdo da form e só quando se chama a userform. Se abrimos o VBA e queremos reposicionar a cbox, ela não aparece, como se não existisse. No entanto tudo o resto está lá, inclusive a ComboData que eu criei.

2. A primeira coisa que me lembrei foi retirar ".Add ComboData" do código. Porém se eu fizer isso, não acontece nada.

O que estou a fazer mal?

Obrigado
Ioncila


Avatar do usuário
webmaster
Administrador
Mensagens: 3114
Registrado em: Sex Jul 24, 2009 2:44 pm
Contato:

Re: DateAndTimePickerControl

Mensagem por webmaster »

Ioncila,

Pode enviar a planilha para dar uma olhada?

Jose. Parece que encontramos uma limitação do DateTimePicker. Tem como fazer referência a ele diretamente, tendo seu funcionamento completo, mas aí vem o problema da necessidade da existência da ocx no computador do usuário.

Se conseguir encontrar uma resposta, aviso.

Abraços


poiaman
Colaborador
Colaborador
Mensagens: 61
Registrado em: Sáb Jan 02, 2010 9:17 am

Re: DateAndTimePickerControl

Mensagem por poiaman »

É hoje tambem achei outro "BUG" acessei minha planilha de controle de gastos em um pc da fábrica onde trabalho e a data apareceu assim 01/08/aaaa, em ingles invertida e não apareceu o ano!

Mas na hora do lançamento na planilha apareceu normal, so na form que ela apareceu errada....


Avatar do usuário
webmaster
Administrador
Mensagens: 3114
Registrado em: Sex Jul 24, 2009 2:44 pm
Contato:

Re: DateAndTimePickerControl

Mensagem por webmaster »

Poiaman,

Já vi esse problema. No caso, é preciso corrigir a configuração de data do Windows. Qualquer outro programa, mesmo não sendo VBA, sofrerá do mesmo mal.

Abraços


ioncila
Colaborador
Colaborador
Mensagens: 35
Registrado em: Qui Dez 03, 2009 2:15 pm

Re: DateAndTimePickerControl

Mensagem por ioncila »

Aqui está o arquivo.
Trata-se de uma registo de correspondência baseado no exemplo de cadastro do Tomás.
Ainda não está concluído porque gostaria de adicionar outras funcionalidades, inclusive este DTP.

Já agora, se houver outras sugestões de melhoria, fico agradecido.

Cumprimentos
Ioncila
Anexos
REGISTO CORRESPONDÊNCIA ENVIADA teste.rar
(126.34 KiB) Baixado 481 vezes


poiaman
Colaborador
Colaborador
Mensagens: 61
Registrado em: Sáb Jan 02, 2010 9:17 am

Re: DateAndTimePickerControl

Mensagem por poiaman »

Brother acho que resolvi seu problema! na gambiarra mas resolvi!

rssrs

tenta descobrir o que eu fiz aí!

att
Anexos
REGISTO CORRESPONDÊNCIA ENVIADA teste2.rar
(127.86 KiB) Baixado 551 vezes


Disable adblock

This site is supported by ads and donations.
If you see this text you are blocking our ads.
Please consider a Donation to support the site.


Responder