Digitar um dado em uma celula puxar a data atual em outra.

[jonjonjo]

Gostaria de quando digitasse um dado por exemplo na minha planilha tenho uma tabela e na coluna H vou digitar um valor gostaria que quando digitasse um valor a coluna I pegasse a data de hoje (data que digitei) e colocasse la a data e nao se alterasse..

a formula hoje não da porque vai mudar todos os dias e no vba se fosse para uma celula conseguiria fazer mas não se fazer para uma coluna inteira..

[Patropi]

Boa tarde

Baixe a planilha e não se esqueça de habilitar as macros:

http://www.sendspace.com/file/7jg4bz

Dê retorno.

Att.

[jonjonjo]

Muito perfeito, valeu mesmo.. mas e se eu fosse colocar em outra coluna também para funcionar isso como na J os valores e a data no K como posso fazer?

utilizei else mas gostaria de saber se tem outra forma.. fiz assim..

Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Column = 8 And Cells(Target.Row, 8).Value <> "" Then

Cells(Target.Row, 9).Value = Str(Now)

Else

If Target.Column = 10 And Cells(Target.Row, 10).Value <> "" Then

Cells(Target.Row, 11).Value = Str(Now)

End If

End If

End Sub

[klebson00]

Prezados, seria possível acrescentar, junto com a data e hora, o usuário da máquina (ou algum identificador do usuário) que fez a última modificação na planilha em qualquer coluna na respectiva linha em que se encontra este campo de informações sobre a modificação?