locked
FormatDateTime no excel RRS feed

  • Pergunta

  • Criei uma planilha, onde preciso que as células da coluna D mostrem a data em que a célula  referente, na coluna C foi alterada. Usei o código abaixo:

     

    'Definição das instruções, nome do procedimento
       Private Sub Worksheet_Change(ByVal Target As Range)
         'Operador de condição, realiza quando verdade
         If Target.Column = 3 Then
            'Insere data e hora na coluna D da planilha na linha referente da coluna C
            Cells(Target.Row, 4).Value = FormatDateTime((Str(Now)), vbGeneralDate)
         'Fim da operação de condição
         End If
       'Fim do procedimento
       End Sub

     

    A data é exibida da seguinte forma mm/dd/yyyy, sendo que desejo que seja exibida dd/mm/yyyy. As configurações regionais do computador estão corretas e a formatação das células também, porém a data continua sendo exibida errada.

    Além disso, quando altero a planilha em outro computador da rede, a célula com a data não é atualizada.

    Quem puder, por favor me ajude..

    terça-feira, 9 de novembro de 2010 13:24

Todas as Respostas

  • O lance aí é simplificar

    target.offset(0 ,4).value = now

     

     

    Simples assim

     

    Experimente

    Nesse exemplo, ele vai colocar a data+hora 4 células a direita da célula alterada. Se vc quer em outra coluna, altere o 4 para a quantidade de colunas deslocadas desejadas. Se usar números negativos vai deslocar para a esquerda.

    O formato default é data + hora. Se quer só a hora, formate a célula para mostrar só a hora

     


    João Eurico Consultor Manguetown - Brazil
    • Sugerido como Resposta João Eurico terça-feira, 9 de novembro de 2010 15:04
    terça-feira, 9 de novembro de 2010 14:26
  • Desse jeito funcionou..

    Valeu

    terça-feira, 9 de novembro de 2010 15:02