Fórmula de Excel para deixar uma data fixa

fenanzer · 23 de janeiro de 2013

Boa tarde pessoal,

Tudo bem?

Estou tentando desenvolver uma planilha para me organizar nas tarefas profissionais e necessito de uma fórmula que puxe a data automaticamente, porém não há altere conforme o dia muda.

É para um controle de propostas.

Preciso que a célula de DATA seja automática, para evitar que os funcionários utilizem o famoso CRTL + C e depois CRTL + V, para "ganhar" tempo ao preencher o formulário. Assim, cada linha preenchida, irá manter a data original da data de preenchimento.

Penso em utilizar uma fórmula auxiliar para manter a condição da célula data; para exemplificar melhor o que eu preciso:

- Se (célula nome do contato)[ou uma outra (ou mais de uma) célula qualquer da planilha] diferente de vazio colocar a data atual e congelá-la; se não, a (célula de data) permanece com =agora().

Estou mandando a planilha para visualizarem melhor o que eu preciso.

http://www.4shared.com/file/2vPMLRji/Controle_de_Propostas_Temporri.html

Muito obrigado.

deejaywesley · 23 de janeiro de 2013

Boa Tarde

parceiro, com formula eu nao sei nao

mas se por VBA te ajudar... ta ai

http://www.4shared.com/file/cQ9aR1VP/Controle_de_Propostas_Temporri.html?

sempre q digitar na coluna B e A estiver vazio ele colocar a data pra você

aguardando:rolleyes:

fenanzer · 23 de janeiro de 2013

Boa Tarde
parceiro, com formula eu nao sei nao

mas se por VBA te ajudar... ta ai

http://www.4shared.com/file/cQ9aR1VP/Controle_de_Propostas_Temporri.html?

sempre q digitar na coluna B e A estiver vazio ele colocar a data pra você

aguardando:rolleyes:

Muito obrigado deejaywesley!

Era isso mesmo que eu estava precisando.

Sem querer abusar de sua boa vontade, será que é possível, através do VBA, bloquear essa célula de um jeito que os demais usuários não consigam apagar e/ou modificar essa data?

Tentei bloquear da forma convencional, mas ao entrar com dados no campo B, o Excel dá erro. (Acho que o fato do VBA escrever no campo A, requer que o mesmo esteja desbloqueado, correto?)

Abraços

deejaywesley · 23 de janeiro de 2013

Boa Noite!

isso mesmo!

no caso vcte que alter o codigo e bloquer a coluna A que tem as datas....

vamos la, vá ate o codigo VBA.... Alt+F11

senao tiver aparecendo nesa janela que abriu, nessa janela mesmo clique duas vezes em Plan1 (Plan1)

No seu codigo ai você tem que colocar essas duas linhas

Dim ColunasC As Range
Set ColunasC = Range("C2:C20000")

If Not Application.Intersect(ColunasC, Range(Target.Address)) Is Nothing Then

ActiveSheet.Unprotect ("Teste")

linha = Target.Row

Range("i" & linha).Value = DateTime.Now

Range("I" & linha).Locked = True

ActiveSheet.Protect ("Teste"), DrawingObjects:=True, Contents:=True, Scenarios:=True

End If

onde o Teste é a senha que você colocou na sua planilha "aba"

Obs: esse codigo ai nao é igual ao seu nao... os intervalos sao diferentes

copie somente as linhas das senhas, e coloque na sua

aguardando!

fenanzer · 24 de janeiro de 2013

Boa Noite!
isso mesmo!

no caso vcte que alter o codigo e bloquer a coluna A que tem as datas....

vamos la, vá ate o codigo VBA.... Alt+F11

senao tiver aparecendo nesa janela que abriu, nessa janela mesmo clique duas vezes em Plan1 (Plan1)

No seu codigo ai você tem que colocar essas duas linhas

onde o Teste é a senha que você colocou na sua planilha "aba"

Obs: esse codigo ai nao é igual ao seu nao... os intervalos sao diferentes

copie somente as linhas das senhas, e coloque na sua

aguardando!

Cara deu certo!!

Muito obrigado mesmo!!