Save file x minutes after a value is entered

[raceymacey]

Hi,

I have created a spreadsheet for uses to record production testing results ad this forum has been essential in automating some of the task. But now if find that users are not saving the results.

I know I can use the OnTime application to autosave the file but I only want this to kick in after a specific cell (say F11) has been populated.

what would be the code for this?

many thanks

 

[Yongle]

Place in sheet module (right-click sheet tab \ View Code \ paste code in code window \ {alt}{F11} to go back to Excel)

Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Range("F11"), Target) Is Nothing Then ThisWorkbook.Save
End Sub

 

[raceymacey]

Place in sheet module (right

thanks, what I would ideally want I for a delay between entering data and the autosave, that way the user has a chance to undo an mistakes.

 

[Yongle]

Why complicate the code?
VBA will simply save again with corrected value

You could modify the code I gave you earlier and insert a delay before saving ....

If Not .... then
    [COLOR=#ff0000]DELAY goes here[/COLOR]
   ThisWorkbook.Save
End if