Notifications
Clear all

Formula para data

12 Posts
1 Usuários
0 Reactions
4,177 Visualizações
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Bom dia,

Eu gostária de saber se tem alguma formula que eu colocasse em um campo para sempre que eu salve um documento ela salve tambem a da que o documento foi salvo.

Estou usando a formula =AGORA(), mais deste jeito sempre que eu abro o documento esta a data atual do sistema e eu quero a ultima data que o documento foi salvo.

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 27/05/2010 9:20 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Só por macro ou VBA.

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 27/05/2010 12:13 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Rafael, eu não sou muito familiarisado com vba ou macro, você poderia dar uma explicação de como faço isto tanto em macro quanto em vba.

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 27/05/2010 6:02 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Boa Noite Italo

Eu tenho uma macro que na coluna A coloca a data e a hora que abrimos a planilha e mantém os dados là, exemplo:
A1= 03/05/2010 / 16:35:12
A2= 03/05/2010 / 20:35:02
A3= 05/05/2010 / 10:15:12

Se vc quiser eu coloco a macro aqui e te ensino como aplicá-la.

Abraços

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 05/06/2010 4:57 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Bom dia Patropi
Por favor faz isto.

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 10/06/2010 8:04 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Boa noite Italo.

Bom eu tenho duas diferentes.
Uma macro coloca a data na célula A1 quando vc abre a planilha e habilita a Macro.
A outra ao vc digitar alguma coisa na coluna A a data e o horário são registrados na coluna B.
Vamos a primeira:
Com a planilha aberta, e sem nada digitado na célula A1, clique ALT+F11 para abrir o editor de VBA, no menu Inserir, Módulo.
No módulo clique em geral vai abrir a lista clique em Worksheet;
copie e cole este código no logo após a primeira linha, ou seja logo após Private Sub Workbook_Open() e antes de End Sub.

'Definir a planilha na qual será inserida a data
Set ws = ActiveSheet
'Definir a célula na qual será inserida a data
ws.Range("A1") = Date

Depois clique em F11 novamente para voltar a planilha e salve a planilha e feche.
Quando vc abrir novamente e habilitar a macro vai aparecer a data na célua A1

Abraços

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 12/06/2010 8:03 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Bom dia Italo

Essa daqui que tem a ver mais com o que vc quer:

Deixe as células das colunas A e B em branco, pois nelas que serão registradas as entradas.
Siga os mesmo procedimentos da resposta anterior e copie e cole este código:
If Target.Column = 1 Then Cells(Target.Row, 2) = Now

O código todo ficará assim:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 1 Then Cells(Target.Row, 2) = Now
End Sub

Clique em ALT+ F11 novamente para voltar a planilha e salve a planilha e feche.
Quando vc abrir novamente e habilitar a macro vc digita teu nome na célula A1 e a data e o horário serão lançados automaticamente na cédula B1.
Qunado vc entrar no vamente na planilha coloque teu nome na célula A2 e na célula B2 aparecerá a nova dta e horário e assim por diante.

Abraços

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 13/06/2010 6:45 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Boa tarde Italo

Fui testar o primeiro código, aquela da resposta com data de 12/06 e vi que ele não mantém a data anterior então desconsidere aquele código e cole este aqui.

Option Explicit
Private Sub Workbook_Open()
Dim strDate As String

strDate = Format(Date, "dd-mm-yyyy") & " / " & Format(Time, "hh:mm:ss")
Range("A1").Select
If Range("A2") = "" Then
Range("A2") = strDate
Else
Selection.End(xlDown).Select
ActiveCell.Offset(1, 0).Select
ActiveCell.Value = strDate
End If

End Sub

Com este código na coluna A vc terá a data e a hora que a planilha foi acessada.

Abraços

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 13/06/2010 11:38 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Mais do meio deste ultimo poste, quando eu for acessar não vai ficar a minha data e hora tambem, eu gostaria de um codigo que me desse a data e a hora da ultima modificação na planilha.

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 14/06/2010 3:14 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Boa noite,
Alguem pode ajudar? preciso criar um controle de atualizacao por data. Por exemplo o meu pessoal do comercial tem uma base de clientes e eles terao a tarefa de atualizar todos os clientes. Para eu controlar essa atualizacao minha ideia é em cada linha de clientes ter uma coluna com obs onde ele preenche a atualizacao e outra coluna onde assim q ele digitar na obs atualize com a data atual, porem mantenha esta data fixa ate a proxima atualizacao e nao atualize sempre q abrir a planilha com a data atual do micro.ok Sera q fui claro. Dessa forma poderei acompanhar a data q estao trabalhando nesta carteira.
obrigado. abraco

Everton Cardoso
[email protected]

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 15/07/2010 7:12 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Everton....veja se é assim!!!
Segue exemplo

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 23/07/2010 5:55 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Pelo que entendi Everton, basta capturar a data da ultima modificação da planilha nesta sua data fixa, tipo, a medida que sua planilha sofre qualquer alteração e é salva essa data precisa ser atualizada. Por essa lógica utilize a função que criei abaixo.

Public Function UltimaAtualizacao()
UltimaAtualizacao = Format(FileDateTime(ThisWorkbook.FullName), "dd/mm/yy h:m ampm")
End Function

Na célula que 'fixará' a data da ultima atualização basta difitar a fórmula criada acima

UltimaAtualizacao()

Abraço

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 23/07/2010 8:31 pm