Ir para conteúdo

headway123

Members
  • Total de itens

    1
  • Registro em

  • Última visita

Reputação

0 Comum

Sobre headway123

  1. headway123

    Excel invertendo DATA

    Olá,Por gentileza, estou com o seguinte problema e não consigo encontrar a solução.Ao preencher com a data no UserForm, o Excel inverte o DIA, pelo MÊS, em qualquer data anterior ao dia 12.Já mudei a formatação de data do Excel para Portugues, Ingles, e também não deu certo.Segue os dois códigos que utilizo.If Len(TxtProximoContato.Text) = 2 ThenTxtProximoContato = TxtProximoContato + "/"End IfIf Len(TxtProximoContato.Text) = 5 ThenTxtProximoContato = TxtProximoContato + "/"End IfTxtProximoContato.MaxLength = 11 '10/10/2014Select Case KeyAsciiCase 8 'Aceita o BACK SPACECase 13: SendKeys "{TAB}" 'Emula o TABCase 48 To 57If TxtProximoContato.SelStart = 2 Then TxtProximoContato.SelText = "/"If TxtProximoContato.SelStart = 5 Then TxtProximoContato.SelText = "/"Case Else: KeyAscii = 0 'Ignora os outros caracteresEnd SelectTenho outro TextBox 'Date' que registra a data atual para cadastro, que as vezes também ocorre essa inversão.Tentei de várias formas e não consegui resolver.Por favor, se alguém souber resolver isso eu agradeço muito!
×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.