Excel data e hora travada em célula

[Murilo_Correa]

Boa tarde!

 

Sei que parece besteira, mas não consigo fazer uma célula apresentar dados de data, utilizando fórmula como por exemplo =hoje() e fazer esta data ficar travada.

Sempre que acesso a planilha no dia seguinte a data se atualiza mas não quero que isto aconteça.

 

Preciso que esta data nesta célula fique travada. Uso a seguinte condicional para apresentar a data.

 =SE(B1>0;HOJE();"")

 

[Patropi]

@Murilo_Correa

 

A função HOJE() é volátil, portanto, se atualiza todos os dias, como o próprio nome dela já diz.

O que você deseja só dá para fazer com programação VBA, mas sem você anexar um arquivo Excel com dados, fica difícil o pessoal ajudar.

 

[]s

[Murilo_Correa]

11 horas atrás, Patropi disse:

@Murilo_Correa

 

A função HOJE() é volátil, portanto, se atualiza todos os dias, como o próprio nome dela já diz.

O que você deseja só dá para fazer com programação VBA, mas sem você anexar um arquivo Excel com dados, fica difícil o pessoal ajudar.

 

[]s

Certo entendo.

Utilizei algo em VBA já que li em outros lugares porém não funcionou.

Segue planilha, na coluna L está a data, preciso que estas células tragam a data de hoje caso seja preenchido qualquer valor maior que 0 na coluna A, porém que está data não fique se atualizando diariamente, que ela fique fixa.

 

TESTE.xlsx

[OreiaG]

Veja se atende.

 

Private Sub Worksheet_Change(ByVal Target As Range)
 If Target.Count > 1 Then Exit Sub
 If Target.Column = 1 And Target.Value <> "" Then Target.Offset(, 11).Value = Date
End Sub

 

[Murilo_Correa]

36 minutos atrás, OreiaG disse:

Veja se atende.

 

Private Sub Worksheet_Change(ByVal Target As Range)
 If Target.Count > 1 Then Exit Sub
 If Target.Column = 1 And Target.Value <> "" Then Target.Offset(, 11).Value = Date
End Sub

 

Bom dia,

Como devo aplicar isto a planilha?

Adicionei a um módulo porém não soube seguir adiante.

[OreiaG]

5 minutos atrás, Murilo_Correa disse:

 

Adicionei a um módulo porém não soube seguir adiante.

 

Coloque no módulo da Planilha1.

No Editor de VBA, na janela do lado esquerdo, duplo clique em Planilha1, aí vai se abrir o módulo onde você deve colocar o código.

[Murilo_Correa]

28 minutos atrás, OreiaG disse:

 

Coloque no módulo da Planilha1.

No Editor de VBA, na janela do lado esquerdo, duplo clique em Planilha1, aí vai se abrir o módulo onde você deve colocar o código.

Fiz o que me pediu mas não funcionou,

Poderia encaminhar a planilha de teste que mandei mais cedo com este código aplicado por gentileza?

[OreiaG]

Encaminhe a sua planilha com o código aplicado e informe exatamente o que quer dizer "não funcionou".

[Murilo_Correa]

11 minutos atrás, OreiaG disse:

Encaminhe a sua planilha com o código aplicado e informe exatamente o que quer dizer "não funcionou".

Desculpe, houve um erro da minha parte na hora de explicar as condições, já alterei o código para funcionar conforme eu gostaria, muito obrigado.