data automatica [excel]

[bubiss2000]

ciao a tutti.
vorrei sapere come inserire una formula in excel in modo che quando inserisco un dato in una cella, es. P12, nella cella E12 venga inserita la data di imissione.
se volete posso mandarvi il mio file excel.
grazie

[Anthony47]

Ti serve una macro di Worksheet_Change; qualcosa del tipo

Codice: Seleziona tutto

Private Sub Worksheet_Change(ByVal Target As Range)
CheckArea= "P2:P100"   '<<< L' area oggetto di immissione
If Application.Intersect(Range(CheckArea), Target) Is Nothing Then Exit sub
Application.EnableEvents = False
Cells(Target.Row, 5).value=Int(Now())    '<<< Corrisponde a col E della riga in lavorazione
Application.EnableEvents = True
End Sub


In questo modo puoi inserire "la data odierna", e se togli la parte Int e lasci solo Now() puoi avere anche l' orario. L' ora viene inserita in col E della riga modificata, se la riga e' compresa tra P2 e P100; per modificare "l' area sensibile" basta moificare la prima istruzione marcata <<<.

Ciao